How can I extract the running scripts name using PCOMM VBScript
First time posting so please forgive me if I miss something.
I'm trying to output the name of the running script (along with other variables) to a plain text file. I've been able to get everything else I need except for the Script Name. I've tried using WScript & Echo commands but they do not appear to function in my environment. These are PCOMM .mac files.
Thanks in advance
Here are some of things I've tried so far:
FilePath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")`
<<< The above works for Filepath but does not include the macro name
FileName = CreateObject("Scripting.FileSystemObject").GetFileName(".")
<<< The above just outputs the "."
Dim scriptName : scriptName = WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Dim scriptName : WScript.Echo WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Function GetName()
Dim WshShell, objEnv
Set WshShell = CreateObject("WScript.Shell")
Set objEnv = WshShell.Environment("Process")
GetName = objEnv("SCRIPTNAME")
End Function
<<< The above doesn't output anything. I used similar logic to successfully extract the HOMEPATH.
vbscript
add a comment |
First time posting so please forgive me if I miss something.
I'm trying to output the name of the running script (along with other variables) to a plain text file. I've been able to get everything else I need except for the Script Name. I've tried using WScript & Echo commands but they do not appear to function in my environment. These are PCOMM .mac files.
Thanks in advance
Here are some of things I've tried so far:
FilePath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")`
<<< The above works for Filepath but does not include the macro name
FileName = CreateObject("Scripting.FileSystemObject").GetFileName(".")
<<< The above just outputs the "."
Dim scriptName : scriptName = WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Dim scriptName : WScript.Echo WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Function GetName()
Dim WshShell, objEnv
Set WshShell = CreateObject("WScript.Shell")
Set objEnv = WshShell.Environment("Process")
GetName = objEnv("SCRIPTNAME")
End Function
<<< The above doesn't output anything. I used similar logic to successfully extract the HOMEPATH.
vbscript
add a comment |
First time posting so please forgive me if I miss something.
I'm trying to output the name of the running script (along with other variables) to a plain text file. I've been able to get everything else I need except for the Script Name. I've tried using WScript & Echo commands but they do not appear to function in my environment. These are PCOMM .mac files.
Thanks in advance
Here are some of things I've tried so far:
FilePath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")`
<<< The above works for Filepath but does not include the macro name
FileName = CreateObject("Scripting.FileSystemObject").GetFileName(".")
<<< The above just outputs the "."
Dim scriptName : scriptName = WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Dim scriptName : WScript.Echo WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Function GetName()
Dim WshShell, objEnv
Set WshShell = CreateObject("WScript.Shell")
Set objEnv = WshShell.Environment("Process")
GetName = objEnv("SCRIPTNAME")
End Function
<<< The above doesn't output anything. I used similar logic to successfully extract the HOMEPATH.
vbscript
First time posting so please forgive me if I miss something.
I'm trying to output the name of the running script (along with other variables) to a plain text file. I've been able to get everything else I need except for the Script Name. I've tried using WScript & Echo commands but they do not appear to function in my environment. These are PCOMM .mac files.
Thanks in advance
Here are some of things I've tried so far:
FilePath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")`
<<< The above works for Filepath but does not include the macro name
FileName = CreateObject("Scripting.FileSystemObject").GetFileName(".")
<<< The above just outputs the "."
Dim scriptName : scriptName = WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Dim scriptName : WScript.Echo WScript.ScriptName
<<< The above gives error message: Variable is undefined: 'WScript'
Function GetName()
Dim WshShell, objEnv
Set WshShell = CreateObject("WScript.Shell")
Set objEnv = WshShell.Environment("Process")
GetName = objEnv("SCRIPTNAME")
End Function
<<< The above doesn't output anything. I used similar logic to successfully extract the HOMEPATH.
vbscript
vbscript
edited Nov 12 '18 at 16:00
Newbie101
asked Nov 12 '18 at 14:57
Newbie101Newbie101
63
63
add a comment |
add a comment |
1 Answer
1
active
oldest
votes
I managed to figure this one out after all:
REM Initialize the session
sHandle = autECLConnMgr.autECLConnList(1).Handle
REM Connect to the current session
sHandle = autECLSession.Handle
msgbox("Variable Check: " & ThisMacroName), vbOKOnly, "Validation check"
add a comment |
Your Answer
StackExchange.ifUsing("editor", function ()
StackExchange.using("externalEditor", function ()
StackExchange.using("snippets", function ()
StackExchange.snippets.init();
);
);
, "code-snippets");
StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "1"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);
else
createEditor();
);
function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);
);
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53264758%2fhow-can-i-extract-the-running-scripts-name-using-pcomm-vbscript%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
1 Answer
1
active
oldest
votes
1 Answer
1
active
oldest
votes
active
oldest
votes
active
oldest
votes
I managed to figure this one out after all:
REM Initialize the session
sHandle = autECLConnMgr.autECLConnList(1).Handle
REM Connect to the current session
sHandle = autECLSession.Handle
msgbox("Variable Check: " & ThisMacroName), vbOKOnly, "Validation check"
add a comment |
I managed to figure this one out after all:
REM Initialize the session
sHandle = autECLConnMgr.autECLConnList(1).Handle
REM Connect to the current session
sHandle = autECLSession.Handle
msgbox("Variable Check: " & ThisMacroName), vbOKOnly, "Validation check"
add a comment |
I managed to figure this one out after all:
REM Initialize the session
sHandle = autECLConnMgr.autECLConnList(1).Handle
REM Connect to the current session
sHandle = autECLSession.Handle
msgbox("Variable Check: " & ThisMacroName), vbOKOnly, "Validation check"
I managed to figure this one out after all:
REM Initialize the session
sHandle = autECLConnMgr.autECLConnList(1).Handle
REM Connect to the current session
sHandle = autECLSession.Handle
msgbox("Variable Check: " & ThisMacroName), vbOKOnly, "Validation check"
edited Nov 19 '18 at 14:24
answered Nov 19 '18 at 14:19
Newbie101Newbie101
63
63
add a comment |
add a comment |
Thanks for contributing an answer to Stack Overflow!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
To learn more, see our tips on writing great answers.
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53264758%2fhow-can-i-extract-the-running-scripts-name-using-pcomm-vbscript%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown