東影神煌 发表于 2010-8-5 23:13:20

把INI的東西改到AUTOIT裡..

TraySetState(2)       
$Num = Random(1, 5, 1)
$var = IniRead(@WorkingDir & "\CDKEY.ini", $Num, "CDKey", "未知")
RUN("C:\WINDOWS\regedit.exe -S D:\Game\EmpireEarth2\PLAY.reg")
SLEEP(1000)
RegWrite ("HKEY_LOCAL_MACHINE\SOFTWARE\Sierra\Empire Earth II" , "CDKey" , "REG_SZ", $var)
SLEEP(1000)
RUN("D:\Game\EmpireEarth2\EE2.exe" , "D:\Game\EmpireEarth2")上面是以前写的..由INI里面读CDKEY..
不过因为怕正版CDKEY被人轻易拿走..
想问说要怎么把大量的CDKEY改到在AUTOIT里面读取..
小的新手一名..功力不足..麻烦大大们传功了..

水木子 发表于 2010-8-5 23:27:23

本帖最后由 水木子 于 2010-8-5 23:43 编辑

可以借鉴下afan前辈的思路!
http://www.autoitx.com/forum.php?mod=viewthread&tid=10929&highlight=

東影神煌 发表于 2010-8-6 08:35:11

抱歉..从昨天到现在..小的悟不出东西来..=.="
假设我把CDKEY先打在TXT里..生成..$Str = _
'123456' & @CRLF & _
'654321' & @CRLF & _
''我把$var替换成$Str = _
它会随机套用下面其中一行..??

水木子 发表于 2010-8-6 08:43:35

$Str = '123456' & @CRLF & _
                '654321' & @CRLF & _
                'abcdef'

$aSplit = StringRegExp($Str, '.+', 3)

For $i = 0 To UBound($aSplit) - 1
        MsgBox(0, '', $aSplit[$i])
Next

東影神煌 发表于 2010-8-6 15:10:04

本帖最后由 東影神煌 于 2010-8-6 15:16 编辑

大大辛苦的教导..可是小弟还是不会改..T_T
我把大大给的例子左套右套..
我的REG里不是一次把序号全部写入..就是写成共有几组..
像是我有十五组正版序号..结果变成..
@="15"
页: [1]
查看完整版本: 把INI的東西改到AUTOIT裡..