<script language="VBScript"> Sub Text_LoseFocus If not IsNumeric(Document.F.T.Value) Then MsgBox "Field must be numeric" End If End Sub <FORM name="F"> <INPUT name="T" TYPE="text"> </FORM>