标题: [文件操作] [已解决]批处理怎样按照指定规则替换GBK格式的TXT文本? [打印本页]
作者: w1983912 时间: 2011-4-10 00:44 标题: [已解决]批处理怎样按照指定规则替换GBK格式的TXT文本?
本帖最后由 w1983912 于 2011-4-10 17:31 编辑
(1, 0, 0, 50, '优 游', '{c}/a');
(2, 4, 2, 50, '优1游', '{c}/a/you5');
(3, 3, 5, 50, 'bbbva游', '{c}/b/o8o12u');
(4, 2, 9, 50, '优x 1游', '{c}/a/55555ou');
(5, 6, 2, 50, '优a5游', '{c}/a/y89999999');
(6, 2, 0, 50, '优 2游', '{c}/a/ccc222');
(7, 7, 2, 50, '优 d游', '{c}/d');
(8, 2, 8, 50, '优x游', '{c}/a/mmmxxx');
(9, 4, 1, 50, '优cccc', '{c}/b/567c');
(10, 5, 3, 50, 'aa00cc', '{c}/b/a0c');
'{c}/a' 这样的不变化 只有1个/
比如 '{c}/a/you5' 从第一行开始变成 '{c}/a/a' ---- '{c}/a/z' ------- '{c}/a/0' ------ '{c}/a/9' 一共 26+10个
变成以下
(1, 0, 0, 50, '优 游', '{c}/a');
(2, 4, 2, 50, '优1游', '{c}/a/a');
(3, 3, 5, 50, 'bbbva游', '{c}/b/a');
(4, 2, 9, 50, '优x 1游', '{c}/a/b');
(5, 6, 2, 50, '优a5游', '{c}/a/c');
(6, 2, 0, 50, '优 2游', '{c}/a/d');
(7, 7, 2, 50, '优 d游', '{c}/d');
(8, 2, 8, 50, '优x游', '{c}/a/e');
(9, 4, 1, 50, '优cccc', '{c}/b/b');
(10, 5, 3, 50, 'aa00cc', '{c}/b/c');
希望知道的朋友帮帮我 谢谢
作者: hanyeguxing 时间: 2011-4-10 11:11
本帖最后由 hanyeguxing 于 2011-4-10 13:02 编辑
要求:{c}前不得有/- @echo off&setlocal enableDelayedExpansion
- set a=abcdefghijklmnopqrstuvwxyz0123456789
- (for /f "usebackq tokens=1* delims=/" %%a in ("1.txt") do (
- set "b=%%b"
- if "!b:~1,1!"=="/" (
- for %%c in (!b:~0^,1!) do set/a c=_%%c,_%%c=c+1
- for %%c in (!c!) do echo;%%a/!b:~0,1!/!a:~%%c,1!'^);
- ) else echo;%%a/!b:~0,1!'^);
- ))>"1_.txt"
复制代码
作者: w1983912 时间: 2011-4-10 17:30
非常感谢 很好的代码 我在这请教半年 混到了4级。。。。却还是。。。。一无所知。。。
多谢帮忙
欢迎光临 批处理之家 (http://bathome.net./) |
Powered by Discuz! 7.2 |