the perfect function

R

Roland Hall

Can someone please come up with a function that will accomplish this?

function bugs(err, code)
put user.inDark(err)
fixed = code.repair(err)
history.go(-1)
bugs = fixed
end function

To call it would probably require something like this:

Zap After Preempt Post Each Repair

Maybe it could be a COM file?!

dim bugfix
set bugfix = CreateObject("ZAPPER.bugs")

--
Roland Hall
/* This information is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of merchantability
or fitness for a particular purpose. */
Technet Script Center - http://www.microsoft.com/technet/scriptcenter/
WSH 5.6 Documentation - http://msdn.microsoft.com/downloads/list/webdev.asp
MSDN Library - http://msdn.microsoft.com/library/default.asp
 
C

Cactus Corp.

Roland Hall said:
Can someone please come up with a function that will accomplish this?

function bugs(err, code)
put user.inDark(err)
fixed = code.repair(err)
history.go(-1)
bugs = fixed
end function

To call it would probably require something like this:

Zap After Preempt Post Each Repair

Maybe it could be a COM file?!

dim bugfix
set bugfix = CreateObject("ZAPPER.bugs")

Something's missing :
bugs = fixed Time.RollbackToBeforeEvent();
end function

;)
Antonio
 
R

Roland Hall

in message
:
: > Can someone please come up with a function that will accomplish this?
: >
: > function bugs(err, code)
: > put user.inDark(err)
: > fixed = code.repair(err)
: > history.go(-1)
: > bugs = fixed
: > end function
: >
: > To call it would probably require something like this:
: >
: > Zap After Preempt Post Each Repair
: >
: > Maybe it could be a COM file?!
: >
: > dim bugfix
: > set bugfix = CreateObject("ZAPPER.bugs")
: >
: > --
: > Roland Hall
:
: Something's missing :
:
: > bugs = fixed
: Time.RollbackToBeforeEvent();
: > end function

That's what this was for: history.go(-1)

However, that would be mixing javascript with vbscript so yours sounds
better.

I also forgot to turn the light back on.

Revised:

function bugs(err, code)
put user.inDark(err)
fixed = code.repair(err)
Time.RollbackToBeforeEvent(err)
pop user.inDark(err)
bugs = fixed
end function

--
Roland Hall
/* This information is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of merchantability
or fitness for a particular purpose. */
Technet Script Center - http://www.microsoft.com/technet/scriptcenter/
WSH 5.6 Documentation - http://msdn.microsoft.com/downloads/list/webdev.asp
MSDN Library - http://msdn.microsoft.com/library/default.asp
 
D

Dave Anderson

Roland said:
put user.inDark(err)
...
pop user.inDark(err)

Seems to me it ought to read:

Dark.push(user)
...
Dark.pop()



--
Dave Anderson

Unsolicited commercial email will be read at a cost of $500 per message. Use
of this email address implies consent to these terms. Please do not contact
me directly or ask me to contact you directly for assistance. If your
question is worth asking, it's worth posting.
 
R

Roland Hall

in message
: Roland Hall wrote:
: > put user.inDark(err)
: > ...
: > pop user.inDark(err)
:
: Seems to me it ought to read:
:
: Dark.push(user)
: ...
: Dark.pop()

Thanks. Making the corrections...

function bugs(err, code, user)
Dark.push(user)
fixed = code.repair(err)
Time.RollbackToBeforeEvent(err)
Dark.pop()
bugs = fixed
end function

--
Roland Hall
/* This information is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of merchantability
or fitness for a particular purpose. */
Technet Script Center - http://www.microsoft.com/technet/scriptcenter/
WSH 5.6 Documentation - http://msdn.microsoft.com/downloads/list/webdev.asp
MSDN Library - http://msdn.microsoft.com/library/default.asp
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

VBScript function returning multiple values 17
ASP design question 4
Compressed Zipped Folder 6
sub or function 26
screen scraping 4
Application question 2
replace text 2
MSXML2.XMLHTTP 23

Members online

No members online now.

Forum statistics

Threads
473,770
Messages
2,569,584
Members
45,075
Latest member
MakersCBDBloodSupport

Latest Threads

Top