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 :

imprimer fichier texte


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Etudiant
    Inscrit en
    Février 2012
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Morbihan (Bretagne)

    Informations professionnelles :
    Activité : Etudiant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Février 2012
    Messages : 11
    Par défaut imprimer fichier texte
    Bonjour,

    Je cherche le code VB6 qui pourrait écrire dans un fichier texte, puis l'imprimer, l'effacer entièrement et enfin le quitter.

    Voilà
    a+

  2. #2
    Expert éminent


    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
    Par défaut
    Bonsoir,
    Pourquoi passer par un fichier texte pourquoi pas imprimer directement : http://vb.developpez.com/bidou/vb-im...ge=coord#LIV-B

  3. #3
    Membre averti
    Homme Profil pro
    Etudiant
    Inscrit en
    Février 2012
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Morbihan (Bretagne)

    Informations professionnelles :
    Activité : Etudiant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Février 2012
    Messages : 11
    Par défaut
    Bonjour,

    Merci pour cette réponse, c'est finalement aussi bien d'imprimer directement sans passer par un fichier texte.
    Mais j'ai réussi à écrire dans un fichier texte, l'imprimer et le quitter, je donne quand même le code pour les intéressés:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    FileNumber = FreeFile    ' Lit le numéro de fichier inutilisé
        LogFile = "l'emplacement de votre fichier"
        Open "l'emplacement de votre fichier" For Append As #FileNumber
        Print #FileNumber, "Nom : " & Nom.Text & " " & Prenom.Text
        Print #FileNumber, "Date : " & Date
     
        Close
    'cette première partie écrit dans le fichier'  
     
    Dim ReturnValue
    ReturnValue = Shell("c:\windows\notepad.exe l'emplacement de votre fichier", 1)
    AppActivate ReturnValue
    Shell "notepad.exe /P""l'emplacement de votre fichier""", 2
    'ici on imprime'
     
    RetVal = Shell("Taskkill /im notepad.exe /f", 0)
    'ici on kill le notepad'
    'après pour l'effacer c'est plus compliqué'

    Voilà
    A bientôt

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

Discussions similaires

  1. [LabView 7.1] Imprimer fichier texte
    Par constantin22 dans le forum LabVIEW
    Réponses: 3
    Dernier message: 03/03/2008, 15h38
  2. Comment imprimer un fichier text existant?
    Par AODRENN dans le forum Langage
    Réponses: 2
    Dernier message: 12/09/2005, 17h26
  3. Imprimer un fichier texte avec un script vbs
    Par Persons dans le forum Windows
    Réponses: 3
    Dernier message: 23/12/2004, 16h47
  4. Imprimer fichier texte
    Par Freeze dans le forum C++Builder
    Réponses: 3
    Dernier message: 05/11/2003, 11h37

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