Solved

Field Validation Not working

Posted on 2006-07-13
3
195 Views
Last Modified: 2010-04-30
Hi,
I'm using vbsript in an HTML page.  I want to first determine if the texbox (AGE) is empty and then determine if the value used is only numeric.  If numeric does the number fall between 0 and 64, then I will set the value to to form17.   I think it's the IsNumeric function and nested If statment that is causing the problem.  Is there a better way to do this? I have assigned 500 point value because the request urgent.   As always, thanks for your help!  


Example:
form17 = main.AGE.value
      If IsEmpty(main.AGE.value) Then
         MsgBox ("CAN NOT CONTINUE - MISSING AGE")
         Exit Sub
      ElseIf len(main.AGE.value) = 0 Then
         MsgBox ("CAN NOT CONTINUE - MISSING AGE")
       Exit Sub
      ElseIf IsNumeric(main.AGE.value)
            If (main.Age.Value) > 0 And <= 64
                     form17 = main.AGE.value
                  Else
                     MsgBox ("CAN NOT CONTINUE - AGE MUST BE BETWEEN 0 AND 64")
                  Exit Sub
            End If
      Else
         MsgBox ("CAN NOT CONTINUE - USE ONLY NUMERIC VALUES FOR THE AGE")
         Exit Sub
      End If
0
Comment
Question by:MoJeaux39
3 Comments
 
LVL 52

Accepted Solution

by:
Carl Tawn earned 500 total points
ID: 17104224
There are a couple of syntax errors in this block:

      ElseIf IsNumeric(main.AGE.value)
          If (main.Age.Value) > 0 And <= 64
                   form17 = main.AGE.value
                Else
                   MsgBox ("CAN NOT CONTINUE - AGE MUST BE BETWEEN 0 AND 64")
               Exit Sub
          End If

Whether these are just paste errors or typos, but it should say:

      ElseIf IsNumeric(main.AGE.value) Then
          If (main.Age.Value) > 0 And (main.Age.Value) <= 64 Then
                   form17 = main.AGE.value
                Else
                   MsgBox ("CAN NOT CONTINUE - AGE MUST BE BETWEEN 0 AND 64")
               Exit Sub
          End If
0
 
LVL 9

Expert Comment

by:smidgie82
ID: 17104249
Hi MoJeaux39,

Is this the exact code you're using?  are you getting a particular error message?  I see a few syntax errors that, in the absence of more information, I assume could be causing your problem.  Try the following:

form17 = main.Age.Value
      If IsEmpty(main.Age.Value) Then
         MsgBox ("CAN NOT CONTINUE - MISSING AGE")
         Exit Sub
      ElseIf Len(main.Age.Value) = 0 Then
         MsgBox ("CAN NOT CONTINUE - MISSING AGE")
      Exit Sub
      ElseIf IsNumeric(main.Age.Value) Then
          If (main.Age.Value > 0) And (main.Age.Value <= 64) Then
                   form17 = main.Age.Value
                Else
                   MsgBox ("CAN NOT CONTINUE - AGE MUST BE BETWEEN 0 AND 64")
               Exit Sub
          End If
      Else
         MsgBox ("CAN NOT CONTINUE - USE ONLY NUMERIC VALUES FOR THE AGE")
         Exit Sub
      End If


Note the addition of "Then" at the end of an "ElseIf" and the following "If" lines.  And the reformatting of your "If (main.Age.Value) > 0 And <= 64" line.

Cheers!
0
 

Author Comment

by:MoJeaux39
ID: 17104274
Thank you for the prompt response!  It's unfortunate, but they were typo's in the script.  I works fine now.  =)  
0

Featured Post

Threat Intelligence Starter Resources

Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.

Join & Write a Comment

Introduction In a recent article (http://www.experts-exchange.com/A_7811-A-Better-Concatenate-Function.html) for the Excel community, I showed an improved version of the Excel Concatenate() function.  While writing that article I realized that no o…
Article by: Martin
Here are a few simple, working, games that you can use as-is or as the basis for your own games. Tic-Tac-Toe This is one of the simplest of all games.   The game allows for a choice of who goes first and keeps track of the number of wins for…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

760 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

20 Experts available now in Live!

Get 1:1 Help Now