Solved

Keypress Event

Posted on 2000-04-18
7
451 Views
Last Modified: 2008-02-20
   I am new to VB Script and ASP. I am used to the Keypress event in VB and am looking for an example of the same in VB Script.
    Okay, I know there are client events for the input type=text called onkeypress and onkeydown. Can someone give me an idea how these events are properly taken advantage of?
    Please post your code below. (I am specifically looking for a way to check for the enter key to direct the page to a sub, and not allowing for ' character in certain fields for obvious reasons.)

Thanks in advance.
0
Comment
Question by:Spartikus
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 2
7 Comments
 
LVL 1

Expert Comment

by:cable4096
ID: 2728081

<script language="VBScript">
Sub cmd_Status_Click_Keypress
if KeyASCII = 13 then
   Navigate "subpage.asp"
End if
End Sub
</script>

The button named cmd_Status will have a Keypress event. ASCII 13 is a carriage return, if the user presses this on the button, it will go to subpage.asp via the navigate command.

I suppose you could have it on a Form event as well?

As for not allowing the ' character, just do a:

s_text = Replace(s_text,"'","")

Before submitting a string via the navigate command.
0
 
LVL 1

Expert Comment

by:cable4096
ID: 2728103
Sorry, I think it should be without the click in the name of the sub. Try the replace command like this:

<script language="VBScript">
Sub cmd_Status_Keypress
Dim s_Text
if KeyASCII = 13 then
   s_Text = "" & document.form.txtname.value
   s_Text = Replace(s_Text,"'","")
   Navigate "subpage.asp?s_Text=" & s_Text
End if
End Sub
</script>

It combines the technuiqes, removing the quote characters from the string, and then navigating to the sub page with a parameter set to the text box the user entered information into.

Some people doublequote like so:
s_Text = Replace(s_Text,"'","''")

Or chnage it to the aposterphy

s_Text = Replace(s_Text,"'","`")

0
 
LVL 1

Author Comment

by:Spartikus
ID: 2728466
Edited text of question.
0
Technology Partners: 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!

 
LVL 1

Author Comment

by:Spartikus
ID: 2728527
cable4096

   -Did you test this answer? It doesn't appear as it really recognizes KEYAscii in the sub...  please explain to me why when I try it, it does not.
0
 
LVL 1

Author Comment

by:Spartikus
ID: 2728531
cable4096

   -Did you test this answer? It doesn't appear as if it really recognizes KEYAscii in the sub...  please explain to me why when I try it, it does not.
0
 

Accepted Solution

by:
markdouglas earned 100 total points
ID: 2730987

I use this Javascript Client Side code quite often to detect the enter key or the escape key on a page.  



This is the html required
<html>
<body  onkeypress="CmdKeyPress();" onload="OnWindowLoad();" >
</html>




This is the Client side code required
<script language="JavaScript">

function CmdKeyPress()
{
      var strKeyCode;

      strKeyCode = window.event.keyCode;
        // Enter
      if(strKeyCode == 13)
      {
            if(document.YourForm.cmdSave.disabled == false)
            {   // Call Function1
                  Function1();
            }
            else
            {    // Call Function2
                  Function2();
            }
      }
        // Cancel
      if(strKeyCode == 27)
      {
            Function3();
      }
}

</Script>

0
 
LVL 1

Author Comment

by:Spartikus
ID: 2731527
   This is a good answer though it isn't in VB Script. As it turns out I managed to develop a solution before receiving this answer.

The key to the solution for me was IE 4 recognizes onkeydown. Then it was a matter of using window.event.keyCode to check for whichever key was pressed.

Thanks for the help.
0

Featured Post

Technology Partners: 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!

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
is this a cms? 8 92
Session on Html 8 55
Vbscript Help Needed - Protecting Queries from special characters / SQL Injection 11 41
add 'N to prepared ASP/VB insert statement 1 38
I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:   The Exchange of informatio…
I was asked about the differences between classic ASP and ASP.NET, so let me put them down here, for reference: Let's make the introductions... Classic ASP was launched by Microsoft in 1998 and dynamically generate web pages upon user interact…
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…
I've attached the XLSM Excel spreadsheet I used in the video and also text files containing the macros used below. https://filedb.experts-exchange.com/incoming/2017/03_w12/1151775/Permutations.txt https://filedb.experts-exchange.com/incoming/201…

752 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