判断数据是否为数字使用:
if not isnumeric(var_num) then
response.Write "不是数字格式"
end if
if not isnumeric(var_train_num) then
Response.Write "不是数字"
end if
发现你后边的SQL语句好像有问题
sql="insert into total_info(train_number,ticketnum,buyer)values('" & var_train_num & "','"& var_num &"','" & var_name & "')"
ticketnum字段是文本格式?
数字字段写入数据库两边不要有'
文本格式才是'"&aaa&"'
数字格式是: "&aaa&"
在客户端做判断,用正则表达式
dim var_num
var_num=request.form("input_num")
if not isnumeric( var_num ) then
response.write "不是数字"
end if