.NET Development
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
 
User Name:
Password:
Remember me
Go Back   ASP Free ForumsProgramming.NET Development

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread ASP Free Forums Sponsor:
  #1  
Old March 1st, 2002, 03:16 AM
Steve Schofield Steve Schofield is offline
Contributing User
ASP Free God 20th Plane (14500 - 14999 posts)
 
Join Date: Dec 2002
Posts: 14,575 Steve Schofield User rank is Corporal (100 - 500 Reputation Level)Steve Schofield User rank is Corporal (100 - 500 Reputation Level)Steve Schofield User rank is Corporal (100 - 500 Reputation Level)Steve Schofield User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 23
How to call a VBScript function in a <a href> tag

<i><b>Originally posted by : Guillermo Conde (guillermo_conde@yahoo.com)</b></i><br />Hi there, i have a page that have the following funtion in the head section:<br /><br /> Sub ButtonUpd_OnClick<br /> Dim TheForm<br /><br /> Set TheForm= Document.FormAdd<br /><br />' aux=msgbox(Trim("<%=OldPassword%>" + "la"))<br /><br /> if TheForm.OldPwd.value <> "<%=OldPassword%>" then<br /> aux = MsgBox("The Old Password doesn't match, please, try again",48,"WSMS")<br /> else<br /> if TheForm.AddPsw1.value = "<%=OldPassword%>" then<br /> aux=MsgBox("The Old Password and the New Password must be different",48,"WSMS")<br /> else<br /> If TheForm.AddPsw1.value="" then<br /> aux=msgbox("The Password hasn´t been introduced & is required",48,"WSMS") <br /> Document.FormAdd.AddPsw1.focus<br /> else<br /> If TheForm.AddPsw1.value <> TheForm.AddPsw2.value then<br /> aux=msgbox("The Passwords are wrong",48,"WSMS") <br /> Document.FormAdd.AddPsw1.focus<br /> else<br /> Document.FormAdd.Submit<br /> end if 'Passwords <br /> end if 'Password<br /> end if<br /> end if<br /> End Sub<br /><br /><br />And the image like this:<br /><br /><a onMouseOut='MM_swapImgRestore()' onMouseOver="+chr(34)+"MM_swapImage('document.ButtonUpd','document.Button Upd','../../../Images/ButtUpd2.gif')"+chr(34)+" >"%><img name="ButtonUpd" border="0" src="../../../Images/ButtUpd1.gif" width="80" height="15"></a><br /><br />And then an image with the name ButtonUpd, when the button is clicked the sub is called, but i need that when the mouse pass over the image the hand appears and at this moment, the cursor doesn't change by the hand. ¿how can you call the VB function inside the <a> </a> tag?<br /><br />Thanks in advance<br />

Reply With Quote
  #2  
Old April 4th, 2002, 09:41 AM
Steve Schofield Steve Schofield is offline
Contributing User
ASP Free God 20th Plane (14500 - 14999 posts)
 
Join Date: Dec 2002
Posts: 14,575 Steve Schofield User rank is Corporal (100 - 500 Reputation Level)Steve Schofield User rank is Corporal (100 - 500 Reputation Level)Steve Schofield User rank is Corporal (100 - 500 Reputation Level)Steve Schofield User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 23
<i><b>Originally posted by : Michael Duchscherer</b></i><br />Here is an example of what I think you want.<br /><br /><A ID="lnkID" onMouseOver="lnkID.style.cursor='hand'" ONCLICK="{subroutine to call}"><br /><br /><br />------------<br />Guillermo Conde at 3/1/2002 12:16:47 PM<br /><br />Hi there, i have a page that have the following funtion in the head section:<br /><br /> Sub ButtonUpd_OnClick<br /> Dim TheForm<br /><br /> Set TheForm= Document.FormAdd<br /><br />' aux=msgbox(Trim("<%=OldPassword%>" + "la"))<br /><br /> if TheForm.OldPwd.value <> "<%=OldPassword%>" then<br /> aux = MsgBox("The Old Password doesn't match, please, try again",48,"WSMS")<br /> else<br /> if TheForm.AddPsw1.value = "<%=OldPassword%>" then<br /> aux=MsgBox("The Old Password and the New Password must be different",48,"WSMS")<br /> else<br /> If TheForm.AddPsw1.value="" then<br /> aux=msgbox("The Password hasn´t been introduced & is required",48,"WSMS") <br /> Document.FormAdd.AddPsw1.focus<br /> else<br /> If TheForm.AddPsw1.value <> TheForm.AddPsw2.value then<br /> aux=msgbox("The Passwords are wrong",48,"WSMS") <br /> Document.FormAdd.AddPsw1.focus<br /> else<br /> Document.FormAdd.Submit<br /> end if 'Passwords <br /> end if 'Password<br /> end if<br /> end if<br /> End Sub<br /><br /><br />And the image like this:<br /><br /><a onMouseOut='MM_swapImgRestore()' onMouseOver="+chr(34)+"MM_swapImage('document.ButtonUpd','document.Button Upd','../../../Images/ButtUpd2.gif')"+chr(34)+" >"%><img name="ButtonUpd" border="0" src="../../../Images/ButtUpd1.gif" width="80" height="15"></a><br /><br />And then an image with the name ButtonUpd, when the button is clicked the sub is called, but i need that when the mouse pass over the image the hand appears and at this moment, the cursor doesn't change by the hand. ¿how can you call the VB function inside the <a> </a> tag?<br /><br />Thanks in advance<br />

Reply With Quote
Reply

Viewing: ASP Free ForumsProgramming.NET Development > How to call a VBScript function in a tag


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump


Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2008 by Developer Shed. All rights reserved. DS Cluster 1 hosted by Hostway
Stay green...Green IT