Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 2663
  • Last Modified:

Change mouse pointer to hourglass when executing a vbscript

I have an HTML file that executes a vbscript file onclick of a button. I would like to change the mouse pointer to hourglass wheile the script is executing and then return to normal. In the script I have included the statement document.body.style.cursor="hourglass" at the beginning and set to normal just before the End Sub ,  
This does not work at all. There are no errors but mouse pointer will not change .
0
caliea
Asked:
caliea
  • 7
  • 6
1 Solution
 
amit_gCommented:
It should be

document.body.style.cursor = "wait"
0
 
calieaAuthor Commented:
Thanks tried that , but mouse pointer still stays the same. actually the pointer stays as a hand instead of hourglass
0
 
amit_gCommented:
Show us the code. Do you have this online? Also, since you are using VBScript, please confirm that you are using IE. Is this over http or you using the local file system?
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
calieaAuthor Commented:
Yes I am using IE . Attached is part of the code. This is not yet online.
mainfile.html
...
<script><src="getdata.vbs" type="vbscript"></script>
...
,...
<input type="button" onclick="vbscript:getdata">

and file getdata.vbs is as :
Sub getdata()
document.body.style.cursor = "wait"
mydiv.innerhtml =" Number of records returned are " & ctr
.....
document.body.style.cursor = "normal"
End sub

mainfile.html is a form that accepts user input as to what the data is required by user and
the vbs file reads the database and returns records and the data .
What happens is that the data returned sometimes takes a while which is why we need to change the mouse pointer to hourglass, thanks
Please let me know if you need additional information
0
 
calieaAuthor Commented:
I am doing client side validation
0
 
amit_gCommented:
<script><src="getdata.vbs" type="vbscript"></script>
...
,...
<input type="button" onclick="vbscript:getdata">

should be

<script src="getdata.vbs" type="vbscript"></script>
...
,...
<input type="button" onclick="getdata">
0
 
calieaAuthor Commented:
Hi I did update that, but the mouse pointer is still the same .
0
 
amit_gCommented:
Is the script being executed? Are you getting the message "Number of records returned are" displayed on the screen?
0
 
calieaAuthor Commented:

Yes  actually we added the response=flush statement after the document.body.style.cursor="wait" statement. Now the mouse pointer changes shape correctly, but the script does not execute and it simply goes into a hang state.

Earlier the script executed correctly,
0
 
amit_gCommented:
It looks like something is being mixed up in the server side and the client side. What is used on the server side? Could you please explain the complete flow of this page?
0
 
calieaAuthor Commented:

Client side uses HTML and vbscript to connect to the main database server. We are using OTA COM API which is used by Mercury Quality Center tool to connect to Quality center on the Server. Client html file executes a vbscript locally that establishes a connection with the QC instance. This is turn sends the request to the main DB server and returns data that is then displayed on the html page.

Flow is as :  Client HTML -> vbscript -> execute vbscript locally and establish a connection with QC on server -> returns data to variables in vbscript -> variables are then displayed on HTML div containers.
0
 
amit_gCommented:
Can't say what is going on but the code you have would work just fine. You can test it on a stand alone html and run it in IE and it would work fine.
0
 
calieaAuthor Commented:
Thanks for your help,
0

Featured Post

Ask an Anonymous Question!

Don't feel intimidated by what you don't know. Ask your question anonymously. It's easy! Learn more and upgrade.

  • 7
  • 6
Tackle projects and never again get stuck behind a technical roadblock.
Join Now