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

[其他] 批处理如何随机获取8位的字符串?

定义26个字母的变量  如何随机获取他们? 8位…
如ssdgjgdv  nvggdjfv  aaaaaaaa
可以重复 …

  1. @rem = '
  2. @echo off
  3. color d
  4. mode con cols=125 lines=25
  5. echo.&echo.&echo.&echo.
  6. C:\strawberry\perl\bin\perl.exe -S a.bat
  7. ping 127.0.0.1 >nul
  8. goto end_perl
  9. :end_perl
  10. exit
  11. @rem ';
  12. @a=(a..z,A..Z);
  13. @result=@a[map {int(rand(26))} 1..8];
  14. print "@result\n";
复制代码

TOP

  1. @echo off
  2. setlocal enabledelayedexpansion
  3. set #=abcdefghijklmnopqrstuvwxyz
  4. for /l %%i in (1 1 8) do (
  5.     set /a _ = !random! %% 26
  6.     for %%_ in (!_!) do set $=!$!!#:~%%_,1!
  7. )
  8. echo %$%
  9. pause
复制代码

TOP

楼上两位大神的… 貌似都不可以,求解答!

TOP

回复 2# sxw


    运行结果:a不是内部或者外部命令,也不知可运行的程序或批处理文件
                      result 也是同上的问题
                 无法初始化设备 PRN
问题出在那里?求解答…   谢谢

TOP

Demon 发表于 2013-5-5 22:04



    运行结果:运行符不存在…  最后直接显示!$!!#:~!_!,1!
问题出在那里了?求解答…

TOP

运行结果:运行符不存在…  最后直接显示!$!!#:~!_!,1!
问题出在那里了?求解答…
qingshancun 发表于 2013-5-6 22:13


你的是什么系统?

TOP

回复 5# qingshancun


    需要装perl.exe

TOP

回复 7# Demon


    还和系统有关系么?  win7

TOP

回复 8# sxw


    还要安装那个啊…   不是纯bat么?

TOP

回复 10# qingshancun


    我这个不纯。下载个草莓perl就好了http://strawberry-perl.googlecod ... -5.16.3.1-32bit.msi

TOP

回复 8# sxw


    不是纯bat么?

TOP

回复 12# qingshancun


    这个需要第三方工具Perl.exe,如果你不着急,可以有别人解决了。。。。。

TOP

回复 7# Demon


    在么???    请问是什么问题啊 ?

TOP

三楼的代码应该是没有问题的,不知道楼主系统是不是精简版的?
***共同提高***

TOP

返回列表