VbScript form validation for phone number, outlook email address formats

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
groovymonkeyAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

MaxOvrdrv2Commented:
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
MaxOvrdrv2Commented:
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
groovymonkeyAuthor Commented:
Is there a way to do this using the pattern property in VbScript?
0
Introducing Cloud Class® training courses

Tech changes fast. You can learn faster. That’s why we’re bringing professional training courses to Experts Exchange. With a subscription, you can access all the Cloud Class® courses to expand your education, prep for certifications, and get top-notch instructions.

MaxOvrdrv2Commented:
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
MikeVirtualCommented:
<%

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

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
MikeVirtualCommented:
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
groovymonkeyAuthor Commented:
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
MikeVirtualCommented:
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
MaxOvrdrv2Commented:
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
MikeVirtualCommented:
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
MikeVirtualCommented:
MaxOvrdrv2 - noticed it soon as I hit send, doh!
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.