Progress indicator 
Author Message
 Progress indicator

I am trying to use an animated GIF image in my application as a progress
indicator from within VBScript. My problem is that,  I am using an object
(EntireX) which is communicating with a mainframe application and this is
taking resources which preventing the progress indicator to show up. I have
tried the following:

</head>

<body>
'Load image
<P>&nbsp;<IMG height=60 alt="" src="./AtomAnimation.gif" width=129 border=0
name=Atom align="right"></P>

<script language="VBScript"><!--

Option Explicit

'Hide image
Atom.WIDTH = 0
Atom.Height = 0

Private Sub AcceptButton_onClick()

'Show image
Atom.WIDTH = 129
Atom.Height = 60

'Run mainframe application
Set natup = CreateObject("......")
natup.TimeOut = ...
natup.name   <! ...... PARAEMTERS  -->

'Hide image
Atom.WIDTH = 0
Atom.Height = 0

end sub

I hope somebody can help me
Thank you
Alex



Tue, 29 Apr 2003 03:00:00 GMT  
 Progress indicator
hi Alexandra,

This is just a guess, but could it be that your script is "hung up" waiting
for the mainframe app to finish, and more significantly, isn't giving any
cpu cycles back to IE in order to run the animation"

In Visual Basic we would need to make a provision for "DoEvents" to give up
the cpu once in a while to do other things.

In your situation, I would suggest setting a timer to get back control
periodically, that might allow for some cpu cycles to get the animation
going...

hth, jw


Quote:
> I am trying to use an animated GIF image in my application as a progress
> indicator from within VBScript. My problem is that,  I am using an object
> (EntireX) which is communicating with a mainframe application and this is
> taking resources which preventing the progress indicator to show up. I
have
> tried the following:

> </head>

> <body>
> 'Load image
> <P>&nbsp;<IMG height=60 alt="" src="./AtomAnimation.gif" width=129
border=0
> name=Atom align="right"></P>

> <script language="VBScript"><!--

> Option Explicit

> 'Hide image
> Atom.WIDTH = 0
> Atom.Height = 0

> Private Sub AcceptButton_onClick()

> 'Show image
> Atom.WIDTH = 129
> Atom.Height = 60

> 'Run mainframe application
> Set natup = CreateObject("......")
> natup.TimeOut = ...
> natup.name   <! ...... PARAEMTERS  -->

> 'Hide image
> Atom.WIDTH = 0
> Atom.Height = 0

> end sub

> I hope somebody can help me
> Thank you
> Alex



Wed, 30 Apr 2003 03:00:00 GMT  
 Progress indicator
The "problem" is more likely to be the fact that IE simply doesn't update the UI while script code
is executing.  The EntireX ActiveX component probably isn't executing asynchronously.  So until it
finishes, it's no different than the event handler running a tight resource intensive loop 10000
times...

--
Michael Harris
Microsoft.MVP.Scripting
--

Quote:
> hi Alexandra,

> This is just a guess, but could it be that your script is "hung up" waiting
> for the mainframe app to finish, and more significantly, isn't giving any
> cpu cycles back to IE in order to run the animation"

> In visual basic we would need to make a provision for "DoEvents" to give up
> the cpu once in a while to do other things.

> In your situation, I would suggest setting a timer to get back control
> periodically, that might allow for some cpu cycles to get the animation
> going...

> hth, jw



> > I am trying to use an animated GIF image in my application as a progress
> > indicator from within VBScript. My problem is that,  I am using an object
> > (EntireX) which is communicating with a mainframe application and this is
> > taking resources which preventing the progress indicator to show up. I
> have
> > tried the following:

> > </head>

> > <body>
> > 'Load image
> > <P>&nbsp;<IMG height=60 alt="" src="./AtomAnimation.gif" width=129
> border=0
> > name=Atom align="right"></P>

> > <script language="VBScript"><!--

> > Option Explicit

> > 'Hide image
> > Atom.WIDTH = 0
> > Atom.Height = 0

> > Private Sub AcceptButton_onClick()

> > 'Show image
> > Atom.WIDTH = 129
> > Atom.Height = 60

> > 'Run mainframe application
> > Set natup = CreateObject("......")
> > natup.TimeOut = ...
> > natup.name   <! ...... PARAEMTERS  -->

> > 'Hide image
> > Atom.WIDTH = 0
> > Atom.Height = 0

> > end sub

> > I hope somebody can help me
> > Thank you
> > Alex



Wed, 30 Apr 2003 03:00:00 GMT  
 Progress indicator

Hi All,

 not, that I figured out exactly when it is working, I recommend a simple
test with the following statements:

  window.offscreenBuffering = True
  window.screen.updateInterval = 10    'Or something else (milliseconds !!!)

 I have a servermonitor (based on WMI/HTA) where it was very useful, that I
found these in the IE docs.

Best regards,
Manfred Braun

(Private)
Lange Roetterstrasse 7
D68167 Mannheim
Germany


(Remove the anti-spam-underscore to mail me!)


Quote:
> The "problem" is more likely to be the fact that IE simply doesn't update

the UI while script code
Quote:
> is executing.  The EntireX ActiveX component probably isn't executing

asynchronously.  So until it
Quote:
> finishes, it's no different than the event handler running a tight

resource intensive loop 10000
Quote:
> times...

> --
> Michael Harris
> Microsoft.MVP.Scripting
> --


> > hi Alexandra,

> > This is just a guess, but could it be that your script is "hung up"
waiting
> > for the mainframe app to finish, and more significantly, isn't giving
any
> > cpu cycles back to IE in order to run the animation"

> > In visual basic we would need to make a provision for "DoEvents" to give
up
> > the cpu once in a while to do other things.

> > In your situation, I would suggest setting a timer to get back control
> > periodically, that might allow for some cpu cycles to get the animation
> > going...

> > hth, jw



> > > I am trying to use an animated GIF image in my application as a
progress
> > > indicator from within VBScript. My problem is that,  I am using an
object
> > > (EntireX) which is communicating with a mainframe application and this
is
> > > taking resources which preventing the progress indicator to show up. I
> > have
> > > tried the following:

> > > </head>

> > > <body>
> > > 'Load image
> > > <P>&nbsp;<IMG height=60 alt="" src="./AtomAnimation.gif" width=129
> > border=0
> > > name=Atom align="right"></P>

> > > <script language="VBScript"><!--

> > > Option Explicit

> > > 'Hide image
> > > Atom.WIDTH = 0
> > > Atom.Height = 0

> > > Private Sub AcceptButton_onClick()

> > > 'Show image
> > > Atom.WIDTH = 129
> > > Atom.Height = 60

> > > 'Run mainframe application
> > > Set natup = CreateObject("......")
> > > natup.TimeOut = ...
> > > natup.name   <! ...... PARAEMTERS  -->

> > > 'Hide image
> > > Atom.WIDTH = 0
> > > Atom.Height = 0

> > > end sub

> > > I hope somebody can help me
> > > Thank you
> > > Alex



Thu, 01 May 2003 03:00:00 GMT  
 Progress indicator

hi Alexandra (Take 2),

Judging from Michael's comment that the cpu is locked up doing your
mainframe session, I would suggest opening another window.  If you are using
Internet Explorer, you might try the (relatively) new dhtml feature, the
"modeless dialog".

So, open "modeless dialog" showing a reassuring message ("Dear User, please
be patient while I am working to complete your task, signed Alexandra") and
show your animation.  Then do your mainframe job.  When the job is finished,
then close the "modeless dialog".

If you are not yet familiar with "modeless dialogs" go to
http://msdn.microsoft.com and search for "showmodelessdialog", and a bunch
of references will pop up.  This one is a good place to start:

   http://msdn.microsoft.com/voices/dude09252000.asp

cheers, jw


Quote:
> I am trying to use an animated GIF image in my application as a progress
> indicator from within VBScript. My problem is that,  I am using an object
> (EntireX) which is communicating with a mainframe application and this is
> taking resources which preventing the progress indicator to show up. I
have
> tried the following:

> </head>

> <body>
> 'Load image
> <P>&nbsp;<IMG height=60 alt="" src="./AtomAnimation.gif" width=129
border=0
> name=Atom align="right"></P>

> <script language="VBScript"><!--

> Option Explicit

> 'Hide image
> Atom.WIDTH = 0
> Atom.Height = 0

> Private Sub AcceptButton_onClick()

> 'Show image
> Atom.WIDTH = 129
> Atom.Height = 60

> 'Run mainframe application
> Set natup = CreateObject("......")
> natup.TimeOut = ...
> natup.name   <! ...... PARAEMTERS  -->

> 'Hide image
> Atom.WIDTH = 0
> Atom.Height = 0

> end sub

> I hope somebody can help me
> Thank you
> Alex



Fri, 02 May 2003 03:00:00 GMT  
 Progress indicator
Hello Jim,
    I would like first  to thank everybody who answered my message. I have
tried what michael and manfred suggested but somehow my animation was
showing up after the mainframe job is finished. I have tried the  modeless
dialog and it worked fine.
I would like to take this opportunity to wish everybody a merry  Christmas
and a very happy, healthy and successful new year

Alexandra


Quote:
> hi Alexandra (Take 2),

> Judging from Michael's comment that the cpu is locked up doing your
> mainframe session, I would suggest opening another window.  If you are
using
> Internet Explorer, you might try the (relatively) new dhtml feature, the
> "modeless dialog".

> So, open "modeless dialog" showing a reassuring message ("Dear User,
please
> be patient while I am working to complete your task, signed Alexandra")
and
> show your animation.  Then do your mainframe job.  When the job is
finished,
> then close the "modeless dialog".

> If you are not yet familiar with "modeless dialogs" go to
> http://msdn.microsoft.com and search for "showmodelessdialog", and a bunch
> of references will pop up.  This one is a good place to start:

>    http://msdn.microsoft.com/voices/dude09252000.asp

> cheers, jw



> > I am trying to use an animated GIF image in my application as a progress
> > indicator from within VBScript. My problem is that,  I am using an
object
> > (EntireX) which is communicating with a mainframe application and this
is
> > taking resources which preventing the progress indicator to show up. I
> have
> > tried the following:

> > </head>

> > <body>
> > 'Load image
> > <P>&nbsp;<IMG height=60 alt="" src="./AtomAnimation.gif" width=129
> border=0
> > name=Atom align="right"></P>

> > <script language="VBScript"><!--

> > Option Explicit

> > 'Hide image
> > Atom.WIDTH = 0
> > Atom.Height = 0

> > Private Sub AcceptButton_onClick()

> > 'Show image
> > Atom.WIDTH = 129
> > Atom.Height = 60

> > 'Run mainframe application
> > Set natup = CreateObject("......")
> > natup.TimeOut = ...
> > natup.name   <! ...... PARAEMTERS  -->

> > 'Hide image
> > Atom.WIDTH = 0
> > Atom.Height = 0

> > end sub

> > I hope somebody can help me
> > Thank you
> > Alex



Mon, 02 Jun 2003 17:22:37 GMT  
 Progress indicator
hi Alexandra,

thanks for the positive feedback, and Merry Christmas to you too, jw


Quote:
> Hello Jim,
>     I would like first  to thank everybody who answered my message. I have
> tried what michael and manfred suggested but somehow my animation was
> showing up after the mainframe job is finished. I have tried the  modeless
> dialog and it worked fine.
> I would like to take this opportunity to wish everybody a merry  Christmas
> and a very happy, healthy and successful new year

> Alexandra



Wed, 11 Jun 2003 03:11:16 GMT  
 
 [ 7 post ] 

 Relevant Pages 

1. Processing or Progress Indicators - POLL

2. Progress indicator - HELP!!!

3. Progress Indicator?

4. Progress indicator

5. Progress Indicator on Form

6. Coding a progress indicator

7. CDO Delivernow Method and progress indicator

8. Progress indicator

9. Progress Indicator IN Statusbar

10. FTP upload with progress indicator

11. Progress Indicator with Webforms...

12. HELP: Progress Indicator for queries

 

 
Powered by phpBB® Forum Software