[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 【已解决】批处理如何把多余字段删掉呢

本帖最后由 hold2012 于 2013-3-20 16:58 编辑

//             本信息来自 http:home-ktv.taobao.com
//    专业提供DVD歌库新歌下载、拷贝、娱乐场所解决方案。
//             QQ:398772392 TEL:15818758345

karaoke := CreateKaraokeObject;
karaoke.internalnumber := 944493;  // 歌曲编号
karaoke.rows := 2;
karaoke := CreateKaraokeObject;
karaoke.clear;


karaoke.tag('歌名', 'Closer(欣赏版)(大家唱KTV舞曲)');
karaoke.tag('缩写', 'C');
karaoke.tag('歌手', 'Ne Yo');
karaoke.tag('字数', '1');
karaoke.tag('语种', '英语');
karaoke.tag('歌类', '其他');
karaoke.tag('电影', 'false');
karaoke.tag('风格', 'DISCO');
karaoke.tag('流行', 'true');
karaoke.tag('音量', '54');
karaoke.tag('声道', '21');
karaoke.tag('FMP声道', '32');
karaoke.tag('语音', '0');
karaoke.tag('介质', '0');
karaoke.tag('时间', '2013-3-18');
karaoke.tag('歌星拼音', 'NY');
karaoke.tag('原音', '54');
karaoke.tag('伴音', '54');
karaoke.tag('歌词', ' ');
karaoke.tag('亮度', '0');
karaoke.tag('对比度', '0');
karaoke.tag('饱和度', '0');
karaoke.tag('标识', 'MTV');
karaoke.mtvmode :=true;
karaoke.videofilename := '';
karaoke.audiofilename := '*.wav';
karaoke.XSDVideoMode := 0;
karaoke.CommonVideo := 'Ne Yo-Closer(欣赏版)(欣赏版)-英语-944493.mpg';

能不能做个批处理,把多个文件夹下的KSC文件的这行【karaoke.CommonVideo := 'Ne Yo-Closer(欣赏版)(欣赏版)-英语-944493.mpg';】改成【karaoke.CommonVideo := '944493.mpg';】

多个文件如下:


//             本信息来自 http:home-ktv.taobao.com
//    专业提供DVD歌库新歌下载、拷贝、娱乐场所解决方案。
//             QQ:398772392 TEL:15818758345

karaoke := CreateKaraokeObject;
karaoke.internalnumber := 944500;  // 歌曲编号
karaoke.rows := 2;
karaoke := CreateKaraokeObject;
karaoke.clear;


karaoke.tag('歌名', 'Bumbunok(欣赏版)(大家唱KTV舞曲)');
karaoke.tag('缩写', 'B');
karaoke.tag('歌手', '佚名');
karaoke.tag('字数', '1');
karaoke.tag('语种', '英语');
karaoke.tag('歌类', '其他');
karaoke.tag('电影', 'false');
karaoke.tag('风格', 'DISCO');
karaoke.tag('流行', 'true');
karaoke.tag('音量', '54');
karaoke.tag('声道', '21');
karaoke.tag('FMP声道', '32');
karaoke.tag('语音', '0');
karaoke.tag('介质', '0');
karaoke.tag('时间', '2013-3-18');
karaoke.tag('歌星拼音', 'YM');
karaoke.tag('原音', '56');
karaoke.tag('伴音', '54');
karaoke.tag('歌词', ' ');
karaoke.tag('亮度', '0');
karaoke.tag('对比度', '0');
karaoke.tag('饱和度', '0');
karaoke.tag('标识', 'MTV');
karaoke.mtvmode :=true;
karaoke.videofilename := '';
karaoke.audiofilename := '*.wav';
karaoke.XSDVideoMode := 0;
karaoke.CommonVideo := '佚名-Bumbunok(欣赏版)(欣赏版)-英语-944500.mpg';
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "delims=" %%a in ('dir /b /a-d *.ksc') do (
  4.     (for /f "delims=" %%i in ('findstr /n .* "%%a"') do (
  5.         set "str=%%i"
  6.         if "!str:karaoke.CommonVideo=!" neq "!str!" (
  7.             for /f "tokens=1,2*delims='" %%j in ("!str:-=/!") do (
  8.                 set "str=%%j'%%~nxk'%%l"
  9.             )
  10.         )
  11.         echo;!str:*:=!
  12.     ))>$$.tmp
  13.     move $$.tmp "%%a"
  14. )
复制代码
1

评分人数

    • hold2012: 感谢给帖子标题标注[已解决]字样技术 + 1

TOP

  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "delims=" %%a in ('dir /s /b *.KSC') do (
  4.     (for /f "usebackq tokens=1-2 delims==" %%b in ("%%a") do (
  5.         if "%%c" equ "" (
  6.             echo %%b
  7.         ) else if "%%b" equ "karaoke.CommonVideo :" (
  8.             set str=%%c
  9.             set "str=!str:*-=!"
  10.             set "str=!str:*-=!"
  11.             set "str=!str:*-=!"
  12.             echo %%b= '!str!
  13.         ) else (
  14.             echo %%b=%%c
  15.         )
  16.     ))>"%%a.dat"
  17.     move /y "%%~na.dat" "%%a"
  18. )
复制代码

TOP

返回列表