winsock - Simple question

[trisLOGIC]

I made a client/server program and I make use of a delay function which consist of Do Events in order to delay the sending of data to the receipient. So far my program is ok.

But when I want to do concurrent sending between client and server, I found out that the Do Event statememnt will prevent my program to intercept incoming data from the winsock control making the sync between client and server fail. How do I solve this problem ? Is there any other method to delay my data sending using winsock without using the Do Event ?

Thanks

[PRIVATE1]

Why did you need to delay the sending ?

[kurtsimons]

Not sure exactly what you mean but...

after receiving data you must run a DoEvents

sock.getdata strBuffer
doEvents
sock.SendData "whatever"

[Chris]

May be you can use GetTickCount API function in your delay routine like below. So that you can have a flexible delay interval. I did used this in my Winsock data sending program & it work great. Hope it can help you too.

Option Explicit
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private t1 As Long
Private t2 As Long

Private Sub DELAY(ByVal interval As Long)
t1 = GetTickCount
t2 = 0
Do While t2 - t1 < interval
    DoEvents
    t2 = GetTickCount
Loop
End Sub