OpenFile()

Syntaxe

Resultat = OpenFile(#Fichier, NomFichier$)

Ouvre le fichier NomFichier$ ou en crée un nouveau sous ce nom s'il n'existe pas. Si #PB_Any est utilisé pour le paramètre '#Fichier', le numéro du nouveau fichier sera renvoyé dans 'Resultat'. Vous pouvez ensuite lire et/ou écrire des informations dans ce fichier. Si Resultat est différent de 0, l'ouverture du fichier a réussi, sinon, le fichier n'a pu être ouvert. 'Resultat' doit toujours être testé car la manipulation d'un fichier non créé peut occasionner un plantage sérieux.

Pour ajouter des données à la fin d'un fichier existant il faut au préalable positionner le pointeur de lecture/écriture. Dans l'exemple qui suit les commandes FileSeek() et Lof() sont utilisées après OpenFile():

  If OpenFile(0, "Test.txt")    ; Ouvre un fichier existant ou en crée un nouveau s'il n'existait pas
    FileSeek(0, Lof(0))         ; Place le pointeur à la fin du fichier en utilisant le résultat de Lof() 
    WriteStringN(0, "... une autre ligne à la fin du fichier.")
    CloseFile(0)
  EndIf

Note: pour que l'ouverture du fichier avec OpenFile() soit un succès, le fichier doit avoir les droits en lecture et écriture. Ceci peut devenir un problème si il faut manipuler des fichiers sur un CD-Rom par exemple. Dans ce cas, il convient d'utiliser ReadFile() quand seule la lecture du fichier est nécessaire.

OS Supportés

Tous