用VB学做“黑客”程式
只要掌握了原理,你也能写出一个所谓的“黑客”程式。下面笔者带领大家用VB亲自编写一个远端控制程式。从而揭开它的神秘面纱。
一、所用控制项
在程式中将使用Winsock控制项。Winsock控制项是一个ActiveX控制项,使用TCP协定或UDP协
议连接到远端电脑上并与之交换资料。和计时器控制项一样,Winsock控制项在运行时是不可见的。Winsock的工作原理是:用户端向伺服器端发出连接请求,伺服器端则不停地监听用户端的请求,当两者的协定沟通时,用户端和伺服器端之间就建立了连接,这时用户端和伺服器端就可以实现双向资料传输。实际编程中,必须分别建立一个伺服器端应用程式和一个用户端应用程式,两个应用程式中分别有自己的Winsock控制项。首先设置Winsock控制项使用的协定,这里我们使用TCP协定。现在,让我们开始用VB建立两个程式,一个是用户端程式myclient,另一个是伺服器端程式myserver。
二、编写用户端程式
首先来建用户端程式myclient。在myclient程式中建立一个表单,载入Winsock控制项,称为tcpclient,表示使用的是TCP协议,再加入两个文本框(text1和text2),用来输入伺服器的IP位址和埠号,然后建立一个按钮(cd1),用来建立连接,按下之后就可以对连接进行初始化了,代码如下: private sub cd1_click()
tcpclient.romotehost=text1.text
tcpclient.romoteport=val(text2.text)'埠号,缺省为1001
tcpclient.connect '调用connect方法,与指定IP位址的电脑进行连接
cd1.enabled=false
end sub
听了雾煞煞
应该要付上范例
不要复制贴上喔!!!
就我看了
连程式工程师也不见得听得懂