VB.NET COmment envoyer un fichier dans une socket ??
2 réponses
fdiedler
Bonjour, je voudrais envoyer tt type de fichiers (image, son, texte ... )
dans une socket mais je ne sias pas du tout comment faire !!!
SI quelqu'un peut m'aider ...
Merci bcp
PS: Mon application est un tchat server/client asynchrome
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Vko
Un truc dans le genre ?
System.IO.FileStream file = new System.IO.FileStream("image.jpg", System.IO.FileMode.Open); System.IO.BinaryReader reader = new System.IO.BinaryReader(file);
byte[] temp = new byte[file.Length]; reader.Read(temp, file.Length, 0); reader.Close();
mySocket.Send (temp);
"fdiedler" wrote:
Bonjour, je voudrais envoyer tt type de fichiers (image, son, texte ... ) dans une socket mais je ne sias pas du tout comment faire !!! SI quelqu'un peut m'aider ...
Merci bcp
PS: Mon application est un tchat server/client asynchrome
Un truc dans le genre ?
System.IO.FileStream file = new System.IO.FileStream("image.jpg",
System.IO.FileMode.Open);
System.IO.BinaryReader reader = new System.IO.BinaryReader(file);
byte[] temp = new byte[file.Length];
reader.Read(temp, file.Length, 0);
reader.Close();
mySocket.Send (temp);
"fdiedler" wrote:
Bonjour, je voudrais envoyer tt type de fichiers (image, son, texte ... )
dans une socket mais je ne sias pas du tout comment faire !!!
SI quelqu'un peut m'aider ...
Merci bcp
PS: Mon application est un tchat server/client asynchrome
System.IO.FileStream file = new System.IO.FileStream("image.jpg", System.IO.FileMode.Open); System.IO.BinaryReader reader = new System.IO.BinaryReader(file);
byte[] temp = new byte[file.Length]; reader.Read(temp, file.Length, 0); reader.Close();
mySocket.Send (temp);
"fdiedler" wrote:
Bonjour, je voudrais envoyer tt type de fichiers (image, son, texte ... ) dans une socket mais je ne sias pas du tout comment faire !!! SI quelqu'un peut m'aider ...
Merci bcp
PS: Mon application est un tchat server/client asynchrome
fdiedler
Merci, pour l'envoie c'est bon mais c'est lors de la reception que ca plante : J'arrive pas a affecter au buffer la taille du fichier ...
Code pour envoie :
Public Sub ChargeFichier(ByVal fichier As String) Dim s As FileStream Dim file As FileInfo Dim bufferfichier As Byte()
file = New FileInfo(fichier) If file.Length < 2000000 Then ' lecture des octets du fichier ReDim bufferfichier(CInt(file.Length)) s = New FileStream(fichier, FileMode.Open, FileAccess.Read) s.Read(bufferfichier, 0, CInt(file.Length)) s.Close() ' stockage du nom du fichier Else Throw New Exception("Le fichier transféré ne doit pas dépasser 2 Mo.") End If End Sub
Merci bcp !
Merci, pour l'envoie c'est bon mais c'est lors de la reception que ca plante
: J'arrive pas a affecter au buffer la taille du fichier ...
Code pour envoie :
Public Sub ChargeFichier(ByVal fichier As String)
Dim s As FileStream
Dim file As FileInfo
Dim bufferfichier As Byte()
file = New FileInfo(fichier)
If file.Length < 2000000 Then
' lecture des octets du fichier
ReDim bufferfichier(CInt(file.Length))
s = New FileStream(fichier, FileMode.Open, FileAccess.Read)
s.Read(bufferfichier, 0, CInt(file.Length))
s.Close()
' stockage du nom du fichier
Else
Throw New Exception("Le fichier transféré ne doit pas dépasser 2
Mo.")
End If
End Sub
Merci, pour l'envoie c'est bon mais c'est lors de la reception que ca plante : J'arrive pas a affecter au buffer la taille du fichier ...
Code pour envoie :
Public Sub ChargeFichier(ByVal fichier As String) Dim s As FileStream Dim file As FileInfo Dim bufferfichier As Byte()
file = New FileInfo(fichier) If file.Length < 2000000 Then ' lecture des octets du fichier ReDim bufferfichier(CInt(file.Length)) s = New FileStream(fichier, FileMode.Open, FileAccess.Read) s.Read(bufferfichier, 0, CInt(file.Length)) s.Close() ' stockage du nom du fichier Else Throw New Exception("Le fichier transféré ne doit pas dépasser 2 Mo.") End If End Sub