你动态生成text输入框的时候顺便动态生成VBS,自己做一个button name是check 我那个条件是不等于1,你自己改成你的条件吧,不行的话,回贴时贴出错误信息。
<script language="VBScript">
sub check_onclick()
<%
while not rs.eof
response.write("if document.form1."&rs("id")&".value<>""1"" then "&vbcrlf&"msgbox(""oh my god"") "&vbcrlf&"end if"&vbcrlf)
rs.movenext
wend
%>
end sub
</script>
刚才少写了一个引号
你动态生成text输入框的时候顺便动态生成VBS,自己做一个button name是check 我那个条件是不等于1,你自己改成你的条件吧,不行的话,回贴时贴出错误信息。
<script language="VBScript">
sub check_onclick()
<%
while not rs.eof
response.write("if document.form1."&rs("id")&".value<>""1"" then "&vbcrlf&"msgbox(""oh my god") "&vbcrlf&"end if"&vbcrlf)
rs.movenext
wend
%>
end sub
</script>
刚才少写了一个引号
你动态生成text输入框的时候顺便动态生成VBS,自己做一个button name是check 我那个条件是不等于1,你自己改成你的条件吧,不行的话,回贴时贴出错误信息。
<script language="VBScript">
sub check_onclick()
<%
while not rs.eof
response.write("if document.form1.&rs("id")&".value<>""1"" then "&vbcrlf&"msgbox(""oh my god") "&vbcrlf&"end if"&vbcrlf)
rs.movenext
wend
%>
end sub
</script>