Exécuter code présent dans un txtRésolu

Question

Salut,

Développant une application j'ai besoin d'exécuter du code présent dans un txt externe.
J'ouvre le txt dans un RichTextBox, tout va bien.

Mais comment faire pour Vb 2003 reconnaisse le contenu du texte comme du code et l'exécute ?

Merci de votre aide

Sylvain3665

Julien237 · Accepted Answer

J'imagine que ce que tu veux faire est d'exécuter du code vb non ?
Pour ca, pas de miracles, tu dois faire un compilateur :p (En gros, à moins d'être très motivé, n'essaye pas)
Sinon BruNews t'explique ce que tu dois faire pour exécuter un bout de code d'assembleur... Les opcodes étants la traduction en hex des commandes d'assembleurs...

Joyeux noël !

Julien.

BruNews · Answer

Faire un VirtualAlloc avec le flag PAGE_EXECUTE_READWRITE.
Tu écris dedans les opcodes (voir manuels Intel) correspondant au code écrit dans le textbox en n'oubliant pas d'y ajouter un équivalent "ret 0" pour replacer le registre EIP.
Quand fini, tu fais un call sur adresse retournée par VirtualAlloc.

ciao...
BruNews, MVP VC++

sylvain09 · Answer

Euh,

C'est possible d'expliquer en plus simple ?
J'ai rien compris ^^

merci quand même

BruNews · Answer

Tout à fait normal au vu de ta question.
Si tu apprenais à coder (C et ASM) avant la scriptologie, tu te rendrais compte de l'ineptie de ta demande.

ciao...
BruNews, MVP VC++

sylvain09 · Answer

Or le code présent dans le txt est du code Visual Basic ! par du C ou Assembleur !
Il est pas possible d'utiliser le texte comme des commandes en vb ?

BruNews · Answer

un CPU ne travaille qu'en binaire et non en hexa.

ciao...
BruNews, MVP VC++

BruNews · Answer

ah mais tu es dur...
Ton script VB passe dans un compilo VB, il ne reste pas en texte.

ciao...
BruNews, MVP VC++

sylvain09 · Answer

Ok je crois avoir compris...

Donc va falloir que je trouve une autre solution ^^
Car faire un compilo vb c'est pas mon truc !

Merci

cs_DARKSIDIOUS · Answer

Et si j'écris "trouve moi le plus grand nombre premier d'une précision de 1024 bits", tu crois qu'il peut m'écrire tout le code à ma place et me l'optimiser afin de calculer un nombre premier d'une précision de 1024 bits ?

sylvain09 · Answer

Mon post ==> txt contenant du code

Il n'a pas à écrire du code, c'est déjà fait :)
Après je savais pas qu'il fallait obligatoirement le compiler...

cs_DARKSIDIOUS · Answer

Je sais bien, mais c'était pour te faire remarquer, d'une façon ironique, qu'un texte, qu'il soit écrit en français, ou en vb, est incompréhensible pour une machine : elle ne sais lire que du langage machine elle, donc sans interprêteur de code, ou sans compilateur, ce que tu cherche à faire est irréalisable. (surtout si le code exécuté doit en plus tenir compte de l'environnement du programme qui lance le script, comme la modification de variable de ton programme appelant par exemple !!!).

sylvain09 · Answer

Oki j'ai compris merci ;)

yann_lo_san · Answer

A ma connaissance on peut faire ça facilement en WinDev avec la fonction compile("code source", fonctionPTR) à l'exécution grace à une dll.
Cela doit exister en VB car tout ce que fait WinDev, VB peut le faire.

sylvain09 · Answer

Oui mais quelle dll ?
ça m'interesse ça :)

jmfmarques · Answer

Ce sera n'importe quoi sauf du code VB écrit dans un fichier texte !
C'est tellement évident !

jmfmarques · Answer

Rien ne lui interdira, par contre, d'écrire par exemple un batch et de l'exécuter, ma foi, mais un batch n'est pas du VB.

Julien237 · Answer

Je vois quand même 2 demi-solutions,
La première :
Tu as dans vb6.dll la fonction EbExecuteLine qui te permet d'exécuter UNE ligne, je n'ai jamais énormément testé, mais bon, ca peut peut-être t'aider... Je te colle un exemple d'utilisation à la fin. Mais fais attention que je ne pense pas que vb6.dll soit redistribuable...

La seconde :
Transforme ton fichier texte en une page html contenant ton code en vbscript et remplace ta richtextbox en WebBrowser pour pouvoir l'interprèter... J'ai déjà utiliser cette solution, et c'est peu performant. (Je sais pas ce qu'en pense les pros du forum ?)

Voici l'exemple de EbExecuteLine :

Option Explicit

Public Number1 As Long
Public Number2 As Long

Private Declare Function EbExecuteLine _
    Lib "vba6.dll" _
    ( _
        ByVal pStringToExec As Long, _
        ByVal Foo1 As Long, _
        ByVal Foo2 As Long, _
        ByVal fCheckOnly As Long _
    ) As Long

Public Function Execute(CodeLine As String, Optional CheckOnly As Boolean = False)

    Execute (EbExecuteLine(StrPtr(CodeLine), 0&, 0&, Abs(CheckOnly)) 0)

End Function

Public Sub Main()

    ' Exécute : MsgBox "Ceci est un test"
    Call Execute("MsgBox ""Ceci est un test""")
    ' Exécute : Number1 = 1024
    Call Execute("Number" & 1 & " = 1024")
    ' Exécute : Number2 = Number1 + 1024
    Call Execute("Number" & 2 & " = Number" & 1 & " + 1024")
    ' Affiche la somme de Number1 et Number2 (soit 3072)
    MsgBox Number1 + Number2

End Sub

Julien.

sylvain09 · Answer

Merci pour les codes, mais j'ai bien précisé que j'était sous vb 2003...
Donc vb6.dll, ça va pas ^^

Ensuite, pour la deuxième solution, je ne veux pas que le code soit public dans une page html...

Arnaud16022 · Answer

Bon les gens je ne suis pas aussi radical que vous ...
Il se trouve que la question initiale laissait entendre qu'il y avait une fonction bidon genre popen lol , mais à mon avis c'est faisable.
Crade, pas portable ( bintiens, VB ), compliquée, lente, mais FAISABLE.
( en C, du moins , le VB je connais pas )
Selon MS, il y a un compilo dispo en ligne de commande pour le VB, vbc.exe.
Rien n'empêcherait d'enregistrer le contenu du fichier sur le disque et de lancer le compilo avec ça ( plus propre, mais je sais pas si c'st faisable sous Win, faire un pipe ) , récupérer le fichier de sortie ( sur stdout si possible ) ...à ce moment on pourrait avoir le bytecode.

Maintenant, je ne sais pas comment sont organisés les .exe écrits en VB, il doit y avoir le header PE, puis un loader, puis le bytecode, et le loader charge le code en mémoire et demande à la virtual machine d'exec le code.
Donc si t'arrives à trouver quelle partie de l'exe correspond à ce loader ( ou l'écrire toi même en faisant appel à VB6FR.dll , à la limite ça serait moins gore ) ... tu pourrais éventuellement, potentiellement, peut-etre , hypotétiquement ... le faire.

Quoi qu'il en soit, ce n'est certainement pas une réponse adaptée vu la question, ça nécéssiterait bien trop de bidouille technique et de connaissances que notre ami ne semble pas posséder :)

Sur ce, bonnes vacances ( n'est-ce pas brunews )
++
Arnaud

_______________________

Omnia vincit labor improbus

Julien237 · Answer

?? que le code soit public ??
Faire une page html ne veut pas dire la mettre en ligne, il s'agit de créer un simple fichier .htm, il n'a rien de plus publique qu'un fichier texte...

Julien.

jmfmarques · Answer

Salut, Arnaud16022

Juste une question : et comment distribuerait-il son application nécessitant ainsi le compilateur de VB ?

Arnaud16022 · Answer

Julie, je pense qu'il veut dire qu'il ne veut pas que les utilisateurs puissent voir le code.

_______________________

Omnia vincit labor improbus

Julien237 · Answer

Mmh je viens même de trouver moins "bricolage" sur ce site :

Solution avec Microsoft Script Control 1 (MSSCRIPT.ocx)

Exemple avec l'objet Genie du composant Agent:
       ScriptControl1.Language = "VBScript"
       ScriptControl1.Reset
       ScriptControl1.AddObject "genie", Genie, True
       ScriptControl1.AddCode "If Genie.Active = 1 Then Genie.MoveTo 0, 300"

Bon c'est encore du VBScript, mais c'est quand même pas un grand effort d'adaptation :p, et en plus ca fonctionne en mode compilé, ce qui n'est pas le cas de l'utilisation de vb6.dll...

Julien.

sylvain09 · Answer

En effet, j'ai rien compris...
J'ai compris ce que tu voulais dire, mais comment le faire en vb, là... je coule :$

Mais de toute façon je viens à l'instant de trouver une solution pour mon programme : le fichier xml... :)

Encore merci pour vos réponses, bonnes vacances et à bientot peut-être :)

Sylvain3665

ps: on peut pas changer de pseudo ?

Julien237 · Answer

JulieN (allez stp :p), je pense qu'il veut dire qu'il ne veut pas que les utilisateurs puissent voir le code. > Il veut dire quoi alors ? En quoi un fichier htm est plus publique qu'un txt ?

Julien.

jmfmarques · Answer

Il a probablement l'intention de créer, d'exécuter... puis d'effacer (on utilise quelquefois ce truc avec des batch...)

Arnaud16022 · Answer

JulieN ( dsl ) -> je veux dire, peut-etre qu'il voulait que toute la partie code ne soit pas visible par l'utilisateur. Par exemple, un compilateur ( un vrai, pas vbc ) ne te montre pas le code issu du préprocesseur, il te donne directement l'assembleur ( disons pour certains ; les bons te donnent direct le code x86 , mais j'ai un pote qui a fait ça ^^ ) . Passons.

jmf -> en distribuant avec vbc.exe. Oui c'est illégal, et alors ? xD *

++
Ad

* : je PLAISANTE

_______________________

Omnia vincit labor improbus

Exécuter code présent dans un txt

27 réponses

Votre réponse

Discussions similaires