fichier aléatoire

Question

Salut a tt,
Idée moi s'il vous plais,
je veux un tuto a propos de fichier aléatoire en vb2008 console application.

Merci d'avance.

ucfoutu · Answer

Bonjour,
Peux-tu s'il te plait préciser ce que tu entends exactement par "fichier aléatoire" 


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

khalidelm · Answer

Bonjour,
ce code est en console application.
Sub enregestrer()
        Dim mavar As stg
        Dim mos As stagaire
        Dim x As Integer = -1
        Dim ff As Integer = FreeFile()
        FileOpen(ff, "mon_fichier_stg.dat", OpenMode.Random, OpenAccess.Write, , Len(mavar))
        For i = 0 To col_stg.Count - 1
            x = x + 1
            mos = col_stg.Item(i)
            With mavar
                .ni = mos.pni
                .nom = mos.pnom
                .prenom = mos.pprenom
                .moy = mos.pmoyenne
            End With
            FilePut(ff, mavar, x)
        Next
        FileClose(ff)
    End Sub
Sub restorer()
        Dim mavar As stg
        Dim mos As stagaire
        Dim x As Integer = 0
        Dim ff As Integer = FreeFile()
        FileOpen(ff, "mon_fichier_stg.dat", OpenMode.Random, OpenAccess.Read, , Len(mavar))
        Do While Not EOF(ff)
            mos = New stagaire
            FileGet(ff, mavar, x)
            With mavar
                mos.pni = .ni
                mos.pnom = .nom
                mos.pprenom = .prenom
                mos.pmoyenne = .moy
                col_stg.Add(mos)
            End With
            x = x + 1
        Loop
        FileClose(ff)
    End Sub

voici mon code, même si le fichier existe, il ne serait pas ouvrir et d'obtenir ce qu'il ya dedans

ucfoutu · Answer

Ah !
Peux-tu s'il te plait préciser ce que tu entends exactement par "fichier aléatoire" 
était la question. Et ton code n'est pas une réponse.
voici mon code, même si le fichier existe, il ne serait pas ouvrir et d'obtenir ce qu'il ya dedans 

traduis, s'il te plait.
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

Fichier aléatoire

3 réponses

Votre réponse

Discussions similaires