asp如果获取javascript做的下拉列表中的值
数据表结构:
表BigClass
BigClassID int 4
BigClassName varchar 50
BigClassOrder int 4
表SmallClass
SmallClassID int 4
SmallClassName varchar 50
BigClassID int 4
SmallClassOrder int 4
以下是程序:
conn.asp
<%
Dim conn,DateBase
Set Conn = Server.CreateObject("ADODB.Connection")
DateBase = "twoclass.mdb"
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(DateBase)
If Err.Number > 0 Then
Set Conn = Nothing
Response.Write "数据库错误."'注释,需要把这几个字翻译成英文。
Response.End
End If
sub CloseConn()
conn.close
set conn=nothing
end sub
%>
以下是主程序:
<!--#include file="conn.asp"-->
<script language = "JavaScript">
<%
Set Rs = Server.CreateObject("Adodb.Recordset")
Rs.Open "SELECT * FROM SmallClass ORDER BY SmallClassOrder",conn,1,1
%>
var onecount;
onecount=0;
subcat = new Array();
<%
i = 0
Do While Not Rs.eof
%>
subcat[<%=i%>] = new Array("<%= Trim(Rs("SmallClassName"))%>","<%= Rs("BigClassID")%>","<%= Rs("SmallClassID")%>");
<%
i = i + 1
Rs.MoveNext
Loop
Rs.Close
%>
onecount=<%=i%>;
function changelocation(locationid,formname)
{
formname.SmallClassID.length = 0;
var locationid = locationid;
var i;
for (i = 0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
formname.SmallClassID.options[formname.SmallClassID.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<form name =form1>
大类:<select name="BigClassID" id="BigClassID" onChange="changelocation(document.form1.BigClassID.options[document.form1.BigClassID.selectedIndex].value,document.form1)">
<%
i = 0
Set RsBig = Conn.Execute("SELECT * FROM BigClass ORDER BY BigClassOrder")
Do While Not RsBig.Eof
If i = 0 Then BigClassID = RsBig(0)
Response.Write("<option value="""&RsBig(0)&""">"&RsBig(1)&"</option>")
i = i + 1
RsBig.MoveNext
Loop
Set RsBig = Nothing
%>
</select>
小类:<select name="SmallClassID" id="SmallClassID">
<%
If BigClassID <> "" Then
Set RsSmall = Conn.Execute("SELECT * FROM SmallClass WHERE BigClassID = "&BigClassID)
Do While Not RsSmall.Eof
Response.Write("<option value="""&RsSmall(0)&""">"&RsSmall(1)&"</option>")
RsSmall.MoveNext
Loop
End if
Set RsSmall = Nothing
%>
</select>
</form>
引用页:http://blog.sina.com.cn/s/blog_51c8a3f60100hnju.html
请问怎么能获取到每次点击select 的 BigClassID 和 SmallClassID
我需要把这两个值获取到做参数传递使用
request.form()方法对这个无效请大神指点谢谢~~