Published in: ASP
URL: http://reusablecode.blogspot.com/2008/08/isvalidzipcode.html
<% ' Copyright (c) 2008, reusablecode.blogspot.com; some rights reserved. ' ' This work is licensed under the Creative Commons Attribution License. To view ' a copy of this license, visit http://creativecommons.org/licenses/by/3.0/ or ' send a letter to Creative Commons, 559 Nathan Abbott Way, Stanford, California ' 94305, USA. ' Checks the validity of the supplied ZIP code. function isValidZIPCode(zipCode) dim regEx set regEx = new RegExp with regEx .IgnoreCase = True .Global = True .Pattern = "^[0-9]{5}(-[0-9]{4})?$" end with if regEx.Test(trim(CStr(zipCode))) then isValidZipCode = True else isValidZipCode = False end if set regEx = nothing end function %>
You need to login to post a comment.
