IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

For Output As #3


Sujet :

VB 6 et antérieur

  1. #1
    Membre du Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Mars 2009
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mars 2009
    Messages : 97
    Points : 68
    Points
    68
    Par défaut For Output As #3
    Bonjour à tous,

    voilà je ne comprends pas la partie de l'instruction suivante
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Open App.Path & "\Data\data-noms.txt" For Output As #3
    Ca peut vous paraître stupide comme question mais je débute en visual basic.

    Merci

  2. #2
    Expert éminent sénior


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Points : 20 038
    Points
    20 038
    Par défaut
    ton code permet d'ouvrir un fichier en écriture...

    le #3 est un "numéro" qui est ensuite utilisé pour accéder à ce fichier par des commandes style read, write ....

    une fonction permet d'écrire cela plus proprement : freefile qui renvoi un numéro de fichier "libre" :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    Dim f as integer 'variable f permettant de stocker le numéro
    f = freefile 'Attribut a f la valeur du fichier libre 
    Open App.Path & "\Data\data-noms.txt" For Output As #f
    Write #f, "Ecrit dans fichier texte" 
    Close #f   'Ferme le fichier.
    Attention après avoir utiliser freefile il est important d'utiliser une fonction open.. avant toute ré-utilisation de freefile car si Open n'est pas utilisé le numéro de fichier renvoyé par freefile reste le même

  3. #3
    Membre du Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Mars 2009
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mars 2009
    Messages : 97
    Points : 68
    Points
    68
    Par défaut
    ok merci pour ta réponse bbil

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 1
    Dernier message: 05/10/2011, 09h53
  2. Timeout waiting for output from CGI script
    Par isa150183 dans le forum Langage
    Réponses: 1
    Dernier message: 30/06/2010, 11h45
  3. [Ressources biblio] A SAS Output Delivery System Menu for All Appetites and Applications
    Par datametric dans le forum Contribuez
    Réponses: 0
    Dernier message: 28/07/2009, 19h56
  4. [Ressources biblio] SAS with Style: Creating Your Own ODS Style Template for PDF Output
    Par datametric dans le forum Contribuez
    Réponses: 0
    Dernier message: 28/07/2009, 19h56
  5. [Turbo Pascal] Runtime error 105 - File not open for output
    Par infoz dans le forum Turbo Pascal
    Réponses: 8
    Dernier message: 03/06/2008, 15h48

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo