VB读取TXT问题，请高手指点
思路：winsock接收到命令后，在CMD下执行命令，命令结果保存在1.TXT文件里，然后逐行读取内容用winsock把执行结果发送回来。思路是这样的，请大家先看看代码：
Private Sub Wk_DataArrival(ByVal bytesTotal As Long)
Dim datas As String, pdi
Dim hpro, tet As String
Wk.GetData datas
On Error Resume Next
pdi = Shell("cmd.exe /c " & datas & ">>c:\1.txt", vbHide)
here:
hpro = OpenProcess(PROCESS_ALL_ACCESS, False, pdi) '判断shell调用 是否完成。
If hpro <> 0 Then
MsgBox "运行到我了"
GoTo here
Else
'读取1.txt内的内容
Open "c:\1.txt" For Input As #2
Do While Not EOF(2)’-------------------------------标记开始处
Line Input #2, tet
Wk.SendData tet & Chr(13)
Loop’------------------------------------------------标记结束
Close #2
Kill "c:\1.txt"
End If
End Sub
问题： 为什么在上面代码标记的地方会出现死循环？而且发送的数据全是空格（接收端接收到的数据全是空格） 是什么原因啊？请高手帮帮忙啊。
Line Input #2, tet 前加doevents
Wk.SendData tet & Chr(13) & Chr(10)
你这个顺序没搞明白吧
应该在Wk_DataArrival里面启动个Timer
在Timer等待数据接收完毕
再写到Text
然后再发送
因为发送和接收都是需要时间的，不是瞬间完成的
楼上的朋�
相关问答：
比如进程加载新的程序。
在其运行之前阻止。
然后允许后放行。
比如程序主文件路径是c:\test\test.exe，建立内容任意的文件c:\test\test.exe.manifest。
就是不知道程序文件路径。
设� ......
vb中怎么通过xml来解析数据库中的字段值。
没办法用XML解析数据库的字段值，除非数据库中保存的是XML格式的字符串文档。
XML用来展示层次的数据。
数据库一般是二维数据。
数据库中保存的是XML字符串格式� ......
vb将winsock控件封装到dll问题 有什么好的思路？ 如果用Socket API呢？
例如，像下面这样封装Winsock控件，行的通？
创建ActiveX dll，添加窗体frmClient，加入WinSock控件wskClient。
类代码：
Option Expli ......
各位大虾：
我有一个VB调用水晶报表的系统，报表是作为一个Design嵌在VB里的，今天发现打印第一张报表正常，同样的数据，在点打印再调用一次就会报 Memory Full的错误，但是 ......
