Board logo

标题: [问题求助] [已解决]VBS检测文本输入框的输入,通过不同输入,得到不同信息 [打印本页]

作者: c755731262    时间: 2015-5-16 23:09     标题: [已解决]VBS检测文本输入框的输入,通过不同输入,得到不同信息

检测文本输入框的输入,通过不同输入,得到不同信息,我点击submit没反应,
  1. <html>
  2. <head>
  3. <title>
  4. 测试哪里出问题了
  5. </title>
  6. <script language="vbscript">
  7. function jiance(snumber,imin,imax)
  8. if isnumeric(snumber) then
  9.    if instr(snumber,".")=0 then
  10.       if clng(snumber)>=imin and clng(snumber)<=imax then
  11.       jiance=""
  12.       else
  13.       msgbox jiance="please enter a number between "&imin&" and "&imax
  14.       end if
  15.    else
  16.    msgbox jiance="please enter an integer"
  17.    end if
  18. else
  19. msgbox jiance="please enter a number"
  20. end if
  21. end function
  22. sub form_onsubmit()
  23. dim s
  24. s=jiance(form.text.value,1,10)
  25. if s="" then
  26. msgbox "valid"
  27. else
  28. msgbox "try again"
  29. end if
  30. end sub
  31. </script>
  32. </head>
  33. <body>
  34. <form action="" name="form" method="post">
  35. <input type="text" name="text">
  36. <input type="submit" name="submit" value="submit">
  37. </form>
  38. </body>
  39. </html>
复制代码

作者: czjt1234    时间: 2015-5-17 12:28

  1. <html>
  2. <head>
  3. <title>
  4. 测试哪里出问题了
  5. </title>
  6. <script language="vbscript">
  7. function jiance(snumber,imin,imax)
  8. if isnumeric(snumber) then
  9.    if instr(snumber,".")=0 then
  10.       if clng(snumber)>=imin and clng(snumber)<=imax then
  11.          jiance=""
  12.       else
  13.          jiance="please enter a number between "&imin&" and "&imax
  14.          msgbox jiance
  15.       end if
  16.    else
  17.       jiance="please enter an integer"
  18.       msgbox jiance
  19.    end if
  20. else
  21.    jiance="please enter a number"
  22.    msgbox jiance
  23. end if
  24. end function
  25. sub form_onsubmit()
  26. dim s
  27. s=jiance(form.text.value,1,10)
  28. if s="" then
  29.    msgbox "valid"
  30. else
  31.    msgbox "try again"
  32. end if
  33. end sub
  34. </script>
  35. </head>
  36. <body>
  37. <form action="" name="form" method="post">
  38. <input type="text" name="text">
  39. <input type="submit" name="submit" value="submit">
  40. </form>
  41. </body>
  42. </html>
复制代码
IE8测试通过




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2