Új hozzászólás Aktív témák

• #26391 Heno1974 csendes tag azopi74 #26390

  Új Válasz 2015-04-04 19:49:09 #26391

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Heno1974

  csendes tag

  válasz azopi74 #26390 üzenetére

  sap gui ba belépve elérem sap-ban
  akkor el kellene érnem vba-ban is szerintem.
  csak nem tom a bejelentkkezést megirni
  adatbázis lekérdezésnél nem tom a szerver cimét.
  ezt a neten böngésztem de nem igazán értem a :
  Set oConnection = SapGuiApp.OpenConnection("110 PRD-P01 ECC", True)

  Dim SapGuiApp As Object
  Dim oConnection As Object
  Dim session As Object
  Dim SAPCon As Object, SAPSesi As Object
  Dim SAPGUIAuto As Object, SAPApp As Object
  Dim sapConnection As Object

  If SapGuiApp Is Nothing Then
  Set SapGuiApp = CreateObject("Sapgui.ScriptingCtrl.1")
  End If
  If oConnection Is Nothing Then
  Set oConnection = SapGuiApp.OpenConnection("110 PRD-P01 ECC", True)
  End If
  If SAPSesi Is Nothing Then
  Set SAPSesi = oConnection.Children(0)
  End If

  sapConnection.Client = "720"
  sapConnection.User = ""
  apConnection.Password = ""
  sapConnection.Language = "hu"

  If nsapConnection.Logon(1, True) = True Then
  MsgBox "Nincs kapcsolat az SAP-val!"

Új hozzászólás Aktív témák