Explorer un fichier texte

Yahan Messages postés 37 Date d'inscription jeudi 17 octobre 2002 Statut Membre Dernière intervention 27 octobre 2002 - 17 oct. 2002 à 19:06
otacon67 Messages postés 10 Date d'inscription mardi 15 novembre 2005 Statut Membre Dernière intervention 1 février 2007 - 18 janv. 2007 à 11:45
Salut,

encore moi, ben oui j'ai pas l'aide voir mon autre post.

Je voudrais ouvrir un fichier texte pour y manipuler le texte dans mon appli VB.

Quels sont les functions de bases pour l'ouvrir ?

Merci

Yann ;)

7 réponses

Bricomix Messages postés 340 Date d'inscription vendredi 11 octobre 2002 Statut Membre Dernière intervention 14 février 2005
17 oct. 2002 à 20:27
Pour ouvrir le fichier texte et le mettre dans une variable de type string, il faut faire ça :

dim canal as integer, texte as string
canal = freefile
Open 'file' for input as canal
texte = input$(lof(canal))
close canal

Voila, le string texte contient ce qu'il y avait dans le fichier.

BRICOMIX :-p
0
Yahan Messages postés 37 Date d'inscription jeudi 17 octobre 2002 Statut Membre Dernière intervention 27 octobre 2002
17 oct. 2002 à 23:38
je ne vois pas ma suite, pas grave je repost

donc je disais ke se ne suis pas bien doué la preuve.

Dim canal As Integer
Dim tex As String
canal = FreeFile
Open "d:\temp\t.txt" For Input As canal
tex = Input$(LOF (canal))
là j'ai une erreur comme koi il manque un séparateur de liste
tex = Input$(LOF, (canal))
là c'est argument non facultatif en parlant de lof.

alors ? kes se ke j'ai fait comme conn......

et LOF tant qu'on y est c koi ?

et ce serrat tout pour l'instant :p

Yann

Merci
0
Yahan Messages postés 37 Date d'inscription jeudi 17 octobre 2002 Statut Membre Dernière intervention 27 octobre 2002
17 oct. 2002 à 23:39
je ne vois pas ma suite, pas grave je repost

donc je disais ke se ne suis pas bien doué la preuve.

Dim canal As Integer
Dim tex As String
canal = FreeFile
Open "d:\temp\t.txt" For Input As canal
tex = Input$(LOF (canal))
là j'ai une erreur comme koi il manque un séparateur de liste
tex = Input$(LOF, (canal))
là c'est argument non facultatif en parlant de lof.

alors ? kes se ke j'ai fait comme conn......

et LOF tant qu'on y est c koi ?

et ce serrat tout pour l'instant :p

Yann

Merci
0
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
17 oct. 2002 à 23:50
Dim canal As Integer
Dim tex As String
canal = FreeFile
Open "d:\temp\t.txt" For Input As #canal
tex = Input(LOF(canal), #canal)
LOF Length Of File Longueur du Fichier (en octets)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Yahan Messages postés 37 Date d'inscription jeudi 17 octobre 2002 Statut Membre Dernière intervention 27 octobre 2002
18 oct. 2002 à 00:10
merci merci merci

vous êtes trop fort :p
0
Bricomix Messages postés 340 Date d'inscription vendredi 11 octobre 2002 Statut Membre Dernière intervention 14 février 2005
20 oct. 2002 à 12:09
Ouai c'est ça rene38, j'avais oublié le canal !!!

BRICOMIX :-p
0
otacon67 Messages postés 10 Date d'inscription mardi 15 novembre 2005 Statut Membre Dernière intervention 1 février 2007
18 janv. 2007 à 11:45
slt, je cherche une reponse similaire, mais pour du vc.net, et non du vb.net, certain diront que c'est pareil...malheuresement je ne suis pas sur...si quelqu'un pouvait m'aider please...
0
Rejoignez-nous