yangfengoo

@echo off&setlocal enabledelayedexpansion
set n=100&for %%a in (0 1 2 3 4 5 6 7 8 9 A B C D E F G H J K L M N P Q R S T U V W Y Z) do set _!n!=%%a&set /a n+=1
for %%a in (*.txt) do (
 for /f "tokens=2 delims=:" %%b in ('findstr /c:"Serial Number" "%%~a"') do set #=%%b&call :zm %%a
)
exit
:zm
set ss=%~n1
if "!ss:~0,8!"=="DK1011NA" goto :eof
for /l %%a in (2 1 7) do if not "!#:~%%a,1!"=="0" set #=!#:~%%a!&goto xx
:xx
set b=115
set /a b=!b!+!#!/1089,s=100+(!#!/33)%%33,g=100+!#!%%33
for /f "tokens=1-3" %%a in ("_!b! _!s! _!g!") do set xx=!%%a!!%%b!!%%c!
for /f "tokens=1* delims=:" %%b in ('findstr /n .* "%~1"') do (if %%b==3 (echo.Serial Number :  DK1011NA!xx!) else (echo.%%c))>>"DK1011NA!xx!.txt"
del "%~1"
复制代码

terse

@echo off&setlocal enabledelayedexpansion
set "str=0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
for /l %%a in (0 1 35) do (
    for /l %%b in (0 1 35) do (
        for /l %%c in (0 1 35) do (
        echo !str:~%%a,1!!str:~%%b,1!!str:~%%c,1!
)))
pause
复制代码

terse

@echo off&setlocal enabledelayedexpansion
set "str=0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
for /l %%i in (0 1 46655) do (
   set /a "m=%%i/36,c=%%i%%36,b=m%%36,a=(m/36)%%36"
   for /f "tokens=1-3" %%a in ("!a! !b! !c!") do (
   echo !str:~%%a,1!!str:~%%b,1!!str:~%%c,1!
 )
)
pause
复制代码

hwylq

谢谢大家的回答，谢谢 16楼的解答，

[ 本帖最后由 hwylq 于 2010-4-10 08:32 编辑 ]