关于用winsock传字符串时，丢包的问题
我用winsock传数据总是会少几条数据，是为什么啊
rs1.Open "select * from data_hdgl where 运单编号= ' " & Temp1 & " ' ", AnalyzeConn, 1, 3
If rs1.RecordCount <> 0 Then
while not rs1.eof
For FieldNum = 1 To rs1.Fields.Count - 5
TempStr = TempStr & Encode(FixNull(rs1(FieldNum))) & Chr(3)
Next
Wsk(wskIndex).SendData "searchresult " & Chr(2) & Encode(tType) & Chr(2) & TempStr & Chr(2) & Encode( "回单信息 ") & Chr(2) & Temp1 & Chr(2) & Chr(8)
TempStr = " "
rs1.movenext
wend
End If
rs1.Close
[解决办法]
while循环中增加doevents
