Ouverture fermeture fichier texte
Contenu du snippet
bon un petit didacticiel pour fermer et ouvrir un fichie en mode texte aveco utpt et pas en mde sequenciel
Source / Exemple :
dim rep as string
rep=inputbox("entrez le nom du fichier à sauvegarder")
open"c:\" & rep for output as #1
print #1,text1.text
close #1
====
votre texte est tape dans un text box
une boite de dialogue vous demande le nom du fichier à sauvegarder avec l'extension ex:monfichier.txt
=====
ouverture du fichier dans un textbox
dim rep as string
rep=inputbox("entrer le fichier à afficher.")
open "c:\" & rep for input as #1
text1.text=input (lof(1),1)
close #1
voila j'utilise lof car je ne connais pas la longueru du fichier
la prochaine fois ce sera avec append
ouverture du fichier
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.