<SCRIPT LANGUAGE="VBScript">
<!--
function msger()
tem=len(form1.text1.value)
if tem>=2 and tem<4 then
form1.text2.value=left(form1.text1.value,2) & "/"
end if
if tem >=4 and tem<8 then
form1.text2.value=left(form1.text1.value,2) & "/" & right(left(form1.text1.value,4) ,2) & "/"
end if
if tem=8 then
form1.text2.value=left(form1.text1.value,2) & "/" & right(left(form1.text1.value,4) ,2) & "/" & right(form1.text1.value,4)
end if
if tem>8 then
form1.text1.value=left(form1.text1.value,8)
end if
End Function