目前在編寫一個通過TCP協議給server發送特定消息的小程序。
發送代碼如下:
msglog=vbslogFile.ReadLine
dim sock
'賦值sock變量為WINSOCK的對象
set sock=Wscript.createobject("MSWINsock.Winsock")
'設置SOCK的連接方式為 TCP
'WINSOCK的Protocol屬性中 0 表示TCP,1 表示 UDP
sock.Protocol=0
sock.Connect remoteHost,remotePort
wscript.sleep 1
sock.senddata msglog
在運行過程中遇到如下錯誤:
電腦是64位機器Win7,已經將mswinsck.ocx放在了c:\Windows\SysWOW64下,並在cmd中使用regsvr32 C:\Windows\SysWOW64\mswinsck.ocx注冊成功。
求解!!!
問題已經解決:
在64位系統調用32位的控件做了轉換。
詳細的可以查看Demon's Blog » 程序設計 » 64位系統VBS調用32位COM組件
http://demon.tw/programming/64bit-vbs-32bit-com.html