Exécuter directement depuis Delphi un script vbs sans le fichier

Voila ma question, est ce que l'on peut écrire directement le contenu d'un fichier *.vbs sur la Form et l'exécuter depuis Delphi.

Avec ce fichier *.vbs et Shellexecute() c'est ok.

Merci de votre attention.

@+,

Cincap

Fouille dans vbscript.dll, c'est une TLB, il y a une multitude de fonction dedans, problablement l'ensemble du langage !
Eval ou Execute semble être intéressante !

sinon tu peux passer par un fichier temporaire !
tu peux écrire le fichier, lancer le ShellExecute, et tu supprimes le fichier à la fermeture de ton programme Delphi

Avec CreateProcess, tu pourrais savoir quand se termine le Script, mais il faut explicitement fournir le nom de l'interpréteur VBS !

@ ShaiLeTroll, merci de ta réponse.

En fait ce n'est que par curiosité, en effet j'ai un fichier soit Toto.vbs que j'ai incorporé dans une ressource, je le charge puis le sauve dans le même dossier de l'application et je l'execute puis je le delete en fermant mon application, tout cela fonctionne.

J'aurai donc voulu savoir si il était possible de créer directement le contenu de ce fichier Toto.vbs sur ma fiche et de l'exécuter.

A défaut l'exécuter dès qu'il est chargé depuis la ressource pour éviter de le sauvegarder sur le pc afin de l'utiliser.

@+,

Cincap

Bonjour à toutes et à tous,

Pas de nouvelles, je vous rassure, le lancement d'un script *.vbs ne concerne que un test sur l'épinglage d'une application dans la TaskBar de Seven et non un script malveillant.

Ce script fonctionne correctement dans une application Delphi qui ne sert à rien d'autre et qui remplace le click droit pour épingler à la barre de tâche.

C'était uniquement à titre d'infos que j'avais posé ma question, que je vais fermer comme résolut sans l'être.

@+,

Cincap