VB winsock传递数据问题
我用VB winsock做了一个传递CMD命令的软件，为什么发送端发送的数据和接收端接收到的数据不一样啊？（本机测试）比如我在发送端发送了一个命令"dir c:\ "为什么接收端接收到的数据却是乱码？
发送端代码：
Private Sub Command1_Click()
For i = 0 To F1.serversk.UBound '查找将接收数据的IP。
If F1.serversk(i).RemoteHostIP = S Then ’S为一个IP字符串，前面代码得到的IP
F1.serversk(i).SendData Text2.Text
End If
Next i
End Sub
接收端代码：
Private Sub Wk_DataArrival(ByVal bytesTotal As Long)
Dim datas, pdi
Dim hpro, tet As String
Wk.GetData datas
MsgBox datas ’就这个msgbox显示出来的消息，怎么会是乱码呢？请各位帮忙。谢谢
pdi = Shell("cmd.exe /c " & datas & " >> c:\1.txt", vbHide)
hpro = OpenProcess(PROCESS_ALL_ACCESS, False, pdi)
here:
If hpro <> 0 Then’如果HPRO=0则表示shell调用的命令已经执行完成。
GoTo here:
Else
'读取1.txt内的内容
Open App.Path & "\1.txt" For Input As #2
Do While Not EOF(2)
Line Input #2, tet
Wk.SendData tet
Loop
Close #2
Kill App.Path & "\1.txt"
End If
End Sub
用psexec就行了。
http://www.google.cn/search?hl=zh-CN&newwindow=1&q=psexec%E7%94%A8%E6%B3%95&aq=3&oq=psexec
相关问答：
一个查询某信息的ASP网页，提交采用的是post方法，查找结果的网页必须右键点击“查看源文件”才能看到真正查询结果网页的源代码，用浏览器菜单看到的是查询前的源代码
用VB有什么办法可以获取到这个查询后的源代� ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
"insert into user1(name,age) values('" & Text1.Text & "','" & Text2.Text & "' )"
问题：对sql语句中单、双引号模糊。既然 Text1.Text就表示 ......
再VB模块中我是通过如下方式来连接主库和历史库的(历史库数据量大)
VB code:
Public Connstr As String
Public objConn As New ADODB.Connection
Public ConnHISstr As String
Public objConnHIS As New A ......
vb将winsock控件封装到dll问题 有什么好的思路？ 如果用Socket API呢？
例如，像下面这样封装Winsock控件，行的通？
创建ActiveX dll，添加窗体frmClient，加入WinSock控件wskClient。
类代码：
Option Expli ......
