Dramklukkel wrote:
Quote:
> Mark,
> thanks for your reply.
> I found the following code:
> '---------
> Dim WshShell, oExec
> Set WshShell = CreateObject("WScript.Shell")
> Set oExec = WshShell.Exec("calc")
> Do While oExec.Status = 0
> WScript.Sleep 100
> Loop
> WScript.Echo oExec.Status
> '---------
>
> I replaced the "WScript.Echo" with "Msgbox", since HTA does not seem to like
> WScript things.
> However I do not get the "WScript.Sleep 100" to work. WScript thingy again.
> I tried "iTimerID = window.setInterval("RunScript", 5000, "VBScript")" to no
> avail.
> Any hints?
This popped up as the first hit on google search:
http://www.big-fly.net/oa5599/?p=11
--
-- HAL07, Engineering Services, Norway