$(function () { pageContext.i18n.modTalk = 'moderation talk'; pageContext.i18n.replyToComment = 'Reply'; pageContext.i18n.modTalkEmpty = 'moderation talk is empty'; pageContext.url.getModTalk = "/comments/%25ID%25/listModTalk.json"; pageContext.url.possibleCommentRecipients = "/comments/%ID%/possibleRecipients.json"; pageContext.url.commentEdit = '/comments/%25ID%25/edit.html'; pageContext.url.commentView = '/comments/%ID%/view.html'; pageContext.i18n.commentVisibility = { 'full': 'Viewable by all users', 'op': 'Viewable by the original poster', 'mod': 'Viewable by moderators', 'opAndMod': 'Viewable by moderators and the original poster', 'other': 'Advanced visibility', 'dialogTitle': 'Comment visibility', 'selectGroups': 'Visible to groups', 'selectOther': 'Other recipients', 'selectOriginalPoster': 'Original poster', 'selectModerators': 'Moderators', 'selectAssignees': 'Asked to answer users' }; pageContext.i18n.commentMenuLabels = { 'comment-edit': 'comments.menu.edit', 'comment-delete': 'comments.menu.delete', 'comment-convert': 'comments.menu.convert' };pageContext.i18n.answer= { bestAnswer: 'Best Answer', controlBar : { accept: 'Accept', unaccept: 'Unaccept', acceptCommand: 'Accept this answer as correct', cancelAcceptedCommand: 'Remove this answers accepted status' } }; window.croles = { u: false, op: false, m: false, og: false, as: false, ag: false, dc: false, doc: false, eo: false, ea: false }; tools.init({ q: { e: false, ew: false, eo: false, r: false, ro: false, d: false, dow: false, fv: false, c: false, co: false, p: false, tm: false , ms: false, mos: false }, n: { f: false, vf: false, vfo: false, vr: false, vro: false, c: false, co: false, vu: false, vd: false, w: false, wo: false, l: false }, c: { e: false, eo: false, d: false, dow: false, ta: false, tao: false, l: false }, a: { e: false, ew: false, eo: false, d: false, dow: false, a: false, aoq: false, ao: false, tc: false, tco: false, p: false, tm: false }, pc: croles }, { tc: true, nsc: true }); commandUtils.initializeLabels(); }); Skip to Content
0

Selecting the active window with SAP GUI Scripting being run by HTA

Oct 17, 2016 at 07:52 PM

344

avatar image

The code below works fine if I'm using a hotkey to launch the script.

The problem comes when I'm trying to launch the script using HTA. I get an error saying "Object required: 'session'".

How can I fix this? I need to be able to choose which sap session to run the script on while launching with HTA.

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
msgbox "Please select a session to run the script on", vbSystemModal
set session = application.ActiveSession
10 |10000 characters needed characters left characters exceeded
* Please Login or Register to Answer, Follow or Comment.

1 Answer

Script Man Nov 03, 2016 at 09:58 AM
1

My Suggestion:

. . .
<script type="text/vbscript">
 Sub SAP_Script()
  set wshell = CreateObject("Wscript.Shell")
  myCur = wshell.CurrentDirectory 
  wshell.run "c:\windows\system32\wscript.exe" & " " & myCur & "\test.vbs"
 End Sub
</script>
. . .

test.vbs:

 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
 msgbox "Please select a session to run the script on", vbSystemModal
 set session =application.ActiveSession

Share
10 |10000 characters needed characters left characters exceeded