Bonjour,
Je suis en train de migrer un programme réalisé en VBA Excel vers VB en utilisant Visual Studio 2017.
Attention : Mon programme fonctionne aussi bien en VBA qu'en VB...
Par contre, en VB je n'arrive pas à utiliser l'"Espion" comme dans VBA !
En VB, lorsque j'espionne l'objet sapConnection... Il m'inscrit uniquement {System.__ComObject} et je ne vois pas le détails de l'objet. Comment faire ?
Remarque : Ni en VBA ni en VB je n'ai eu besoin de rajouter de référence pour faire fonctionner le programme. Et en VBA j'arrive bien à espionner l'objet sapConnection et il me donne bien tous les détails.
Merci.
Voici le code me permettant de me connecter à SAP
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30 Module Module1 Sub SAP_Connection() Dim objBAPIControl As Object Dim sapConnection As Object objBAPIControl = CreateObject("SAP.Functions") sapConnection = objBAPIControl.Connection TypeName(objBAPIControl) TypeName(sapConnection) sapConnection.ApplicationServer = "sapserver" sapConnection.Client = "002" sapConnection.User = "myname" sapConnection.Password = "mypw" sapConnection.Language = "FR" If sapConnection.Logon(0, True) <> True Then MsgBox("Could not connect to SAP R/3") End If End Sub End Module
Partager