Discussion :

[andrebernard]

Bonjour à tous

Voila je gere par AUTOMATION un emulateur IBM
Le probleme c'est que je peux avoir besoin de gerer deux sessions avec le meme emulateur, et des parametres differents.

J'ouvre donc une premiere application,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Shell "C:\Program Files\extra.exe " + App.Path + "\A.edp", vbNormalFocus

Je créé la liaison COM

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set System = CreateObject("EXTRA.System")   ' Gets the system object
Set System = GetObject(, "EXTRA.System")  ' Gets the system object
Set SessionTGC = System.ActiveSession

Puis j'envois de données à l'emulateur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SessionTGC.Screen.row = 15
SessionTGC.Screen.Col = 30
SessionTGC.Screen.SendKeys ("Coucou A")

Je recommence l'operation

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Shell "C:\Program Files\extra.exe " + App.Path + "\B.edp", vbNormalFocus
Set System = CreateObject("EXTRA.System")   ' Gets the system object
Set System = GetObject(, "EXTRA.System")  ' Gets the system object
Set SessionTGC = System.ActiveSession
SessionTGC.Screen.row = 15
SessionTGC.Screen.Col = 30
SessionTGC.Screen.SendKeys ("Coucou B")

Jusque la tout va bien, le probleme, c'est lorsque je ferme mon programme et que je le relance avec les deux emulateurs deja en route.
Comment faire pour attribuer les nouvelles sessions a chaque emulateur pour pouvoir a nouveau ecrire simultanement dedans.
En un mot comment creer les objets COM en utilsant les handles des emulateurs deja créé

Je vous remercie de votre aide
Bonne journée

[Delbeke]

Je suis pas tès sur, mais si tu essayais de faire un getobject d'abord, et seulement s'il echoue, faire un createobject, puis un getobject

[andrebernard]

Merci de ta reponse.
Je crois aussi que tu as raison, je crois qu'il faut gerer l'erreur quand on fait le get et faire un create en cas d'erreur.

Mais cela ne resoud pas mon probleme de multisession