Pliz!!!! Envoie et reception de fichier.txt par Winsock
nycoss
Messages postés86Date d'inscriptionlundi 17 novembre 2003StatutMembreDernière intervention 9 mars 2006
-
12 déc. 2004 à 15:45
anispirine
Messages postés9Date d'inscriptionjeudi 22 septembre 2005StatutMembreDernière intervention25 novembre 2005
-
22 sept. 2005 à 04:22
Salut a tous,je suis en train de créer un voleur d'archive de conversation MSN messenger et je cherche depuis maintenant 7jour 4heures et 37 minute une sourçe pour envoyer et reçevoir un simple fichier text par winsock. j'ai deja chercher sur ce site mais toutes les sourçes que j'ai trouver sont inexploitables, puis y a plein d'indications pour la taille du fichier et pour la progressbar, moi j'ai pas besoin de tout ça, j'ai juste besoin de la façon la plus simple possible de transferer un fichier text par WINSOCK et fiable a 247% . Merci d'avançe les amis :)
A voir également:
Pliz!!!! Envoie et reception de fichier.txt par Winsock
CsM Skate
Messages postés60Date d'inscriptiondimanche 8 mai 2005StatutMembreDernière intervention20 mai 2007 8 juin 2005 à 19:21
Salut à vous, pour vb6fr.dll et autre c'est tout con, 2solutions :
- Créer un SFX via Winrar
- Utliser l'éditeur de ressources VB (avec un bout de code que vous pouvez trouver sur VBFrance)
Voila, je c'est pas bien expliqué mais c'est vraiment un jeu d'enfant.
Byye
nycoss
Messages postés86Date d'inscriptionlundi 17 novembre 2003StatutMembreDernière intervention 9 mars 2006 8 juin 2005 à 20:04
j'en est fait un mieu, mais j'ai pas eu le droit de le mettre sur se site, mais celui que j'ai fait recament marche trés bien, on peu voir la liste des conversation et les telecharger comme on veu, et le serveur peu envoyer son adresse IP sur un serveur WEB par FTP pour que le client puisse le recuperer par HTTP. et designement parlant il est bon
CsM Skate
Messages postés60Date d'inscriptiondimanche 8 mai 2005StatutMembreDernière intervention20 mai 2007 8 juin 2005 à 22:20
Ouais franchment bien !
Moi je cherche un truk pouvant réqupérer l'arborésence de la machine distante, pour ajouter à mon prog, si tu veu le tester ajoute moi sur msn
morbac99
Messages postés7Date d'inscriptionlundi 11 octobre 2004StatutMembreDernière intervention20 juillet 2005 16 juil. 2005 à 14:01
bonjour je suis debutant en evb et je cherche a envoyer et recevoir automatiquement toutes les xxx secondes un txt d'un autre pda et cela avec plus de deux pda sachant que tous envoient et recoivent ce fichier txt.
merci de votre reponse
nycoss
Messages postés86Date d'inscriptionlundi 17 novembre 2003StatutMembreDernière intervention 9 mars 2006 17 juil. 2005 à 12:45
eh bien en VB pour envoyer un fichier text entre deux ordinateur, on utilise le controle winsock (WINSCK.OCX). pour commencer on ouvre le fichier, on le decoupe en plusieur petite partie et on l'envoi a l'autre ordinateur mais ça ne sert a rien que je te mete un code parceque il est certain que avec un PDA c'est completement diferent. il doit y avoir un controle specialement conçu pour les transfer de donné sur PDA, rensegne toi sur MSDN ou sur le WEB
morbac99
Messages postés7Date d'inscriptionlundi 11 octobre 2004StatutMembreDernière intervention20 juillet 2005 17 juil. 2005 à 13:09
on utilise winsock aussi peux tu me mettre un code detaille si possible pour que je puisse le retranscrir en evb la seule difference c'est qu'il y a certaine commande en moins mais pas winsock
nycoss
Messages postés86Date d'inscriptionlundi 17 novembre 2003StatutMembreDernière intervention 9 mars 2006 17 juil. 2005 à 13:13
Un PDA se branche sur un ordinateur par USB , il ne posséde donc pas d'adresse IP et n'est pas pris en charge par le protocole TCP/IP, il n'est donc pas possible d'utiliser Winsock pour PDA, sa parait logique, tu est sur et certain qu'on utilise Winsock?
morbac99
Messages postés7Date d'inscriptionlundi 11 octobre 2004StatutMembreDernière intervention20 juillet 2005 17 juil. 2005 à 13:32
actuellement j'arrive a faire les lignes qui suivent mais ce n'est pas le top ca marche comme serveur mais pas pour un envoi auto au client d'un petit txt
Option Explicit
Private Sub BOU_Repondre_Click()
Dim wBuffer As String
wBuffer = InputBox("Veuillez saisir la réponse.", "Réponse")
If wBuffer <> "" Then Call WinSock1.SendData(wBuffer)
End Sub
Private Sub Form_Load()
End Sub
Private Sub Form_OKClick()
Call WinSock1.Close
Call App.End
End Sub
Private Sub Form_Resize()
List1.Left = ScaleX(1, vbPixels, vbTwips)
List1.Width = Width - ScaleX(2, vbPixels, vbTwips)
BOU_Repondre.Left = List1.Left
End Sub
Private Sub Timer1_Timer()
Timer1.Enabled = False
WinSock1.RemoteHost = WinSock1.LocalHostName
WinSock1.LocalPort = 8000
Call WinSock1.Listen
End Sub
Private Sub WinSock1_Close()
Caption = "Serveur"
Call List1.Clear
BOU_Repondre.Enabled = False
End Sub
Private Sub WinSock1_ConnectionRequest()
Call WinSock1.Accept
BOU_Repondre.Enabled = True
Caption = "Serveur (connecté)"
End Sub
Private Sub WinSock1_DataArrival(ByVal bytesTotal As Long)
Dim wBuffer As String
Call WinSock1.GetData(wBuffer)
Call List1.AddItem(wBuffer)
End Sub
Private Sub WinSock1_Error(ByVal number As Long, ByVal description As String)
End Sub