×

Loading...
Ad by
  • 予人玫瑰，手有余香：加拿大新天地工作移民诚聘求职顾问&行业导师！
Ad by
  • 予人玫瑰，手有余香：加拿大新天地工作移民诚聘求职顾问&行业导师！

@Sacramento

a combination of java script and vb script ? for these script , no data type define for variables. and vbscript do not have alert, use msgbox. also, one of the elseif should be else. try this

guestagain(guest again)
本文发表在 rolia.net 枫下论坛<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<link rel="stylesheet" type="text/css" href="http://rnd/rnd/css/style1.css">
<script language="vbscript">
function validate(b)
a=trim(document.form1.RCvalue.value)
if a="" or (not isnumeric(a)) then
msgbox("Please enter a value.")
document.form1.RCvalue.focus()
elseif a<0.1 and b=0 then
msgbox("Value should greater than 0.1")
document.form1.RCvalue.focus()
elseif a>=1000 and b=0 then
msgbox("Value should less than 1000")
document.form1.RCvalue.focus()
else
if b=1 then
a=trim(document.form1.voltage.value )
if a="" or not isnumeric(a) then
msgbox("Please enter a voltage.")
document.form1.voltage.focus()
else
document.form1.submit()
end if
else
document.form1.submit()
end if
end if
end function
</script>
</HEAD>

<body onload="javascript:{if(parent.frames[0]&amp;&amp;parent.frames['Top'].Go)parent.frames['Top'].Go();document.form1.RCvalue.focus()}">

<center>
<form action="smadd2.asp?no1=311&type=R1" method="post" name=form1 id=form1>
<H3>
Step 2: New type for 311(SMD Single Resistors)</h3>

<table width=60% border=1>
<tr><th>Value(Ohm)</th><td><input id=RCvalue name=RCvalue size=4 maxlength=4>
<select id=unit name=unit>
<option value=1>&nbsp;</option>
<option value=2>K</option>
<option value=3>M</option>
</select>Ohms</td></tr>
<tr><th>Accurency(%)</th>
<td><input type=radio checked id=accur name=accur value=1>1%
<input type=radio id=accur name=accur value=2>2%
<input type=radio id=accur name=accur value=5>5%
<input type=radio id=accur name=accur value=10>10%
</td></tr>
<tr><th>Package</th><td>
<select id=pack name=pack>

<option value="03Resistor 0402">Resistor 0402 </option>

<option value="01Resistor 0603">Resistor 0603 </option>

<option value="02Resistor 0805">Resistor 0805 </option>

</select></td></tr>

</table>
<br>
<input type=button value=" Add " onclick="validate(0)" id=button2 name=button2>

</form>
</center>
</BODY>
</HTML>更多精彩文章及讨论，请光临枫下论坛 rolia.net
(#1145658@0)
Last Updated: 2003-4-17
This post has been archived. It cannot be replied.
Report

Replies, comments and Discussions:

  • 工作学习 / IT技术讨论 / 当我按 ADD 这个BUTTON时，为什么说我Error: Type mismatch :validate.难道这个函数参数写的不对？ -haihai(好了，大概是250); 2003-4-17 {2289} (#1145549@0)
    本文发表在 rolia.net 枫下论坛<HTML>
    <HEAD>
    <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
    <link rel="stylesheet" type="text/css" href="http://rnd/rnd/css/style1.css">
    <script language="vbscript">
    function validate(int b)
    a=trim(document.form1.RCvalue.value)
    if a="" or (not isnumeric(a)) then
    alert("Please enter a value.")
    document.form1.RCvalue.focus()
    elseif a<0.1 and b=0 then
    alert("Value should greater than 0.1")
    document.form1.RCvalue.focus()
    elseif a>=1000 and b=0 then
    alert("Value should less than 1000")
    document.form1.RCvalue.focus()
    else
    if b=1 then
    a=trim(document.form1.voltage.value )
    if a="" or not isnumeric(a) then
    alert("Please enter a voltage.")
    document.form1.voltage.focus()
    elseif
    document.form1.submit()
    end if
    else
    document.form1.submit()
    end if
    end if
    end function
    </script>
    </HEAD>

    <body onload="javascript:{if(parent.frames[0]&amp;&amp;parent.frames['Top'].Go)parent.frames['Top'].Go();document.form1.RCvalue.focus()}">

    <center>
    <form action="smadd2.asp?no1=311&type=R1" method="post" name=form1 id=form1>
    <H3>
    Step 2: New type for 311(SMD Single Resistors)</h3>

    <table width=60% border=1>
    <tr><th>Value(Ohm)</th><td><input id=RCvalue name=RCvalue size=4 maxlength=4>
    <select id=unit name=unit>
    <option value=1>&nbsp;</option>
    <option value=2>K</option>
    <option value=3>M</option>
    </select>Ohms</td></tr>
    <tr><th>Accurency(%)</th>
    <td><input type=radio checked id=accur name=accur value=1>1%
    <input type=radio id=accur name=accur value=2>2%
    <input type=radio id=accur name=accur value=5>5%
    <input type=radio id=accur name=accur value=10>10%
    </td></tr>

    <tr><th>Package</th><td>
    <select id=pack name=pack>

    <option value="03Resistor 0402">Resistor 0402 </option>

    <option value="01Resistor 0603">Resistor 0603 </option>

    <option value="02Resistor 0805">Resistor 0805 </option>

    </select></td></tr>

    </table>
    <br>
    <input type=button value=" Add " onclick="validate(0)" id=button2 name=button2>

    </form>
    </center>
    </BODY>
    </HTML>更多精彩文章及讨论，请光临枫下论坛 rolia.net
    • document.form1.RCvalue.value may be considered as number by the system if your input is number, you have to convert to string for string operation like trim I guess. -badweather(不识西枫); 2003-4-17 (#1145596@0)
    • a combination of java script and vb script ? for these script , no data type define for variables. and vbscript do not have alert, use msgbox. also, one of the elseif should be else. try this -guestagain(guest again); 2003-4-17 {2116} (#1145658@0)
      本文发表在 rolia.net 枫下论坛<HTML>
      <HEAD>
      <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
      <link rel="stylesheet" type="text/css" href="http://rnd/rnd/css/style1.css">
      <script language="vbscript">
      function validate(b)
      a=trim(document.form1.RCvalue.value)
      if a="" or (not isnumeric(a)) then
      msgbox("Please enter a value.")
      document.form1.RCvalue.focus()
      elseif a<0.1 and b=0 then
      msgbox("Value should greater than 0.1")
      document.form1.RCvalue.focus()
      elseif a>=1000 and b=0 then
      msgbox("Value should less than 1000")
      document.form1.RCvalue.focus()
      else
      if b=1 then
      a=trim(document.form1.voltage.value )
      if a="" or not isnumeric(a) then
      msgbox("Please enter a voltage.")
      document.form1.voltage.focus()
      else
      document.form1.submit()
      end if
      else
      document.form1.submit()
      end if
      end if
      end function
      </script>
      </HEAD>

      <body onload="javascript:{if(parent.frames[0]&amp;&amp;parent.frames['Top'].Go)parent.frames['Top'].Go();document.form1.RCvalue.focus()}">

      <center>
      <form action="smadd2.asp?no1=311&type=R1" method="post" name=form1 id=form1>
      <H3>
      Step 2: New type for 311(SMD Single Resistors)</h3>

      <table width=60% border=1>
      <tr><th>Value(Ohm)</th><td><input id=RCvalue name=RCvalue size=4 maxlength=4>
      <select id=unit name=unit>
      <option value=1>&nbsp;</option>
      <option value=2>K</option>
      <option value=3>M</option>
      </select>Ohms</td></tr>
      <tr><th>Accurency(%)</th>
      <td><input type=radio checked id=accur name=accur value=1>1%
      <input type=radio id=accur name=accur value=2>2%
      <input type=radio id=accur name=accur value=5>5%
      <input type=radio id=accur name=accur value=10>10%
      </td></tr>
      <tr><th>Package</th><td>
      <select id=pack name=pack>

      <option value="03Resistor 0402">Resistor 0402 </option>

      <option value="01Resistor 0603">Resistor 0603 </option>

      <option value="02Resistor 0805">Resistor 0805 </option>

      </select></td></tr>

      </table>
      <br>
      <input type=button value=" Add " onclick="validate(0)" id=button2 name=button2>

      </form>
      </center>
      </BODY>
      </HTML>更多精彩文章及讨论，请光临枫下论坛 rolia.net

More Topics

  • 哪位Excel大神帮忙解答一下，一个spreadsheet一表格connection到另外一个spreadsheet，原来的data是数字格式，但是connection以后变成text格式，这是为什么呢？这两天才出现的问题，之前好多年没有过这样的问题。谢谢先
  • 中国政府官方的行为，证明了，苹果手机是世界上最安全的手机。感谢乔布斯先生。感谢库克先生硬是顶住了美国政府的最强大的压力。
  • 老程序员第一次用copilot的一点点体会
  • 现在社区游泳池招救生员巡逻，过一会还要不停的点人头，这工作是否很快就被AI代替了，装一个摄像头后面是AI处理系统，这样只招一个等着救人就行了，人头沉下水一定时间立马强光照射，还可以分析水下人的状况来判断是否溺水等
  • 新冠疫苗引发心肌炎? 最新研究这样看
    • 枫下论坛主坛 /  工作学习 /  IT技术讨论