用VisualBasic学做“黑客”程序
首先,使用的控制
Winsock控件将在程序中使用。Winsock控件是一个ActiveX控件,它使用TCP或UDP协议连接到远程计算机并与之交换数据。像计时器控件一样,Winsock控件在运行时是不可见的。Winsock的工作原理是:客户端向服务器发送连接请求,服务器一直监听客户端的请求。当两种协议进行通信时,客户端和服务器之间的连接就建立了,然后就可以实现双向数据传输了。在实践中,必须分别建立服务器端应用程序和客户端应用程序,每个应用程序都有自己的Winsock控件。首先,设置Winsock控件使用的协议,这里我们使用TCP协议。现在,我们开始用VB构建两个程序,一个是客户端程序myclient,一个是服务器程序myserver。
其次,编写客户端程序
首先,构建客户机程序myclient。在myclient程序中设置一个窗体,加载Winsock控件,名为tcpclient,意思是使用TCP协议。添加两个文本框(text1和text2)输入服务器的IP地址和端口号,然后设置一个按钮(cd1)建立连接。按下后,可以初始化连接。代码如下:
私有子cd1_click()
TCP client . romote host = text 1 . text
TCP client . romoteport = val(text 2 . text)' '端口号,默认为1001。
Tcp.connect“”调用connect方法与具有指定IP地址的计算机连接。
cd1.enabled=false
末端接头
之后就是如何处理接收到的数据的问题。客户端与服务器建立连接后,如果任意一端接收到新的数据,就会触发该端winsock控件的dataarrival事件。作为对此事件的响应,您可以使用getdata方法来获取发送的数据。例如,可以在tcpclient的dataarrival事件中编写以下代码:
Private Sub TCP Client _ data arrival(Byval bytestotal as long)
将x标注为字符串
Tcpclient.getdata x ' '使用getdata获取发送的数据。
.......
末端接头
后面省略的部分表示接收数据的具体处理,读者可以根据实际情况来写。
位律师回复
0条评论