超级邮件群发机的破解方法

来源:百度文库 编辑:神马文学网 时间:2024/04/29 07:10:58
Submitted byGM on 2008, October 23, 11:53 AM.技术研究
很多人都在用“超级邮件群发机”,网上流传的破解版本很多,可就是不好用。决定一直“试用”下去......
设置好发件箱、邮件以后,开始发送。
一段时间以后,如果是未注册版本,它会提示一个“注册”窗口,这时候需要用鼠标点击“继续”才能继续发送。
于是,想到脚本的sendkey函数,让它发送一个TAB、一个ENTER键的消息,就可以让程序继续发送下去,这样就永久免费了!
使用方法:保存为sn.vbs,然后打开“超级邮件群发机”,开始发送邮件以后,再双击这个脚本即可
(虽然用到了无穷循环,但CPU的占用率基本为0,不用担心,呵呵)
程序代码:
XML/HTML代码
Set WshShell = CreateObject("WScript.Shell")       While 1         WScript.Sleep 1000         While WshShell.AppActivate("注册")             WshShell.SendKeys "{TAB}{ENTER}"             'Wscript.Echo "skagon"         Wend    Wend    WScript.Quit