最新普通扑克牌扫描仪:asp.跳转搜索功能问题!!!!!!!!!!!

(1)这是从数据库读取分类显示的下拉菜单.(可能写法错误)
@@@@@@
<form method="post" name="form1">
<select name="leibie" >
<%
sql = "SELECT * FROM class where parentid = 0 order by classid asc"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.OPEN sql,Conn,1,1
if rs.eof and rs.bof then
Response.Write"<option>还没有任何分类</option>"
else
do while not rs.eof
Response.Write"<option value='"&rs("classid")&"'"
if classid = rs("classid") then response.Write " selected "
response.Write ">"&rs("c_name")&"</option>"& vbcrlf
if rs("children")<>0 then
set rs2 = server.CreateObject("Adodb.Recordset")
sql2="select * from class where parentid = "& rs("classid")
rs2.open "select * from class where parentid = "& rs("classid"),conn,1,1
do while not rs2.eof
Response.Write"<option value='"&rs2("classid")&"'"
if classid = rs2("classid") then response.Write " selected "
response.Write " >  "&rs2("c_name")&"</option>"& vbcrlf
rs2.movenext
loop
rs2.close :set rs2 =nothing
end if
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select>
<input type="submit" name="Submit" value="提交">
</form>
@@@@@@@@@@@

改这么样选择这个分类来读出数据