软件作者：vcchao
信息来源：邪恶八进制信息安全团队（www.eviloctal.com）

第一次发原创作品哦，程序代码非常简单，但毕竟是弟弟原创的嘛

还请各位前辈们多多支持!

没看懂是干什么用的？收信程序怎么办？

ip无法处理，所以没什么用！

我只拿着木马抓了一个包，抓到了木马向asp发信的参数

但是找不到IP到底在哪。   还请前辈指点迷津！

ip已经在数据包里了

lin.asp?a=福建1区&s=胡里山&u=帐号&p密码&pin=解锁码&r=名字[ID]&l=0&mb=0


IP在哪里啊？  我怎么看不出来呢。

IP一般都这样获取的。~  ip=Request.ServerVariables("REMOTE_ADDR")

不是 xx.asp?ip=111.111.111.111 这样提交滴~~

我针对征途写了一个自动刷信的.
服务器..区..帐号..等都是自动生成
包括IP也是.
不过要随机刷IP的前提就是要在lin.asp里添加一句代码
ip=request("ip")

看了下楼主的代码
使用的是
WebBrowser控件..

WebBrowser1.Navigate (Text1.Text & Label10.Caption & Text2.Text & Label11.Caption & Text3.Text & Label12.Caption & Text4.Text & Label13.Caption & Text5.Text & Label14.Caption & Text6.Text & Label15.Caption & Text7.Text & Label16.Caption & Text8.Text & Label17.Caption)
MsgBox "成功刷入信封!", , "提示："

就是说使用假的页面..不存在的页面..执行完
WebBrowser1.Navigate
也会提示"成功刷入信封!"  没加以判断啊


下面这段代码.是我测试时写的.不是随机产生数据的代码

Private Sub Command1_Click()
Inet1.OpenURL (Text1.Text + "?id=" + Text2.Text + "&p=" + Text3.Text + "&s=" + Text4.Text + "&ss=" + Text5.Text + "&srv=" + Text6.Text + "&js=" + Text7.Text + "&dj=" + Text8.Text + "&gj=" + Text9.Text + "&yz=" + Text10.Text+ "&ip=" + Text11.Text) '用inet连接网页
aa = InStr(Inet1.GetHeader, "404") '判断页头是否包含字符“404”,返回0则不包含，否则返回其位置
If aa <> 0 Then '页头中包含404
MsgBox "刷信失败！默认收信页面可能被改名！", 48, "失败！" '则说明该网页不存在
Else '如果页头中不包含“404”
MsgBox "刷信成功！请登陆后台查看！", 64, "恭喜！" '说明网页存在
End If
End Sub

随机刷信的效果

未命名.jpg (84.6 KB)

2008-6-9 22:11

在此感谢我的师傅"小珂"对我的指点


因有人要求故此吧我原来的源码发上来
code.rar (80.93 KB)

code.rar (80.93 KB)
下载次数: 51

2010-4-11 15:05

[ 本帖最后由 fhod 于 2010-4-11 15:06 编辑 ]

上代理池。

判断学习了，

不过要给lin.asp加入ip=request("ip")  这不等于自己骗自己了

如果要是给别人刷信还不可以伪造IP啊，

这个很简单的！！！
  其实QQ盗号木马也
  一样的，，只要你提交数据就可以了，他们的数据没有怎么过滤只要你格式正确就可以发！！
  呵呵````
  应该加个do或者for语句循环刷！！！！
  那样不刷死才怪！！

有没有人知道有smtp发信程序的代码呢  我想用VC写一个邮件客户端 用自己的软件收邮件

很多马都用 InternetOpenUrl 提交的，跟踪一下这个函数就知道，IP到底是在什么时候被放进去的了。。。

引用:

原帖由 yinhao 于 2008-6-10 13:28 发表
有没有人知道有smtp发信程序的代码呢  我想用VC写一个邮件客户端 用自己的软件收邮件

论坛sou我的帖子

谢谢分享..拿去看看了