topical media & game development
[] readme course(s) preface I 1 2 II 3 4 III 5 6 7 IV 8 9 10 V 11 12 afterthought(s) appendix reference(s) example(s) resource(s) _

talk show tell print

basic-regex-20-TestForDate.htm / htm



  <html>
  <head>
  <title>Test For A Date</title>
  <script language="vbscript" type="text/vbscript">
  Function MatchDate
  Dim myRegExp, TestString, InputString
  Set myRegExp = new RegExp
  InputString = InputBox("Enter a Date in the format MM/DD/YYYY")
  myRegExp.Pattern = "(0[1-9]|1[012])[-/.](0[1-9]|[12][0-9]|3[01])[-/.]\d{4}"
  TestString = InputString
  If myRegExp.Test(TestString) = True Then
    MsgBox "The test string '" & TestString & "' matches the pattern '" & myRegExp.Pattern & "'."
  Else
    MsgBox "There is no match. '" & InputString & "' does not match " &VBCrLf _
    & "the pattern '" & myRegExp.Pattern & "'."
  End If
  End Function
  
  </script>
  </head>
  <body onload="MatchDate">
  
  </body>
  </html>
[] readme course(s) preface I 1 2 II 3 4 III 5 6 7 IV 8 9 10 V 11 12 afterthought(s) appendix reference(s) example(s) resource(s) _

(C) Æliens 20/2/2008

You may not copy or print any of this material without explicit permission of the author or the publisher. In case of other copyright issues, contact the author.