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
然后再发送
因为发送和接收都是需要时间的，不是瞬间完成的
楼上的朋�
相关问答：
我有厂家做的ASP的监控录像（DVR）的局域网播放的源程序与控件，想要用ASP.net做一个视频回放的程序（利用他的控件）但不知如下去做，望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
vb将winsock控件封装到dll问题 有什么好的思路？ 如果用Socket API呢？
例如，像下面这样封装Winsock控件，行的通？
创建ActiveX dll，添加窗体frmClient，加入WinSock控件wskClient。
类代码：
Option Expli ......
看了一些VB ini文件写入读取的方法 但是还是不知道怎么写，上面写了很长 很多，但是我不知道怎么用，我想问一下怎样写才能实现在TEXT1中写字，然后点Command1提交，然后TEXT1里面的数字就写进INI里面[Section]的Key1 ......
