发布时间:2014-03-20 10:27:41
这个都是老油条了,cbm666教学群既然有人问出来那我就写个吧 really very easy'新建3个Textbox分别对应帐号、密码、验证码,再拉个图片框,一个按钮Private Declare Function MultiByteToWideChar Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long,&nbs.........【阅读全文】
发布时间:2014-03-20 10:26:20
网上找了半天资料,要么直接清理全部缓存的要么就是清理指定URL的缓存。。这些都鸟用啊。。。气气的 看来只能用爆搜法了,本想用注册表法来获取COOKIE文件夹路径,既然有现成的api和函数,那就不用麻烦注册表了,直接把文件名含有baidu的cookie删了就好 ,下面是代码Option Explicit &nb.........【阅读全文】
发布时间:2014-03-20 10:20:18
看到贴吧里有人问我就发出来了那里发的都被删了 Dim Webcode$Private Sub Command1_Click() If Winsock1.State <> 0 Then Winsock1.Close Winsock1.Protocol = sckTCPProtocol Winsock1.RemoteHost =&n.........【阅读全文】
发布时间:2014-03-20 10:15:57
知道里有人问了我就回答下,顺便赚点分数 普通的东东我还懒得回答呢,看了2个分类达人的回答,一个用webbrowser一个用渣api 笑死我了看我的王道-xmlhttpPrivate Sub Command1_Click() Dim webcode$, ListDate$, Str$, i& For i = 1&nb.........【阅读全文】
发布时间:2014-03-20 10:13:26
我写的是当前一个投票网站的作弊源码,属本人原创,请勿用于商业用途'增加2个按钮,command1和command2,分别是投票和获取验证码;增加2个textbox,分别是验证码的显示和投票的post结果,再拉一个winsock控件即可Option ExplicitDim Vcode As Boolean, code$Private SubCommand2_Click() &nb.........【阅读全文】