<script language="vbs">
<!--
function funcheck()
Dim ingc
Dim i
for ingc = 1 To len(Trim(document.all.T1.value))
If IsNumeric(Mid(Trim(document.all.T1.value),1)) Then
i = i +1
If i = 8 Then
form1.submit()
Exit For
End If
End If
End function
-->
</script>