QBasic - Comment créer un fichier de n'importe quel type dans QBasic?

Question

J'essaie de créer un fichier batch, un fichier texte et un fichier DLL via QBasic?

S'il vous plaît aidez-moi ... Je fais un faux DOS.

Answer 1

C'est vieux :)

Si je rappelle:

Pour ouvrir des fichiers: (vous pouvez créer, lire et écrire)

Open (Path and file name) For (Mode) [Access (Type of access)] As #(File number) 

Où:

(chemin et fichier nom) - Le chemin d'accès et le nom du fichier de destination

(Mode) - Vous pouvez en définir un valeurs:

Input: Read Mode 
    Binary: Structured data 
    Output: Write Mode - If the file already exist - overwrites the file. 
    Append: The difference between this and Output is that if the file already exists, the content is appended to the end of the file 

(Type d'accès) - Type d'accès.

Read: Read-Only access. 
    Write: Write-Only access. 
    Read Write: Available only in Append Mode 

(Numéro de fichier) - Identifie le fichier, comme un pointeur.

Pour fermer un fichier, il suffit d'utiliser:

Close [#(FileNumber)][, #(FileNumber) ...] 

Oui, vous pouvez fermer plus d'un fichier à la fois, et si vous ne spécifiez pas le numéro de dossier, qbasic fermera tous vos fichiers ouverts.

Notez qu'en mode Append et Output, vous devez d'abord fermer le fichier avant de l'ouvrir pour la lecture!

Ok, lire \ write utiliser le même que vous utilisez à l'écran, mais ajoutez la destination du fichier:

Input (Char Length), #(File number), (Name of the Variable) 
Line Input #(File number), (Name of the Variable) 
Print #(File number), (Data) [or (Binary data)] 

Si vous ne vous souvenez pas de donner le retour chariot (généralement \ n) utiliser la char ASCII: Chr (10)

Exemple:

Open "c:\test.bat" for Output as #1 
Print #1, "@echo off" + Chr$(10) 
Print #1, "echo Hello World" 
Close #1 
End