用WINSOCK发送消息时,如果是循环发送的话,接收方会出现错误,应怎么解决
如以下代码
for i =0 to 10
winsock1.senddata i
doevents
next i
本来接收的数据应该是:0,1,2……10
可实际接收到的是0，12345678910

for i =0 to 10
if i<>0 then
winsock1.senddata i-1
doevents
end if
next i


你的代码不可能有问题啊....我的都没出错....

For i = 1 To portkai
If socksev(i).State <> sckClosed Then
socksev(i).SendData "r_saying" & "';" & gdatas(1) & "';" & gdatas(2)
DoEvents
End If
Next i

看看区别吧....

不,在单机上是可以没问题的,但是如果是两台电脑相连的话就会出现我说的问题

怎么接收的数据呢?

客户端发一次,服务端收一次
sub form load
i=0
end sub
接收段程序如下
dim str as string
dim a(0 to 10) as string
winsock1.getdata str
a(i)=str
i=i+1
if i=10 then i=0

dim str as string
dim a(0 to 10) as string
winsock1.getdata str
a(i)=str
i=i+1

....

dim a(10) as string就行了

这个不是重点啊,效果是一样的
现在问题是这样发收与接收不能达到预想的结果

也用for循環阿```````