qc5111

怎么没人啊，那么好的问题，建议直接用a=%random%
给你一个范例

:vip1
cls
set /p af=请输入机器码
if %af%=%mf% goto vip2
echo 机器码错误,请联系QQ:247731705
goto vip1
:vip2
cls
set /p bf=请输入注册码
if %bf%=%nf% goto vip3
echo 注册码错误,请联系QQ:247731705
goto vip2
:vip3
set /a vip=%vip%+1
set ma=%RANDOM%
set mb=%RANDOM%
set mc=%RANDOM%
set md=%RANDOM%
set me=%RANDOM%
set mf=%ma%-%mb%-%mc%-%md%-%me%
set na=%RANDOM%
set nb=%RANDOM%
set nc=%RANDOM%
set nd=%RANDOM%
set ne=%RANDOM%
set nf=%na%-%nb%-%nc%-%nd%-%ne%
set rmb >C:\%UserName%消费记录.dll
set vip >>C:\%UserName%消费记录.dll
set PassWord >>C:\%UserName%消费记录.dll
set mf >>C:\%UserName%消费记录.dll
set nf >>C:\%UserName%消费记录.dll
cls
echo 恭喜，您申请VIP成功，现在为VIP%vip%
复制代码