Solved

VbScript form validation for phone number, outlook email address formats

Posted on 2003-12-01
11
1,094 Views
Last Modified: 2007-12-19
Hello,
I need some help regarding form validation of several items I have on a form.
Here is the pseudocode for the telephone format I want

if trim(request.querystring("tel")) does not fit the pattern (555) 555-5555 then      flag="error"
      response.write("Please enter a valid telephone number")
      response.write("<br>")
end if

Here is the pseudocode for the email format I want
*please note that the email I am checking for I only want to check that the address has a "," somewhere in the middle.

if trim(request.querystring("email")) does not fit the pattern AAA, AAA then      flag="error"
      response.write("Please enter a valid telephone number")
      response.write("<br>")
end if

thanks for all help
0
Comment
Question by:groovymonkey
  • 5
  • 4
  • 2
11 Comments
 
LVL 10

Expert Comment

by:MaxOvrdrv2
ID: 9850772
first one ( Phone), here is the code to handle it:

'this section ensures that you have enough characters in the field
if Request.Form("Phone).length != 13 then
   response.write "Please click back and enter a valid phone number: Format (###)###-####"
end if

'this section ensures that you have an opening -(- character and that it's at the beginning
if InStr(Request.Form("Phone"),"(")<>1 then
    response.write "Please click back and enter a valid phone number: Format (###)###-####
end if

'this section ensure that you have a -)- character and that it's at the 4th character
if InStr(Request.Form("Phone"),")")<> 4 then
    response.write "Please click back and enter a valid phone number: Format (###)###-####"
end if

'this section ensures that you have a - character and that it's at the 9th character
if InStr(Request.Form("Phone"), "-")<>9 then
    response.write "Please click back and enter a valid phone number: Format (###)###-####"
end if



second one, that the e-mail contains a ",":

if InStr(Request.Form("email"), ",") <=0 then
     response.write "Please click back and insert the 2nd address!"
end if


hope this helps!

MaxOvrdrv2
0
 
LVL 10

Expert Comment

by:MaxOvrdrv2
ID: 9850791
sorry sorry... the first if should be this instead:

if Length(Request.Form("Phone)) <> 13 then
   response.write "Please click back and enter a valid phone number: Format (###)###-####"
end if

MaxOvrdrv2
0
 

Author Comment

by:groovymonkey
ID: 9850893
Is there a way to do this using the pattern property in VbScript?
0
 
LVL 10

Expert Comment

by:MaxOvrdrv2
ID: 9850991
using the pattern property in VBScript? -- This is an ASP forum, i would help you if i knew what you were talking about...

from that comment, i'm guessing that you are working in a .Net environment?

MaxOvrdrv2
0
 
LVL 1

Accepted Solution

by:
MikeVirtual earned 100 total points
ID: 9851451
<%

Dim objRegExp
Set objRegExp = New RegExp
objRegExp.Pattern = "\(\d{3}\)\d{3}\-\d{4}"
If objRegExp.Test(trim(request.querystring("tel"))) = False Then
 Response.Write("Please click back and enter a valid phone number: Format (###)###-####")
 Response.End()
Else

.........

Would suggest that you also use client side validation using javascript and similar regular expression.
Gimme a shout if you need the code.

Hope this helps
MikeVirtual
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 1

Expert Comment

by:MikeVirtual
ID: 9851495
By using javascript client side validation, you can simply remove any non-numeric characters, check you have 10 digits and, if so, reformat the text field accordingly, otherwise alert the user. This avoids a round trip to the server and the horrible 'back button' messsage.

Ask if you want the code.
MikeVirtual.
0
 

Author Comment

by:groovymonkey
ID: 9860435
Mike Virtual,
The vbscript worked great for the phone number...how would I do the same thing to check for an email to make sure that there is a comma somewhere in the middle?
0
 
LVL 1

Assisted Solution

by:MikeVirtual
MikeVirtual earned 100 total points
ID: 9860645
objRegExp.Pattern = "\w{3,},\w{3,}"

wil search for 3 or more word characters followed by a comma followed by 3 or more word characters

word characters are a-z, A-Z, 0-9 and _

If these are e-mail addresses, they will contain @ symbols and . character as well as possibly - characters

if so, I think

objRegExp.Pattern = "[\w\-\.]+@[\w\-\.]+\.[a-zA-Z]{2,4}"

should do the trick.

For more help on regular expressions see:

http://www.devguru.com/Technologies/vbscript/quickref/regexp_pattern.html

Hope this helps - if above regular expressiondoesn't do it, post a couple of examples of the strings you want to check
0
 
LVL 10

Expert Comment

by:MaxOvrdrv2
ID: 9860661
Mike... don't forget that it's obligatory for his users to put 2 addresses seperated by a comma, and that if there is no comma, an error should come up...

MaxOvrdrv2
0
 
LVL 1

Expert Comment

by:MikeVirtual
ID: 9860667
sorry,

objRegExp.Pattern = "[\w\-\.]+@[\w\-\.]+\.[a-zA-Z]{2,4},<?[\w\-\.]+@[\w\-\.]+\.[a-zA-Z]{2,4}>?"

or similar - depends what you are trying to parse

0
 
LVL 1

Expert Comment

by:MikeVirtual
ID: 9860683
MaxOvrdrv2 - noticed it soon as I hit send, doh!
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

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

Hello, all! I just recently started using Microsoft's IIS 7.5 within Windows 7, as I just downloaded and installed the 90 day trial of Windows 7. (Got to love Microsoft for allowing 90 days) The main reason for downloading and testing Windows 7 is t…
Have you ever needed to get an ASP script to wait for a while? I have, just to let something else happen. Or in my case, to allow other stuff to happen while I was murdering my MySQL database with an update. The Original Issue This was written…
This Micro Tutorial will teach you how to censor certain areas of your screen. The example in this video will show a little boy's face being blurred. This will be demonstrated using Adobe Premiere Pro CS6.
Many functions in Excel can make decisions. The most simple of these is the IF function: it returns a value depending on whether a condition you describe is true or false. Once you get the hang of using the IF function, you will find it easier to us…

910 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

16 Experts available now in Live!

Get 1:1 Help Now