Bonjour à tous,

J'ai réussi à ouvrir un fichier texte fourni par un prof contenant des noms de villes et leurs populations respectives grâce au code suivant:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim VP As VILPOP
        Dim I, NB As Integer
        I = 1
        NB = FileLen("C:\Documents and Settings\iga\Bureau\Communes.txt") / 30
        MsgBox(CStr(NB))
        FileOpen(3, "C:\Documents and Settings\iga\Bureau\Communes.txt", OpenMode.Random, , , 30)
        Do While I <= 3
            FileGet(3, VP, I)
            TVP(I) = VP
            MsgBox(VP.Nom)
            MsgBox(VP.Pop)
            I = I + 1
        Loop
        NBVP = 3
    End Sub
L'ennui c'est que nous devons créer propre fichier texte et j'ignore comment le prof s'y est pris.

Voici le fichier texte en question, tiré du Bloc-notes:

Amberieu-en-Bugey Ú( Bellegarde-sur-Valserine ‘+ Bourg-en-Bresse * Oyonnax C] Chateau-Thierry Ë;


Quelqu'un sait il comment créer un tel fichier texte? Je rappelle que le fichier contient uniquement des noms de villes ainsi que leurs populations.

Merci d'avance pour vos réponses