Envoyer des fichier

zapmy Messages postés 2 Date d'inscription samedi 21 août 2004 Statut Membre Dernière intervention 18 juillet 2005 - 18 juil. 2005 à 01:28
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 19 juil. 2005 à 00:43
Voila jai créer un bloc mais je voudrai il assosier une fonction pour que lon puisse envoyer les fichier (loriginal et le double)
en sachan que jutilise des textbox

Source
-------
Private Sub Command1_Click()
Open "C:\sa1.txt" For Output As #1
Write #1, Text1
Close #1
Open "C:\sa2.bck" For Output As #1
Write #1, Text2
Close #1
End
End Sub


Private Sub Command2_Click()
End
End Sub


Private Sub Form_Load()


End Sub

4 réponses

jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 27
18 juil. 2005 à 13:49
Bonjour,

Que veux-tu dire par envoyer les fichiers ??, Les lires dans des textBox?? Explique un peu

jpleroisse
0
cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 9
18 juil. 2005 à 13:57
C'est plutôt obscure comme question ...


E.B.
0
zapmy Messages postés 2 Date d'inscription samedi 21 août 2004 Statut Membre Dernière intervention 18 juillet 2005
18 juil. 2005 à 14:09
Bon vu que jai mal formuler ma question je voudrais que le fichier sa1.txt et sa2.bck me soit envoyer sur un ftp ou par email (ou autre) pour que je puisse les ouvrir sur mon pc
0
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 27
19 juil. 2005 à 00:43
Bonsoir,

Je ne sais pas si mon explication te conviendras, mais personnelement,
lorsque je reçois un e-mail avec un fichier texte comme pièce jointe,
quand je fais télécharger le fichier et que la boîte de dialogue
Enregistrer-sous s'ouvre, je copie le fichier dans le répertoire ou le
dossier que je veux. Ensuite si je veux le visualiser dans un TextBox,
je fais la procédure Open "le chemin du fichier" For Input As #1
ect......



jpleroisse
0