How to check an IE form field is a valid date?

[Will66]

How to check an form field is a valid date?

eg, if a user has entered 10-7-08 into a field name "AB8":

$oForm = _IEFormGetCollection ($oIE, 0) 
$oForm_date = $oForm("AB8").value

If _DateIsValid($oForm_date) Then
  MsgBox( 4096, "Valid Date", "The specified date is valid." & $oForm_date)
Else
  MsgBox( 4096, "Valid Date", "The specified date is invalid."  & $oForm_date)
EndIf

_DateIsValid requires yyyy/mm/dd format but the field entry dd/mm/yyyy

[Achilles]

Just rewrite the _DateIsValid function using the default _DateIsValid()... like this: (untested)

Func _DateIsValidEx($date)
$split = StringSplit($date, "/")
$temp = $split[3] & '/' & $split [2] & '/' & $split[1]
Return _DateIsValid($temp)
EndFunc

Edited February 10, 2008 by Piano_Man

[Will66]

Thanx, I should be more clear....I guess what i'm really trying to do is allow any date type entry into the field.

For example with vbscript a user can enter many date formats eg: 10-7-08 or 10 feb-08 or 10/7/08:

CODE

<td>Fortnight Ending:</td><td><input name="AB8" value="" onchange="validDate(this,this.value)"></td>

<script type="text/vbscript">

function validDate(dfield,dd)

if not isDate(dd) then

msgbox "'" & dd & "' is not a valid date!",0,"Error"

else

mydate = FormatDateTime(dd,0)

dfield.value=mydate

end if

end Function

Edited February 10, 2008 by Will66