步骤一:首先要先把控制项给叫出来,你只要按下Ctrl T後选取WinsockControl5.0若是用VB6的就选WinsockControl6.0,这样就可以使用Winsock元件。
步骤二:再来我们必须先确定程式是作Server端还是Client端的,要先设定一些属性:
Server写法:winsock1.localPort=5400(数字可以随便设)
winsock1.Listen(等待连线)
Client写法:winsock1.RemoteHost="对方IP"
winsock1.RemoteProt=5400(必须要和Server端相同)
winsock1.LocalProt=0
winsock1.Connect(连线)
连线之前Client端要先知道Server端的IP,接著等到Server端等待连线时,Client端就可以呼叫Connect方法,双方连线成功後就可以传输资料。
步骤三:当Client连线的时候Server端会引发ConnectionRequest事件,Server的程式要这样子写:
PrivateSubWinsock1_ConnectionRequest...[ 查看全文 ]