Bête question sur Append

Résolu
Ziman Messages postés 245 Date d'inscription dimanche 27 avril 2003 Statut Membre Dernière intervention 26 septembre 2008 - 16 août 2006 à 15:55
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 16 août 2006 à 16:04
Bonjour,

j'ai une bête question en fait ... J'ai ce petit bout de code :

Open "Texte.txt" For Append As #1

    Print #1, Text1.Text

Close #1

Je veux juste ouvrir le fichier et rajouter du texte à la fin, donc je remplis le textbox et pousse sur le bouton déclencheur de ce bout de code mais rien ne se passe ...

Ca doit etre une bete erreur ou un truc du style, mais est-ce que quelqu'un peut me dire laquelle ?

["http://ziman4000.free.fr" www.vb6team.fr.st]

4 réponses

jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
16 août 2006 à 15:59
> 647037 mortalino: pour une fois je t'ai grillé

: Règlement =>:Moteur de recherche
3
jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
16 août 2006 à 15:58
Salut,
Essaie plutot
Open "C:\CHEMIN\Texte.txt" ...

: Règlement=>:Moteur de recherche
0
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
16 août 2006 à 15:58
Salut,

dans Open "Texte.txt" il faut le chemin complet du fichier.

Exemple :

Open "C:\Documents and settings\<nom utilisateur>\Bureau\Texte.txt" For Append As #1

++
0
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
16 août 2006 à 16:04
J'ai pensé à la même chose quand j'ai vu ton message.. ! lol

J'ai un handicap, à chaque fois que j'ouvre un topic, obligé de faire F5 poiur rafraichir, je sais pas pourquoi.

Dès que la chef s'en va, je me met sur l'autre PC ;)

Bonna aprem à toi :)

++

___________________
REPONSE ACCEPTEE |
___________________|
0
Rejoignez-nous