begin process at 2012 02 13 08:57:10
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Trucs & Astuces

 > EXECUTER UNE COMMANDE EN MODE RUN

EXECUTER UNE COMMANDE EN MODE RUN


 Information sur la source

Note :
10 / 10 - par 4 personnes
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Trucs & Astuces Classé sous :exécuter, mode, run Niveau :Débutant Date de création :14/05/2004 Date de mise à jour :14/05/2004 23:58:40 Vu / téléchargé :14 025 / 601
Auteur : jack

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note

 Description

Cette source permet, en mode run, d'exécuter une instruction VB, par exemple :
MsgBox "Bonjour !"
Elle utilise la fonction EbExecuteLine de la VBA6.DLL

Nota : Ce projet ne fonctionne pas en mode compilé, c'est normal.
Nota : Il faut avoir le fichier VBA6.DLL.
Je suppose que si vous ne l'avez pas, il faudra l'enregistrer avec la commande "RegSvr32 VBA6.DLL" après l'avoir récupérée sur Google.


 Conclusion

Cette source a été pompée sur un autre site (il y a quelques temps), mais je ne rappelle plus où. Voir les commentaires de copyrights en tête du code.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture LECTURE DES INFORMATIONS DES DISQUES COMPOSANT UN ENSEMBLE R...
Source avec Zip Source avec une capture [VBA EXCEL] CALCULER LA DISTANCE ENTRE DEUX COORDONNÉES GÉOG...
Source avec Zip Source avec une capture Source .NET (Dotnet) JPG + ZIP = JPG ET ZIP
Source avec Zip Source avec une capture SYSTRAY + BALLOON - VARIANTE AVEC TEXTE DANS L'ICÔNE
Source avec Zip Source avec une capture DATE-HEURE DE LANCEMENT D'UN PROGRAMME
Toutes les sources de jack

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) EXPORTER LES IMAGES DE WORD ET D' EXCEL par Le Pivert
Source avec Zip Source avec une capture JEUX DE VERITÉ ET DE FIDELITÉ par billatosco
Source avec Zip IMAGELOARDER par vkitumaini
Source avec Zip Source avec une capture Source .NET (Dotnet) CREER UN CALENDRIER DE POCHE par Le Pivert
Source avec Zip RECHERCHE D'UN ENREGISTREMENT DANS UNE DATATABLE ET POSITION... par erdna
Toutes les sources de la catégorie Trucs & Astuces

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture PING (SOCKET MODE RAW) par EBArtSoft
Source .NET (Dotnet) EXÉCUTER UNE APPLICATION ET ATTENDRE OUI OU NON QU'ELLE SE T... par LandTech
Source avec Zip CHANGER LE MODE DE VOTRE APPLI par dead33
Source avec Zip Source avec une capture Source .NET (Dotnet) [.NET2] LISTVIEW ET LE MODE VIRTUEL par Willi
Source avec Zip EXECAS (RUNAS EN BATCH) par xon

Commentaires et avis

Commentaire de CanisLupus le 14/05/2004 20:35:40 administrateur CS

Salut jack,
Merci pour ce code, je ne le cherchais pas vraiment mais ça m'ouvre des horizons car ce genre de truc je sais déjà le faire en c/c++ (en compilé) et j'avais des prob de traductions c vers vb sur ce plan. C top !!!

Cordialement

CanisLupus

Commentaire de EBArtSoft le 14/05/2004 21:39:07 administrateur CS

Bonne astuce...

Commentaire de thierrydelepine le 14/05/2004 23:24:11

excellent,
question peut on executer une ligne de code comportant un objet ?

voici une autre solution avec Microsoft Script Control 1 (MSSCRIPT.ocx) pour executer du code a partir d'un string.
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

Commentaire de thierrydelepine le 15/05/2004 01:14:34

J'apporte une modif a mon post du dessus il faut lire pour la derniere ligne de l'exemple :
ScriptControl1.AddCode "If Genie.Active <> 1 Then Genie.MoveTo 0, 300"

j'ai ajoute les guillemets puisque c'est un string, la derniere ligne aurait pu etre : ScriptControl1.AddCode Text1.Text

NB: avec MSSCRIPT.ocx cela marche aussi en mode compilé

Commentaire de sibi12 le 15/05/2004 11:47:19

La dll vba6.dll se trouve dans le repertoire de VB...mais ce n'est pas une dll COM puisque tu declare une API pour la fonction EbExecuteLine... donc il suffit de rajouter la dll ds le repertoire de l'exe...

Mais chez moi ca bogue!!!!
si quelqu'un pouvais essayer...

d'ailleur si on regarde la DLL de plus pres on peu voir qu'elle contien pas mal de fonction tres interressante... c-a-d a peu pres tte les fonctions de VB !!!!!

faudrait faire une petite enquête sur cette DLL...

Commentaire de sibi12 le 15/05/2004 11:50:17

Ah oui j'oubliais....pour thierrydelepine

Il existe effectivement la DLL MSSCRIPT pour un petit exemple d'utilisation vous pouvez allez voir ma source : http://www.vbfrance.com/code.aspx?ID=6453

Commentaire de liquide le 03/09/2004 10:16:53

Sibi, j'ai charger ta source dans ton post du dessus car tu dis utiliser la DLL
Je vois bien dans ta source , en référence que tu as déclaré la dll, mais dans ton programme  j'en n'ai pas vu l'utilisation !!

de ce que j'ai pu comprendre, tu utilises l'activex et pas une dll (MSSCRIPT.DLL).
D'ailleur je l'ai enlevé et ca fonctionne aussi, puis j'ai meme enlevé dans la référence, le fichier .oca .
Explique moi dans ta source, en quoi ces 2 fichiers sont nécessaires, car j'ai du rater une étape. Merci

Commentaire de sibi12 le 03/09/2004 12:07:44

Oui c'est juste j'utilise l'ocx. J'utilisai auparavant la dll j'ai du oublier de l'enlever. quand je l'ai remplacer par l'ocx.

Pour info, la dll et l'ocx s'utilise exactement de la même manière mise à part la declaration evidemment. Il faut utiliser le mot-clé WithEvents pour avoir accès aux evenement si tu utilise la dll.

je l'utilise dans la fonction CalcFct mais la façon dont je l'utilise peut être assez compliquer a saisir.

En réalité je rajoute un module au ScriptControl que je nomme Interface dans le Form_Load puis le reste se passe dans le CalcFct qui demande au control de renvoyer le resultat dans la fonction Script.

Commentaire de keops31 le 13/03/2006 17:04:00

Salut sibi12,
Comme j'ai également des problèmes avec vba6.dll qui me génère des bugs, je voudrais savoir comment tu as réussi la manip avec le composant msscript.ocx.
En effet, je l'ai essayé à la place de vba6.dll en renseignant le nom du fichier dans le code VB mais le compilateur me dit que "le point d'entrée EbExecuteLine est introuvable...". Quel point d'entrée utilises-tu pour exécuter une chaîne avec msscript.ocx ? Si tu as un bout de code, je suis preneur!
Merci beaucoup

Commentaire de sibi12 le 13/03/2006 18:07:28

pfiouuu... ce message me donne un coup de vieux lol.

Je suis depuis passé sur linux donc je vais essayer de me souvenir... En principe msscript est un ActiveX donc tu n'as pas a chercher de point d'entrée VB gère ça tout seul comme un grand. Tu ajoute ton ocx dans ton projet (Projet => composant si mes souvenir son bon. Sinon clique droit sur la barre d'outils et Ajout/Suppression de composant un truc du style). Ensuite tu pourras mettre un controle MSScript sur ta form et l'utiliser comme tu veux.


Si tu va voir dans mes sources sur ce site, il y en a une intitulé "Tracer des graphique de fonction du 4eme degré" (ou quelque chose comme ça) qui utilise ce composant tu peux t'en inspirer (oui je sais le code n'est pas tres propres :( )

J'espère que ça pourra t'aider

Commentaire de keops31 le 14/03/2006 15:30:43

OK merci çà marche en effet!
Mais j'ai encore un problème : comment peut-on appeler une méthode/fonction VB depuis le controle MSscript qui apparemment ne reconnaît pas le code VB ? J'ai vu dans ton projet sur les polynomes que tu utilisais "Scp.AddObject "Interface", Me" puis lance une fonction VB avec "Scp.ExecuteStatement ("Interface.Script(" & Fct & ")")". J'aimerais faire de même mais le compilo ne veut pas ajouter 'Me' qui dans mon cas est un module et non un formulaire (c'est un pg batch tout simple). As-tu la solution ?
Merci d'avance

Commentaire de sibi12 le 14/03/2006 18:26:31

C'est sans doute parce que un module n'est pas un objet (je veux dire que tu ne sais en instancier)

As-tu essayer avec un module de classe pour encapsuler tout ce dont tu as besoin dans tes scripts ? Ça devrait marcher et c'est sans doute plus propre.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Commandes en mode console [ par kiboumz ] Bonjour,J'aimerais savoir comment on peut faire pour exécuter des commandes dos dans une fenêtre "console" d'une application Vb, car pour l'instant j' Exécuter une macro sous PowerPoint en mode visionneuse [ par nicdouille3 ] Bonjour à tous !Je ne parviens pas à exécuter une macro sous PowerPoint en mode visionneuse. Ma macro est lancée à partir d'u Inet : FTP en mode ASCII [ par ghostyon ] Bonjour,Je rencontre un gros problème avec l'utilisation de inet en VB6.Voiçi une partie du code ...déclaration :with Inet1.Protocol = impression d'une form en mode paysage [ par f56bre ] salut comme il est indiqué dans le titre je souhaiterais savoir comment imprimer une form en format paysage et comment je peux modifier la taille de etat dans access [ par tenthor ] Bonjour, Alors voilà je developpe une application sur access. Je suis en train de faire les états. Mon problème est le suivant : je veux faire deux enregistrement .ocx et .dll [ par panorama12 ] Bonjour à tous.Mon problème concerne l'enregistrement de dll et ocx afin de pouvoir exécuter mon programme en VB 6 sur touts les machines.Est-ce que l commandes dos ou autres depuis vb [ par tictac01 ] j'ai une commande intituleé "make run" que j'ai executé via une interface vb"j'ai un module qui me permet d'ecrire une seul commande sur le dos".apres ListView en Mode Virtuel et ImageKey d'un ImageList [ par archimed111 ] Bonjour J'ai un petit probléme je n'arrive pas a faire fonctionner quelque chose qui pourtant le devrait. J'ai fait une application de test juste pou réutiliser un process ou application déjà ouverte [ par tictac01 ] j'ai une commande intituleé "make run" que j'ai executé via une interface vbou j'ai utilisé un 'pipe' qui permet d'envoyer une commande et de recevoir CommonDialog mode ShowOpen [ par erefdatacomputing ] Salut à tous !!!Je retente ma chance sur le forum !!Je veux qu'à l'ouverture d'une CommonDialog (en mode ShowOpen) je puisse voir les aperçus des phot


Nos sponsors


Sondage...

Comparez les prix


Mio - Moov V735 - GPS Europe - Ecran 7"
Entre 305€ et 375€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Green Energy Solutions With Light Bulb Morphed Into LandscapePhoto Photo aérienne de Saintes Maries de la Mer
Photo Beautiful El Capitan Yosemite National Park 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,437 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)