[VBS] Utiliser une application déjà ouverte

Utiliser une application déjà ouverte [VBS] - VB/VBA/VBS - Programmation

Marsh Posté le 14-07-2007 à 12:32:36    

Bonjour à tous,
 
J'ai le code suivant :
 
 
'-------------------------------PART 1 ----------------------------
Dim x1, x2, appli1, appli2
set appli1 = CreateObject ("MyApplication.xx" )
 
'start first instance of MyApplication
x1 = appli1.xxInit ()
x1 = appli1.xxPlay("TheFileToPlay1" )
 
'start second instance of MyApplication
set appli2 = CreateObject ("MyApplication.xx" )
x2 = appli2.xxInit ()
x2 = appli2.xxPlay("TheFileToPlay2" )
 
'------------------------------ PART 2 -------------------------------------
'Dim x1, x2, appli1, appli2
'?????
 
'ANOTHER FILE TO PLAY WITH APPLI1
x1 = appli1.xxPlay("TheFileToPlay3" )
 
'ANOTHER FILE TO PLAY WITH APPLI2
x2 = appli2.xxPlay("TheFileToPlay4" )
'-----------------------------------------------------------------------------  
 
Et avec cette structure, le code marche, et effectue chronologiquementTheFileToPLay1 puis 2 puis 3 puis 4.
Sauf que je voudrais scinder le code en deux fichiers vbs : un qui contient PART1 et un autre qui contient PART2.
 
Et que dois-je mettre à la place de ????? dans PART2 pour "appeler" les applis lancées dans le premier vbs où y'a PART1  
Une sorte de Get ?
Car un Objet est recquis dans le 2ème vbs te je ne sais pas quoi mettre  
 
Merci pour votre aide


Message édité par speedest le 14-07-2007 à 12:33:00
Reply

Marsh Posté le 14-07-2007 à 12:32:36   

Reply

Marsh Posté le 14-07-2007 à 14:46:45    

En écrivant :
 
Set appli1 = GetObject(, "MyApplication.Application" )
 
j'ai l'erreur suivante :
 
"Un composant ActiveX ne peut pas créer un objet.:GetObject"

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed