传奇私服抢庄脚本

源代码：

()

back=&("",0,0,0)

()

back=&("OPEN""\TEST.mid""TYPESEQUENCERALIASNN",0&,0,0)

back=mciSendString&("PLAYNNFROM0",0&,0,0)

R=mciSendString&("CLOSEANIMATION",0&,0,0)

EndSub

PrivateSubForm_Load()

Dimback

back=mciSendString&("OPEN"App.Path"\TEST.mid""TYPEWaveAudioALIASNN",0&,0,0)

back=mciSendString&("PLAYNNFROM0",0&,0,0)

R=mciSendString&("CLOSEANIMATION",0&,0,0)

EndSub->

如：d:/ao/fj126.net/id.vbs

先看看这两个位置的介绍：

如果/D未在命令行上被指定，当CMD.EXE运行时，它会自动寻找以下REG_SZ/REG_EXPAND_SZ注册表变量

DOS批处理不再黑屏的vbs脚本

DIMobjShell

n]h/K,cQ'xe0setbjShell=wscrpt.createObject("wscrpt.shell")linux博客?w