CreateFile()

Syntaxe

Resultat = CreateFile(#Fichier, NomFichier$)

Crée un fichier vide. Si #PB_Any est utilisé pour le paramètre '#Fichier', le numéro du nouveau fichier sera renvoyé dans 'Resultat'. Si le fichier existe déjà, il est ouvert et devient vide! Cette fonction doit donc être manipulée avec prudence. #Fichier est le numéro de fichier qui doit être unique à ce fichier. NomFichier$ est le nom du fichier. Si Resultat est différent de 0, le fichier est créé, sinon, la création a échoué. 'Resultat' doit toujours être testé car la manipulation d'un fichier non créé peut occasionner un plantage sérieux.

Exemple:

  If CreateFile(0, "Text.txt")         ; création d'un nouveau fichier texte...
    For a=1 To 10
      WriteStringN(0, "Ligne "+Str(a))  ; écriture de 10 lignes (suivies du code 'Fin de Ligne')
    Next
    For a=1 To 10
      WriteString(0, "Chaîne"+Str(a))  ; ajoute 10 chaînes sur la même ligne (le code 'Fin de Ligne' n'est pas ajouté)
    Next
    CloseFile(0)                       ; ferme le fichier précédemment ouvert et enregistre les données
  Else
    MessageRequester("Information","Impossible de créer le fichier!")
  EndIf

OS Supportés

Tous