用VBS模拟NC发包
1。关于VBS如何成功调用MSWinsock.Winsock。zzzevazzz说的很清楚了。就是下载Winsock.ocs注册,和VB6控件的授权密钥的.reg导入注册表。两个文件可以这里下载
2.有关WinSock控件引用的基本方法和事件:
LocalHostName //取得本地主机名 LocalIP //取得本地主机IP SocketHandle //取得创建SOCK的句柄 RemotePort //设置或取得远程端口 LocalPort //设置或取得本地端口 State //返回创建sock的对像状态(代吗如下){ 0 缺省的。关闭 1 打开 2 侦听 3 连接挂起 4 识别主机 5 已识别主机 6 正在连接 7 已连接 8 同级人员正在关闭连接 9 错误 } BytesReceived //返回接收到的(当前在接收端缓冲区内的)数据的数量 Connect(RemoteHost,RemotePort) //建立远程连接,RemoteHost远程主机IP,RemotePort远程主机端口 Listen //使SOCK侦听 SendData/GetData //发送或接收数据 Close //关闭对像 Bind(LocalPort, LocalIP)//绑定本地端口。 3。发包例子
Set socket=WScript.CreateObject("MSWinsock.Winsock") socket.Protocol=0 socket.RemotePort="80" '端口 socket.RemoteHost="192.168.8.101" '主机 socket.connect socket.RemoteHost, socket.RemotePort '连接 for a=1 to 30 step 1
WScript.sleep 10 next set fso=CreateObject("Scripting.FileSystemObject") with fso.opentextfile("c:\2.txt",1,false) 'c:\2.txt是抓的包 data=.readall:.close End with ddd=data socket.SendData ddd WScript.sleep 100 wscript.echo "ok" socket.senddata Chr(13) socket.close |


foxhack
博客统计信息
热门文章
最新评论
友情链接