Board logo

标题: 随机抽取文本一行放入另一文件的每一行结尾 [打印本页]

作者: zerocq     时间: 2007-11-27 19:57    标题: 随机抽取文本一行放入另一文件的每一行结尾

A,B两个文件各N行

让A文件每行的结尾所添加的内容都是B文件中随机抽取的,该怎么写呢??
作者: 26933062     时间: 2007-11-27 20:38

@echo off
setlocal enabledelayedexpansion
for /f "tokens=1* delims=:" %%i in ('findstr /n .* a.txt') do set max=%%i
for /f "delims=" %%a in (b.txt) do call :couq&echo %%a!num!
pause
exit
:couq
set /a sui=%random%%%%max%+1
for /f "tokens=1* delims=:" %%i in ('findstr /n .* a.txt') do (
  if "%%i"==!sui! set num=%%j&goto :eof
)
goto :eof

作者: upsco     时间: 2007-11-27 20:51

setlocal enabledelayedexpansion
for /f "delims=" %%a in (A.txt) do (
   call :loop
   echo %%a!str_temp!>>C.txt
)

:loop
set /a rand_num=%random%%%5+1
set num=1
for /f "delims=" %%i in (B.txt) do (
   if !num!==%rand_num% (
    set str_temp=%%i
    goto :eof
  )
   set /a num=!num!+1
)