How can I use wscript.sleep from Internet Explorer menu script?

How can I use wscript.sleep from Internet Explorer menu script?

Hello,

I have a VB script which is called by internet explorer in response to a 
context menu selection.  I used the techinques in this article:

http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/ext/tutorials/context.asp

In my script, I can do lots of things but unlike VB scripts run from the 
command line I can't do things like "wscript sleep 1000".  If I try I get 
"Error: Object required: 'WScript'".

So how can I use wscript features from an Internet Explorer VB script?

Thanks!

Grant Schenck

date: Thu, 23 Mar 2006 18:12:10 -0500 author: Grant Schenck

Re: How can I use wscript.sleep from Internet Explorer menu script?

If you're running a client-side VB script within the browser, the WSH
objects aren't available because you're not using the WSH to execute
the code.  Although I could be wrong, I am not aware of any object
available to VBS within the browser that allows for the non-processor
intensive sleep function.

date: Thu, 23 Mar 2006 17:06:55 -0800 author: JTW

RE: How can I use wscript.sleep from Internet Explorer menu script?

I use the timer for this.

you'll have to cut the process in two (or more if you want to use the sleep 
more often.  
Or alternatively make your function state driven, which so that it can be be 
called multiple times and depending on a global state will process a 
different section of your code.  
Below is an example of how I do it, All you need to do is replace 
YourFunction in the function ItsTime and from your code you call 
StartProcess(Yourfunction) and 

(I have clipped it out of existing code, I think it will function as is, but 
maybe overlooked something.

dim gStatusTimer
Function StartStatusTimer
   if gStatusTimer = 0 Then
      gStatusTimer = window.setInterval("ItsTime()", 1000)
   End If
End Function

Function StopStatusTimer
   if gStatusTimer <> 0 Then
      window.clearInterval gStatusTimer
      gStatusTimer = 0
   end If
End Function

Dim gProcessName
Sub StartProcess(sProcessName)
   gProcessName = sProcessName
End Sub

Function AtLeastOneMachineInstalling
   AtLeastOneMachineInstalling = True
End Function

Function ItsTime
   'Stop the timer to avoid a timer event during a lengthy process.
   StopStatusTimer

   If Len(gProcessName) > 0 Then
      sTemp = gProcessName
      gProcessName = ""

      Select Case sTemp
      Case "YourFunction"
         YourFunction
      Case Else
         Msgbox "Programming error: process called: " & sTemp
      End Select
   End If

   StartStatusTimer
End Function

"Grant Schenck" wrote:

> Hello,
> 
> I have a VB script which is called by internet explorer in response to a 
> context menu selection.  I used the techinques in this article:
> 
> http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/ext/tutorials/context.asp
> 
> In my script, I can do lots of things but unlike VB scripts run from the 
> command line I can't do things like "wscript sleep 1000".  If I try I get 
> "Error: Object required: 'WScript'".
> 
> So how can I use wscript features from an Internet Explorer VB script?
> 
> Thanks!
> 
> Grant Schenck 
> 
> 
> .
>

date: Sun, 26 Mar 2006 15:06:33 -0800 author: wimZ

Re: How can I use wscript.sleep from Internet Explorer menu script?

This looks like a possible solution, I'm not familiar with using timers from 
VB script.

Based on the code below, I'm not clear what the script is doing while this 
periodic timer events happen?

For example, presumably after I kick off some activity which I want to check 
up on later I call your StartStatusTimer function.  Then what do I do?  What 
does the script wait on so that the timer interval task can get control?

By the way, the COM object I'm interfacing with generates an event.  Can 
somehow handle that directly from VB script and if so, again, what does is 
my script doing when it is in the mode waiting for events?

Thanks!
-- 
Grant Schenck
http://grantschenck.tripod.com

"wimZ"  wrote in message 
news:1249C51B-CDDE-4110-8A13-35EF3B97E980@microsoft.com...
>I use the timer for this.
>
> you'll have to cut the process in two (or more if you want to use the 
> sleep
> more often.
> Or alternatively make your function state driven, which so that it can be 
> be
> called multiple times and depending on a global state will process a
> different section of your code.
> Below is an example of how I do it, All you need to do is replace
> YourFunction in the function ItsTime and from your code you call
> StartProcess(Yourfunction) and
>
> (I have clipped it out of existing code, I think it will function as is, 
> but
> maybe overlooked something.
>
>
> dim gStatusTimer
> Function StartStatusTimer
>   if gStatusTimer = 0 Then
>      gStatusTimer = window.setInterval("ItsTime()", 1000)
>   End If
> End Function
>
> Function StopStatusTimer
>   if gStatusTimer <> 0 Then
>      window.clearInterval gStatusTimer>      gStatusTimer = 0
>   end If
> End Function
>
> Dim gProcessName
> Sub StartProcess(sProcessName)
>   gProcessName = sProcessName
> End Sub
>
> Function AtLeastOneMachineInstalling
>   AtLeastOneMachineInstalling = True
> End Function
>
> Function ItsTime
>   'Stop the timer to avoid a timer event during a lengthy process.
>   StopStatusTimer
>
>   If Len(gProcessName) > 0 Then
>      sTemp = gProcessName
>      gProcessName = ""
>
>      Select Case sTemp
>      Case "YourFunction"
>         YourFunction
>      Case Else
>         Msgbox "Programming error: process called: " & sTemp
>      End Select
>   End If
>
>   StartStatusTimer
> End Function
>
>
> "Grant Schenck" wrote:
>
>> Hello,
>>
>> I have a VB script which is called by internet explorer in response to a
>> context menu selection.  I used the techinques in this article:
>>
>> http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/ext/tutorials/context.asp
>>
>> In my script, I can do lots of things but unlike VB scripts run from the
>> command line I can't do things like "wscript sleep 1000".  If I try I get
>> "Error: Object required: 'WScript'".
>>
>> So how can I use wscript features from an Internet Explorer VB script?
>>
>> Thanks!
>>
>> Grant Schenck
>>
>>
>> .
>>

date: Mon, 27 Mar 2006 10:48:18 -0500 author: Grant Schenck