关于充值时的一个函数问题

if Act="yes" then

   if Not isNum(Money) then Call AlertInfo("充值点数必须为数字，请重新填写！","",0)

   if Not isNum(More) then Call AlertInfo("表单参数传递有误，请返回！","",0)

 if More=0 then

  set rs = server.createobject("adodb.recordset")

  rs.open "select id from T_users where username='"&uid&"'",conn,1,3

  if rs.eof then

     response.write"<script language=javascript>alert('没有此找到用户！');history.back(-1);</script>"

     response.end

  else

    if money=""  then

	response.write"<script language=javascript>alert('你的充值不合理');history.back(-1);</script>"

	response.end

    else

  	sql="update T_users set MayGo_Shopmoney=MayGo_Shopmoney+"&money&" where id="&rs("id")

  	conn.execute(sql)

  	response.write"<script language=javascript>alert('用户充值确认成功！');history.back(-1);</script>"

    end if

  end if

  rs.close

isNum函数  貌似在asp中不支持充值负数？ 我在充值时，就会提示了第一句话"充值点数必须为数字，请重新填写！","",
然后下面就想请教了，怎么样能够直接充值负整数，需要怎么更改函数，
------解决方案--------------------

引用:

Quote: 引用:

vbscript有isNum这个函数吗？

 VB中貌似有，我现在想充值负值，怎么更改上面的函数- - 

vbscript中的是IsNumeric，该对负值也是返回true