I'm trying to pull information from the SAP GUI, and load it into another application. Specifically, I'm trying to get the Vendor Number, Vendor Name, and Invoice Number from the FB60 transaction. A friend gave me the attached code, but it fails at session.activeWindow.handl
e with "Object doesn't support this property or method" Any help would be appreciated.
'The following variables are set to define the SAP Client GUI as an object, enable the SAP Scripting Engine, define the SAP Connections, and Sessions to search through for the window title that matches the windowMatchString.
Set SapGuiAuto = GetObject("SAPGUI")
Set application = SapGuiAuto.GetScriptingEngine
Set connection = application.Children(0)
Set session = connection.Children(0)
' Retrieve the window title from the app plan as it runs
windowMatchString = "Enter vendor invoice: Company code 1000"
'The following For Each Statement will cycle through all of the open SAP Client Windows
'and find the window that matches the windowMatchString variable and was last active.
For Each Session in connection.Children
If session.activeWindow.handle = FindWindow(windowMatchString) Then
'Pulls the document for the correct window that is active.
'found the matching session
set window = session.activeWindow
'Define fields accepted from SAP
set VendorNumber = application.findById("/app/con/ses/wnd/usr/ctxtINVFO-ACCNT")
set VendorName = application.findById("/app/con/ses/wnd/usr/txtADRS-LINE0")
set InvoiceNumber = application.findById("/app/con/ses/wnd/usr/txtINVFO-XBLNR")