Ce code est en réponse avec une question posé sur le forum, il est possible de l'améliorer avec des tableaux (Moin de RAM) et une boucle (Pour les GROS fichiers)
Source / Exemple :
'Winsock1.SendData "GET zip_for_source HTTP/1.0"
Conclusion :
New site => www.psycomaxter.fr.st
25 juil. 2006 à 12:19
merci pour l'explication
25 juil. 2006 à 04:06
A+
21 juil. 2006 à 14:32
Merci pour le code, mais il y a des methodes que j'ai pas bien compri son rôle.
veuillez s'il vous plaît me donner une ptite explication pour les lignes de cette procedure.
Private Sub WinClient_DataArrival(ByVal bytesTotal As Long)
Dim cData As String
WinClient.GetData cData
If cData Like "*READY*" Then
Dim Texte As String
cAvance = 0
Open App.Path & "\temp.bmp" For Binary Access Read As #1
Texte = Space(LOF(1))
Get 1, , Texte
Close #1
WinClient.SendData Texte
End If
End Sub
Merci encore.
30 nov. 2004 à 22:07
21 avril 2003 à 19:43
Merci pour lèd'
+²
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.