ENVOYER UNE IMAGE PAR WINSOCK

Messages postés
368
Date d'inscription
dimanche 24 juin 2001
Statut
Membre
Dernière intervention
7 décembre 2015
- - Dernière réponse : roxane101
Messages postés
28
Date d'inscription
vendredi 12 mai 2006
Statut
Membre
Dernière intervention
26 décembre 2006
- 25 juil. 2006 à 12:19
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/6791-envoyer-une-image-par-winsock

Afficher la suite 
roxane101
Messages postés
28
Date d'inscription
vendredi 12 mai 2006
Statut
Membre
Dernière intervention
26 décembre 2006
-
bonjour
merci pour l'explication
cs_max12
Messages postés
1491
Date d'inscription
dimanche 19 novembre 2000
Statut
Modérateur
Dernière intervention
7 juillet 2014
-
Lorsque le serveur répond qu'il est prêt pour la transmition le client ouvre le fichier et le met dans la mémoire, par la suite il envoie le contenu du fichier qui se trouve dans la variable Texte.

A+
roxane101
Messages postés
28
Date d'inscription
vendredi 12 mai 2006
Statut
Membre
Dernière intervention
26 décembre 2006
-
Bonjour,
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.
cs_pepekiss
Messages postés
24
Date d'inscription
samedi 17 avril 2004
Statut
Membre
Dernière intervention
14 février 2005
-
vraiment un grand merci à toi max12, depuis le temp que je cherchais cela. 10/10
ICIoBRa
Messages postés
368
Date d'inscription
dimanche 24 juin 2001
Statut
Membre
Dernière intervention
7 décembre 2015
-
Ca Yé jé enfin réussi ! :]
Merci pour lèd'