一个socket组件及其调用方法
这个socket组件是由开发jmail的那家公司作的。
很老的一个版本了。不过挺好的。我一直在用。
比较稳定。以前发现xmlhttp在win2003 server上不太好。流量大了iis容易当掉。用这个组件倒还算稳定。
paraHost ="www.knowsky.com" ' host
paraPort = 80 ' port
paraFileUrl ="/test/test.htm"
Set Socket = CreateObject("Socket.TCP")
Socket.Host = paraHost & ":" & paraPort
Socket.Timeout = paraTimeout
If Err.Number < 0 Then Err.Clear
Socket.open
' timeout error = 8000ffff
Socket.SendLine "GET " & paraFileUrl & " HTTP/1.0"
...[ 查看全文 ]
2016-01-29
标签:
