Ouverture fermeture fichier texte

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 022 fois - Téléchargée 44 fois

Commenter

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

A voir également

Ajouter un commentaire Commentaires
cs_bibs Messages postés 11 Date d'inscription mardi 9 juillet 2002 Statut Membre Dernière intervention 20 septembre 2002
31 juil. 2002 à 13:00
c'est vrai j'ai pas pense au fichier qui peuvent faire 1 mo.
une boucle utiliséavec un buffer est plus pratique.
la prochaine fois j'y penserais lol
druggedsephiroth Messages postés 71 Date d'inscription samedi 18 mai 2002 Statut Membre Dernière intervention 19 juin 2003
30 juil. 2002 à 23:55
Pour la boucle je te conseille plutot ca:
while not eof(1)
line input #1,buffer
text1.text = text1.text & buffer
wend

Ca t'évitera de tout surcharger en mémoire...
cs_babboss Messages postés 121 Date d'inscription vendredi 27 octobre 2000 Statut Membre Dernière intervention 29 novembre 2006
30 juil. 2002 à 21:01
pas tres optimiser come code car si le fichier text fais 1 mo il le met tout en memoire du devrais plutot faire une boucle ki prend 1000 octets par 1000 octets
sinon pour un debutant sa peut servir
@++
S'inscrire maintenant

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.

Du même auteur (cs_bibs)