[DCOM] Accès refusé au lancement du programme à distance
Salut,
Je souhaite établir lancer une appli à distance d'un PC sur un autre.
Pour cela j'utilise le DCom. J'ai paramêtré mon PC suivant votre cours intitulé "Le modèle COM". Cependant quand je souhaite éxecuter le programme à distance, j'ai toujours le même message d'erreur : "Accès refusé".
Dans l'observateur d'évènement j'ai le message suivant qui intervient :
Code:
1
2
3
|
DCOM a reçu l'erreur "Erreur d'accès général refusé " de l'ordinateur 192.168.33.12 lors de l'activation du serveur :
{784A0DD1-39F8-413C-A561-90B8E03EE73F} |
Le client lance l'appli de la façon suivante :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
|
procedure TForm1.Button1Click(Sender: TObject);
const CLASS_TestDCOM: TGUID = '{784A0DD1-39F8-413C-A561-90B8E03EE73F}';
var v : variant;
begin
v:=CreateRemoteCOMObject('192.168.33.7', Class_TestDCOM)as IDispatch;
//v:=CreateRemoteCOMObject('Aautomation-074', Class_TestDCOM) ;
ShowMessage('toto');
ShowMessage(v.GetName);
end; |
Si vous pouviez me dépanner je galère dessus depuis maintenant pas mal de temps.
Merci
Anthony
