Título: Tiempo de espera Publicado por: Kizar en 16 Octubre 2005, 16:21 pm Hola, estoy acabando un programa para el envio de archivos y cada vez que envia una parte de archivo espera a que el servidor lo haya recibido para que manda la segunda.
Este es el codigo que he hecho para que espere: Código: Sub Spera() Este codigo lee el archivo, y lo manda por trozos esperando en cada trozo. Código: Dim Buffer as string * 1024 Este codigo en el server envia NEXT para que envie la siguiente parte: Código: Private Sub Winsock_file_DataArrival(ByVal bytesTotal As Long) en el data arribal del cliente compruebla si a llegado y tiene k mandar la siguiente Código: Private Sub Winsock_menu_DataArrival(Index As Integer, ByVal bytesTotal As Long) Alguien podria provar el code y decir donde da error, a mi no me da ningun error, pero no hace lo k tendria k acer, creo k el server no manda el NEXT y el cliente no espera, lo manda todo seguido...No se Ayuda please Salu2 PD: Polux, me gustaria k le echaras una ojeada a este post si no es mucha molestia ;) http://foro.elhacker.net/index.php/topic,90656.0.html Título: Re: Tiempo de espera Publicado por: NYlOn en 16 Octubre 2005, 19:06 pm La funcion Spera no me funciona :S Me da error de Overflow en esta linea:
Código: snTime = Timer Si cambio Dim snTime As Integer por Dim snTime As Long no me tira error, pero no espera nada :S... se supone q tiene q esperar 5 segundos no ?? Aca te dejo una sub q hace una especia de Pausa en el programa: Código: Sub Espera(Segundos As Single) Para mi el problema es ahi (que la sub Spera no funciona) Un saludo ! Título: Re: Tiempo de espera Publicado por: Kizar en 16 Octubre 2005, 19:39 pm yo no quiero k el programa espere x segundos, lo k quiero es k espere a k el cliente le mande una respuesta y si pasan 5 segundos y no ha recibido nada pues k cancele el envio.
Salu2 Título: Re: Tiempo de espera Publicado por: yeikos en 16 Octubre 2005, 20:36 pm Dexonline, la función que puso NYlOn es lo que tú necesitas, lo ejecutas con un parámetro de 5 segundos que haga la comprobación de si ha recivido datos y si no pues cancela el envio.
|