écrire sur stdoutRésolu

Question

Bonjour,

J'essaie d'écrire sur la console à l'intérieur d'un programme en VB qui lui même est prévu pour s'exécuter dans ce mode. Après quelques recherches sur la toile je suis arrivé au code suivant :

    '-----------------
    ' Écriture console
    '-----------------

    Private Declare Function GetStdHandle Lib "Kernel32" (ByVal nStdHandle As Long) As Long
    Private Declare Function WriteFile Lib "Kernel32" (ByVal hFile As Long, ByVal lpBuffer As String, ByVal nNumberOfBytesToWrite As Long, lpNumberOfBytesWritten As Long, lpOverlapped As Any) As Long

    ' Procédure principale
    '---------------------
    Sub Main()
    Dim msg As String
    Dim nb_car As Long
    Dim  nb_dep As Long
    Dim aff As Boolean
    Const STD_OUTPUT_HANDLE = -11&
    msg = "Bonjour"
    aff = WriteFile(GetStdHandle(STD_OUTPUT_HANDLE), msg, Len(msg), nb_car, nb_dep)
    End Sub
Après compilation je lance ce programme en mode console et rien ne se passe ! En exécution pas à pas dans l'éditeur de VB j'ai nb_car 0 et nb_dep 259 mais c'est peut-être normal puisque là je ne suis plus dans la console.

Je suppose que j'ai dû sauter quelques étapes mais lesquelles ?

Merci d'avance pour vos conseils.

FG

ucfoutu · Accepted Answer

Bonjour,
1) Je pense qu'il te faut d'abord attacher le processus appelant à une console.
2) Pourquoi utiliser WriteFile et non WriteConsole, pour ce que tu parais vouloir faire ?

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

heffge · Answer

Merci d'avoir répondu aussi vite.

J'aurais dû péciser que même si à diverses occasions j'ai déjà écrit quelques lignes de code en VB ou dans ses déclainaisons, VBA et VBS, je reste un débutant, notamment en ce qui concerne le maniement des API.

En ce qui concerne le point 1 j'ignore ce que tu entends par là. Il me semble que le processus appelant est déjà la console (cmd.exe) puisque c'est dans ce mode que je lance ce programme.

Pour le point 2 la raison est que je me suis inspiré de ce que j'ai trouvé sur la toile. Dans tous les exemples que j'ai vus on utilisait WriteFile. J'ai jeté un bref coup d'œil à WriteConsole et il m'a semblé que dans ce cas il fallait en plus gérer la mise en page soit-même.

Heffgé

ucfoutu · Answer

et il m'a semblé que dans ce cas il fallait en plus gérer la mise en page soit-même
Mise en page ?
De quelle "mise en page" s'agit-il donc ?


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

heffge · Answer

MSDN à propos de WriteConsole : Writes a character string to a console screen buffer beginning at the current cursor location

J'ai essayé mais cela ne change rien. Mon message n'apparaît à la console.

Heffgé

ucfoutu · Answer

Et c'est cela, que toi, tu appelles la "mise en page" ?
Ouvre ce lien
Tapez le texte de l'url ici.
Regarde le code des deux exemples. 

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

heffge · Answer

Sauf erreur de ma part ces exemples sont pour la création d'une fenêtre console et ce n'est donc pas ce que je cherche à faire (envoyer un message sur la console à partir de laquelle j'ai lancé mon programme).

En cherchant d'avantage j'ai trouvé qu'il fallait que je fasse un linkedit avec la console :
LINK /EDIT /SUBSYSTEM:CONSOLE {your exe's filename}

J'obtiens ainsi ce que je souhaitais, et en utilisant WriteFile car WriteConsole affiche des hiéroglyphes à la place de mon texte.

Merci de t'être penché sur mon problème.

Heffgé

écrire sur stdout

6 réponses

Votre réponse

Discussions similaires