为什么服务器端接受信息后给客户段发送的是空信息?为什么不能发送信息?k.GetData kstr, , bytesTotal
MsgBox kstr, , "kehu"得到是什么都没~空的!不知道怎么会事?
如果服务器段程序上面加上msgbox"!"的话,能给客户段发送数据
msgbox "!" '如果加上这个,能发出去!如不加,什么都没?
If f(Index).State = 7 Then
f(Index).SendData "给客户发·"
'msgBox "00" & Index
End If
高手指点!
MsgBox kstr, , "kehu"得到是什么都没~空的!不知道怎么会事?
如果服务器段程序上面加上msgbox"!"的话,能给客户段发送数据
msgbox "!" '如果加上这个,能发出去!如不加,什么都没?
If f(Index).State = 7 Then
f(Index).SendData "给客户发·"
'msgBox "00" & Index
End If
高手指点!
f(Index).SendData "给客户发·"
doevents
End If
用doevents就好了