我想编这段代码!有四个文本框为kaohao,xingming,math,language
if 文本框不为整形 then
response.redirect"error.asp?code=输入有误"
文本框不为整形怎么写啊!

比如文本框用Request.Form接收名字为text
代码如下
On Error Resume Next
IF VarType(CInt(Request.Form("text")))<>2 Then
response.redirect"error.asp?code=输入有误文本框非整数。"
End IF

谢谢啊!