SAP Jobsuche bei DV-Treff


Suchen
Chrisor
  • Chrisor
  • SAP Forum - Neuling Thema Starter
vor 13 Jahre
Hallo SAPler,

ich muss kontrollieren ob auf der SAP-GUI bestimmte Steuerelemente vorhanden sind:

dafür brauche ich eine Fehlerbehandlung.

Diese gibt leider IMMER false zurück!


//Objekte deklarieren und mit der SAP-GUI verbinden 
If Not IsObject(application) Then 
   Set SapGuiAuto  = GetObject("SAPGUI") 
   Set application = SapGuiAuto.GetScriptingEngine 
End If 
If Not IsObject(connection) Then 
   Set connection = application.Children(0) 
End If 
If Not IsObject(session) Then 
   Set session = connection.Children(0) 
End If 
If IsObject(WScript) Then 
   WScript.ConnectObject session,     "on" 
   WScript.ConnectObject application, "on" 
End If 
//Der Plan für meine Fehlerbehandlung war: 
if IsObject("wnd[0]/tbar[0]/btn[11]") Then 
    session.findById("wnd[0]/tbar[0]/btn[11]").press 
else 
    msgbox "Speicher-Button konnte nicht gefunden werden! Programm wird abgebrochen!" 
    WScript.Quit(0) 
end if 
///////////////////////////////////////////// 
//Das ist der eigentliche Code um den Button zu drücken: 
session.findById("wnd[0]/tbar[0]/btn[11]").press 
//Das selbe ginge mit der Transaktion-Aufruf-Zeile 
session.findById("wnd[0]/tbar[0]/okcd").text = "ct04" 
///////////////////////////////////////////// 
//Erklärung zum String: 
//"wnd[0]/tbar[0]/btn[11]" 
//wnd[0] steht fürs SAP-Basis-Fenster 
//tbar[0] ist die Titelbar 
//btn[11] ist der SpeicherButton 

//Erklärung zum String: 
//"wnd[0]/tbar[0]/okcd" 
//wnd[0] steht fürs SAP-Basis-Fenster 
//tbar[0] ist die Titelbar 
//okcd ist der Name des Textfeldes 
//////////////////////////////////////////// 

IsObject(session.findById("wnd[0]/tbar[0]/btn[11]")) habe ich schon probiert, stürzt ab!

An alle die sich mit SAP auskennen BITTE HELFT mir!

Meine Zeit ist leider ziemlich knapp !

ScriptMan
vor 13 Jahre
Hallo Chrisor,

wie wäre es mit folgendem Vorschlag:

. . .

on error resume next 
session.findById("wnd[0]/tbar[0]/btn[11]").press 
if err.number < > 0 then  msgbox "Speicher-Button konnte nicht gefunden werden! Programm wird abgebrochen!" 
on error goto 0

 . . .

Schneller ging es nicht.

Freundliche Grüße

ScriptMan