多选项参数的传递曾经困扰了我好久,现在找到了几种解决的办法,不过这次贴
的是ASP的,我直接把我写的改了一下,所以会有数据库的操作在,考虑到一般多
选项常用在数据库的应用中,我也就没有去掉。
今天先贴出原码.
'########选择页,checkbox.asp
<%@language=VBScript %>
<%
set conn=server.CreateObject ("ADODB.Connection")
set rs=server.CreateObject("ADODB.RECORDSET")
conn.open "dsn=;uid=;pwd=;database=;driver={SQL SERVER}"
qq = "SELECT * from"
rs.Open qq,conn,1,1,1
If rs.Eof or rs.Bof then
Response.Write "没什么东西可以显示的哦!"
else
response.write "
<% rs.close
end if%>
'#######数据接收页,checkbox_tst.asp
<%
if request("dotype") = "tst" then
CountNo=1
do until (CountNo > 14)
if request(cstr(CountNo)) ="1" then
msgname = "msgname" & cstr(CountNo)
response.write request(msgname) &"
"
'########这里可以写相关的操作:)
end if
CountNo= CountNo + 1
loop
end if
%>