Solved

SetIntervalin vbscript

Posted on 2002-07-17
6
191 Views
Last Modified: 2010-04-09
Hi,
Can anyone tell me the solution to this:
I have text fading from white to blue using the setInterval function.

I have:
fontint = setInterval("changeColor",50)


Sub changeColor()
... Then the rest of the code to change the color

It works fine but when it's finished fading I want setInterval to stop. It continues calling that function after it's finished.
Microsoft DHTML documentation says (about SetInterval):
"Returns an integer identifier representing the interval. Use this identifier to clear (stop) the interval."

I have tried setting fontint to null and zero but it makes no difference. I have also tried this:
fontint = setInterval("changeColor",0)

and this,

fontint = setInterval("",0)


Please any ideas would be very welcome.
Thanks,
Rhods.

0
Comment
Question by:Rhods
6 Comments
 
LVL 33

Expert Comment

by:knightEknight
ID: 7160438
instead of using setInterval, call setTimeout from the sub like this:


   sub changeColor

     'your change-color code here

     if ( notFinishedFading ) then
        setTimeout("changeColor",50)
     end if

   end sub



and instead of this,

   fontint = setInterval("changeColor",0)

just do this

   call changeColor
0
 
LVL 22

Accepted Solution

by:
CJ_S earned 300 total points
ID: 7164230
declare global:
dim myinterval

myinterval = setInterval("changecolor", 100)

and to stop:
clearInterval(myinterval)

CJ
0
 
LVL 22

Expert Comment

by:CJ_S
ID: 7171215
Any update?
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 53

Expert Comment

by:COBOLdinosaur
ID: 7240664
This question has been abandoned. I will make a recommendation to the
moderators on its resolution in a week or two. I appreciate any comments
that would help me to make a recommendation.
<note>
   In the absence of responses, I may recommend DELETE unless it is clear
   to me that it has value as a PAQ.  Silence = you don't care
</note>

Cd&

0
 
LVL 53

Expert Comment

by:COBOLdinosaur
ID: 7270978
It is time to clean this abandoned question up.  

I am putting it on a clean up list for CS.

<recommendation>
points to CJ_S

</recommendation>

If anyone participating in the Q disagrees with the recommendation,
please leave a comment for the mods.

Cd&
0
 
LVL 5

Expert Comment

by:Netminder
ID: 7297712
Per recommendation, force-accepted.

Netminder
CS Moderator
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

SASS allows you to treat your CSS code in a more OOP way. Let's have a look on how you can structure your code in order for it to be easily maintained and reused.
Building a website can seem like a daunting task to the uninitiated but it really only requires knowledge of two basic languages: HTML and CSS.
The viewer will learn the basics of jQuery including how to code hide show and toggles. Reference your jQuery libraries: (CODE) Include your new external js/jQuery file: (CODE) Write your first lines of code to setup your site for jQuery…
Learn how to create flexible layouts using relative units in CSS.  New relative units added in CSS3 include vw(viewports width), vh(viewports height), vmin(minimum of viewports height and width), and vmax (maximum of viewports height and width).

862 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

25 Experts available now in Live!

Get 1:1 Help Now