A voir également:
- Lire un fichier en VB
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Lire un fichier epub - Guide
- Fichier bin - Guide
- Comment réduire la taille d'un fichier - Guide
- Fichier rar - Guide
2 réponses
Problème 1:
Tu ouvres le fichier en écriture (For Output As #1) et ensuite tu places une instruction de lecture (Get #1).
Si tu veux simplement écrire dans un fichier, tu peux t'inspirer de quelque chose comme ceci:
Dim varname As String
Dim ligne As String
Dim indice As Integer
varname = "Exemple avec Print"
Open "C:\test1.txt" For Output As #1
For indice = 1 To 5
ligne = varname & " - ligne " & indice
Print #1, ligne
Next
Close #1
qui te donnera
Exemple avec Print - ligne 1
Exemple avec Print - ligne 2
Exemple avec Print - ligne 3
Exemple avec Print - ligne 4
Exemple avec Print - ligne 5
Tu ouvres le fichier en écriture (For Output As #1) et ensuite tu places une instruction de lecture (Get #1).
Si tu veux simplement écrire dans un fichier, tu peux t'inspirer de quelque chose comme ceci:
Dim varname As String
Dim ligne As String
Dim indice As Integer
varname = "Exemple avec Print"
Open "C:\test1.txt" For Output As #1
For indice = 1 To 5
ligne = varname & " - ligne " & indice
Print #1, ligne
Next
Close #1
qui te donnera
Exemple avec Print - ligne 1
Exemple avec Print - ligne 2
Exemple avec Print - ligne 3
Exemple avec Print - ligne 4
Exemple avec Print - ligne 5
bonjour,
Tu te mélange les pniceaux, relis bien la doc sur l'instruction Open.
Dans ton cas, tu ouvres le fichier en mode Output, ce qui veut dire que tu crée un fichier à accès séquentiel en mode écriture, si le fichier existe il sera mis à zéro.
Ensuite tu utilise l'instruction Get qui veut dire lire, applicable pour les fichiers ouvert en mode Random.
Mais de toutes façons, tu ne peux qu'écrire dans ce fichier, puisque ouvert en mode Output (sortie).
D'où l'erreur: tu a mélange les modes d'accès et les instructions.
L'instruction Len est optionnelle, dans ton cas plus spécialement elle représente la taille de la zone tampon à utiliser pour écrire les données dans le fichier.
Pour résumer, voici comment faire:
Dim varname As String
Open "C:\Documents and Settings\dada\Mes documents\test1.doc" For Output As #1
varname="Ceci est un test d'écriture"
Print #1, varname
varname="dans un fichier de type texte."
Print #1, varname
Close #1
Ouvre le fichier test1.doc avec ton éditeur préféré et vérifie le contenu.
A+.
Tu te mélange les pniceaux, relis bien la doc sur l'instruction Open.
Dans ton cas, tu ouvres le fichier en mode Output, ce qui veut dire que tu crée un fichier à accès séquentiel en mode écriture, si le fichier existe il sera mis à zéro.
Ensuite tu utilise l'instruction Get qui veut dire lire, applicable pour les fichiers ouvert en mode Random.
Mais de toutes façons, tu ne peux qu'écrire dans ce fichier, puisque ouvert en mode Output (sortie).
D'où l'erreur: tu a mélange les modes d'accès et les instructions.
L'instruction Len est optionnelle, dans ton cas plus spécialement elle représente la taille de la zone tampon à utiliser pour écrire les données dans le fichier.
Pour résumer, voici comment faire:
Dim varname As String
Open "C:\Documents and Settings\dada\Mes documents\test1.doc" For Output As #1
varname="Ceci est un test d'écriture"
Print #1, varname
varname="dans un fichier de type texte."
Print #1, varname
Close #1
Ouvre le fichier test1.doc avec ton éditeur préféré et vérifie le contenu.
A+.