怎么用vbscript写出提示"所选日期大于7天了,请重选"
以下代码错误了.function add_OnClick()
If DateDiff("d",mydate,form1.startday.value)< "7" Then
MsgBox "申请日期超过当天日期7天,请重选"
form1.startday.focus()
Else
form1.submit
End If
<tr>
<td width="216" class="td6" height="35">申请日期:</td>
<td> <input onfocus="calendar()" name="startday" type = "text" id="s2" >
</td>
</tr>