各位大虾,我写个DLL扩展库,用到了winsock控件,请问如果在DLL里写winsock的收发数据的方法呀?急!帮者有分.

Question

这是我写的,我想写来给ASP调用的.我只能写到这里了,得到IP与端口,但发送数据与接收数据在DLL里不知道如何写呀.望各位大虾帮我一把,非常感谢.
Option Explicit
Dim mywinsock As Winsock
Dim myHost, myPort
Public Property Get getHost() As Variant
   getHost = myHost
End Property
Public Property Let getHost(ByVal vNewValue As Variant)
   myHost = vNewValue
End Property
Public Property Get getPort() As Variant
   getPort = myPort
End Property
Public Property Let getPort(ByVal vNewValue As Variant)
   myPort = vNewValue
End Property
Public Function toGetValue()
   mywinsock.RemoteHost = myHost
   mywinsock.RemotePort = myPort
   mywinsock.Connect
End Function

Answer 1

Dim WithEvents mywinsock As WinsockPrivate Sub mywinsock_DataArrival(ByVal bytesTotal As Long)End Sub

Answer 2

谢谢!!
但mywinsock_DataArrival这个事件如何触发呀?