[VB5] |Lecture du contenu d'un fichier .TXRT|

Bonjour à tous,

Dans mon app, avec l'erreur 53, j'arrive à savoir si un fichier existe ou pas !

Maintenant, comme c'est un fichier texte, le contenu est facilement effaçable, aussi, qq pourrait me dirte comment faire un test concernant le contenu du fichier ?

J'ai bien la lecture avec "Open" mais je ne vois pas comment m'en servir pour ce test.

Merci d'avance.

Cordialement, JLB59

Mets ton code pour lire le txt, on te dira comment faire... ;)
Tu as une foultitude d'exemples de lecture d'un txt sur le forum. Un peu de recherche et tu trouveras ça.

A+

Tiens un exemple inspiré d'un code donné par bbil, trouvé avec les mots clés "Texte & input" sur le forum

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim TextLine dim f as integer, ok as boolean f = freefile Open "FICHTEST" For Input As #f ' Ouvre le fichier. Do While Not EOF(f) ' Effectue la boucle jusqu'à la fin du fichier. Line Input #f, TextLine ' Lit la ligne dans la variable. ok = trim(TextLine) <> "" and trim(TextLine) <> vbcr ' ok si TextLine est renseigné if ok then exit do Loop if not ok then msgbox "Le fichier est vide" Close #f ' Ferme le fichier.

---

Pas testé
Tu veux bien tester pour moi...

Tu dis

A+