日期:2014-05-17 浏览次数:21323 次
跳转到: <script type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='?zhuanti="+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
<select name="id" id="id" onchange="MM_jumpMenu('self',this,0)">
<% set rs1=server.CreateObject("adodb.recordset")
sql1 ="select * from zhuanti"
rs1.open sql1,conn,1,1
Response.Write("<option value="""">请选择专题</option>")
if rs1.eof and rs1.bof Then
response.write("<option value="""">请先添加专题</option>")
else
while not rs1.eof
response.write("<option value="""& rs1("id") &""">" & rs1("name") & "</option>")
If int(request("zhuanti"))=Rs1("ID") then
Response.Write(" selected" )
End if
rs1.movenext
wend
end if
%>
</select>