Tjs
Tjs

Reputation: 423

Using HTA in vbscript

While using HTA userform for VBscript, I found that HTA doesn't support WScript and its objects/methods.

Is there any alternate way of creating userform or is thery any way to make HTA support WScript?

Upvotes: 4

Views: 6851

Answers (2)

Teemu
Teemu

Reputation: 23406

Put your Wscript code to a .wsf-file and call the script like this:

shell=new ActiveXObject('WScript.Shell');
shell.Exec('WScript //Job:job_id PATH_TO_YOUR_WSF_FILE');

Via .wsf you can use also methods like WScript.Sleep(), WScript.SendKeys() etc. which are not available in HTA.

More info at MSDN: Windows Script Host

Upvotes: 2

user69820
user69820

Reputation:

An alternative to WScript.Echo would be to simply add content to the DOM:

<script language="vbscript">
    dim div: set div = document.getElementById("output")
    div.innerText = "output"
</script>

<div id="output"/>

or if you want a dialogbox instead, you can use MsgBox()

<script language="vbscript">
    MsgBox "output"
</script>

You can use Scripting.FileSystemObject without WScript

<script language="vbscript">
    dim fso: set fso = CreateObject("Scripting.FileSystemObject")
    dim path: path = fso.GetAbsolutePathName(".")
    '... etc
</script>

Upvotes: 4

Related Questions