中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-06-13 20:40
中国DOS联盟论坛 » 论坛回收站 » [10QB悬赏]请教大家
楼 主 [10QB悬赏]请教大家 发表于 2010-11-18 16:11 ·  中国 山西 长治 联通
新手上路
积分 10
发帖 10
注册 2010-01-21 01:30
UID 159120
性别 男
状态 离线
请教大家,批处理如何调用一个文本随机行并分别定义变量?


文本内容如:
——————————
WKS001 1 abcdefg
WKS002 2 abcdefg
WKS003 3 abcdefg
WKS004 4 abcdefg
WKS005 5 abcdefg
WKS006 6 abcdefg
WKS006 6 abcdefg
...
——————————
如此,行数不固定,每行3段字符分别用空格隔开,要求在批处理中随机调入某行,然后定义该行的3段字符为变量a b c

调试好以后,本人会给作者充值10Q币作为回报,谢谢大家

[ Last edited by adslcool on 2010-11-18 at 16:15 ]
2 发表于 2010-11-18 16:12 ·  中国 山西 长治 联通
新手上路
积分 10
发帖 10
注册 2010-01-21 01:30
UID 159120
性别 男
状态 离线
我QQ 165306921
3 发表于 2010-11-18 17:08 ·  中国 广东 广州 电信
银牌会员
★★★★
SuperCleaner
积分 2,362
发帖 1,133
注册 2008-02-02 21:36
UID 110072
性别 男
状态 离线
这Q币好像不难得到…… 上面的接标了?
4 纯粹是为了学习讨论,呵呵。 发表于 2010-11-18 18:13 ·  中国 湖南 怀化 电信
初级用户
★★
积分 66
发帖 53
注册 2009-10-09 20:51
UID 152852
性别 男
状态 离线

::如果每行中间的那个数字是序号的话,可以用 Findstr 随机找出。

@echo off & Title 变量随机定义
Setlocal EnableDelayedExpansion

::查找文件里的有效数据有多少行:
For /f %%a in ('findstr "^WKS" File.txt ') do (set /a N+=1)
Echo File.txt 文件共有 !N! 行有效数据!

::设置随机数,并用 Findstr 找出 行中间有对应数的那一行。
set /a Line=%Random% %% !N! +1
For /f "tokens=1-3" %%a in ('findstr " %Line% " File.txt ') do (
set "One=%%a"
set "Two=%%b"
set "Thr=%%c"
)
echo %One%
echo %Two%
echo %Thr%
Endlocal
Pause


[ Last edited by wewebb on 2010-11-18 at 18:30 ]
5 发表于 2010-11-18 18:15 ·  中国 湖南 怀化 电信
初级用户
★★
积分 66
发帖 53
注册 2009-10-09 20:51
UID 152852
性别 男
状态 离线

::如果每行中间的那个数字不是序号,而是个不定数的话。

@echo off & Title 变量随机定义
Setlocal EnableDelayedExpansion

::查找文件里的有效数据有多少行,并为每行加上行号:
(For /f "delims=" %%a in ('findstr "^WKS" File.txt ') do (set /a N+=1 & echo !N! %%a) ) > NewFile.txt

Echo NewFile.txt 文件共有 !N! 行有效数据!

::设置随机行数,并用 Findstr 找出对应行。
set /a Line=%Random% %% !N! +1

For /f "tokens=2-4" %%a in ('findstr "^%Line% " NewFile.txt ') do (
set "One=%%a"
set "Two=%%b"
set "Thr=%%c"
)
echo %One%
echo %Two%
echo %Thr%
Endlocal
Pause


[ Last edited by wewebb on 2010-11-18 at 18:29 ]
6 发表于 2010-11-18 18:47 ·  中国 湖南 怀化 电信
初级用户
★★
积分 66
发帖 53
注册 2009-10-09 20:51
UID 152852
性别 男
状态 离线

::如果文件内容都是纺一格式(没有多余信息行),每行中间的数是不定数的话。

@echo off & Title 变量随机定义
Setlocal EnableDelayedExpansion

::查找文件里有多少行
For /f "delims=" %%a in (File.txt) do set /a N+=1

Echo File.txt 文件共有 !N! 行!

::设置随机行数
set /a Line=%Random% %% !N! +1

For /f "tokens=1-3" %%a in (File.txt) do (
set /a num+=1
if !num! == !Line! (set "One=%%a" & set "Two=%%b" & set "Thr=%%c")
)
echo %One%
echo %Two%
echo %Thr%
Endlocal
Pause


[ Last edited by wewebb on 2010-11-18 at 18:49 ]
7 发表于 2010-11-18 22:23 ·  中国 山西 长治 联通
新手上路
积分 10
发帖 10
注册 2010-01-21 01:30
UID 159120
性别 男
状态 离线
多谢各位,我先测试一下,上面大侠的
论坛跳转: