超弱的问题:怎么把SQL检索出来的值放到下拉菜单中?

[vickly]

<table width="96%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<%set rs=server.createobject("adodb.recordset")
sql="select * from SMT_ypaddone order by SMT_date asc"
rs.open sql,conn,1,1
n=0
do while not rs.eof
n=n+1%>
<td height=25 width=33%><div align="center"><img src="img/index_aro4.gif">
<a href=yp_add_vlist.asp?id=<%=rs("SMT_addone_id")%> class=f14><%=rs("SMT_addone")%></a><br>
</div></td>
<%if n mod 2=0 then response.write"</tr><tr>"
rs.movenext
loop
rs.close%>
</tr>
<tr>
<td height=25><td>
</tr>
</table>



==================================================================
上面这一段代码是我已经把值取出来了.只能两个一排的放在页面上，我现在想把他放在下拉菜单中，请大家教教我~~~

[pengshu12345]

这样就可以了

<table width="96%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr><td><select name="">
<%set rs=server.createobject("adodb.recordset")
sql="select * from SMT_ypaddone order by SMT_date asc"
rs.open sql,conn,1,1
n=0
do while not rs.eof
n=n+1
%>
<option value=<%=rs("SMT_addone_id")%>><%=rs("SMT_addone")%></option>

rs.movenext
loop
rs.close
%>
<td>

</tr>
<tr>
<td height=25><td>
</tr>
</table>

[philcc]

<%set rs=server.createobject("adodb.recordset")
sql="select * from SMT_ypaddone order by SMT_date asc"
rs.open sql,conn,1,1
n=0
do while not rs.eof
n=n+1
%>
<option value=<%=rs("SMT_addone_id")%>><%=rs("SMT_addone")%></option>

rs.movenext
loop
rs.close
%>

[wfwclyms]

晚到了，晕，循环解决问题

大家帮看看
http://community.csdn.net/Expert/topic/4457/4457244.xml?temp=3.281802E-02

[vickly]

<table width="96%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr> <select name=""></select>
<%set rs=server.createobject("adodb.recordset")
sql="select * from SMT_ypaddone order by SMT_date asc"
rs.open sql,conn,1,1
n=0
do while not rs.eof
n=n+1
%>
<option value=<%=rs("SMT_addone_id")%>><%=rs("SMT_addone")%></option>
<%rs.movenext
loop
rs.close%>
</tr>
<tr>
<td height=25></td>
</tr>
</table>


=====================================================

这样做,下拉菜单中还是没能啊~~只是在下接菜单旁边出现了~~~救我啊~~

[Hiyeah2001]

<table width="96%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr> <select name="">
<%set rs=server.createobject("adodb.recordset")
sql="select * from SMT_ypaddone order by SMT_date asc"
rs.open sql,conn,1,1
n=0
do while not rs.eof
n=n+1
%>
<option value=<%=rs("SMT_addone_id")%>><%=rs("SMT_addone")%></option>
<%rs.movenext
loop
rs.close%>
</select> '晕！这个放在上面能不在旁边出现吗！！！！！！！！！！！！！！！！！
</tr>
<tr>
<td height=25></td>
</tr>
</table>

[wojiaogyp]

楼上正解,嘿嘿,楼主是新手.

[deallylau]

就是，自己写错了，

[yangxuhua]

<table width="96%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr> <select name=""></select>
<%set rs=server.createobject("adodb.recordset")
sql="select * from SMT_ypaddone order by SMT_date asc"
rs.open sql,conn,1,1
if rs.eof then
response.write("暂时无记录")
else
do while not rs.eof
%>
<option value=<%=rs("字段")%>><%=rs("字段")%></option>
<%rs.movenext
loop
rs.close
end if
%>
</tr>
<tr>
<td height=25></td>
</tr>
</table>

[vickly]

嘿嘿~~~~是真的是个新手~~


再问一个问题~~~分不够,我会再开贴~~

那么我要激活下拉菜单的事件,应该怎么做呢?
以前没装在下载菜单中,是这样子激活的
<a href=yp_add_list.asp?id=<%=rs("SMT_addtwo_id")%>><%=rs("SMT_addtwo")%></a>

[sheedd712]

象这样
<select onchange="window.open(this.optionsthis.selectedIndex].value,'friend','toolbar=yes,location=yes,status=yes,menubar=yes,scrollbars=yes,resizable=yes')" size="1" name="select1">
<option value="http://www.peopledaily.com.cn">人民日报</option>
</select>

[vickly]

<table width="100%">
<td height="43"><tr>
<td>
<%
dim rs
dim sql
dim count
set rs=server.createobject("adodb.recordset")
sql = "select * from SMT_ypaddtwo "
rs.open sql,conn,1,1
%>

<SCRIPT language="JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("SMT_addtwo"))%>","<%= trim(rs("SMT_addone_id"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.form1.cid.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.form1.cid.options[document.form1.cid.length] = new Option(subcat[i][0], subcat[i][1]);
}
}
}

</SCRIPT>
<SCRIPT language="javascript">
<!--
function CheckForm()
{
document.form1.txtcontent.value=document.form1.doc_html.value;
return true
}
//-->
</SCRIPT>
<form name=form1 onsubmit="check()">
城市：
<%
sql = "select * from SMT_ypaddone order by SMT_date asc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "请先添加城市。"
response.end
else
%>
<SELECT name="sid" onChange="changelocation(document.form1.sid.options[document.form1.sid.selectedIndex].value)" >
<%
do while not rs.eof
%>
<OPTION selected value="<%=trim(rs("SMT_addone_id"))%>"><%=trim(rs("SMT_addone"))%></OPTION>
<%
rs.movenext
loop
end if
rs.close
%>
</SELECT> <br><br><br>
街区：
<SELECT name="cid">
<OPTION selected value="">==请选街区==</OPTION>
</SELECT>
</td>
</tr>
</table>

===============================================================

我用这一段作了个级联菜单,现在是,我点了街区后,应该怎么才能连到相应的地址?
以前的激活方法是这样子,但现在在下拉菜单中,怎么做啊?
<a href=yp_add_list.asp?id=<%=rs("SMT_addtwo_id")%>><%=rs("SMT_addtwo")%></a>

[jspadmin]

<script language=javascript>
<!--
function FreindlyFun(){
if(document.all.friendly.value=="各地CA站点"){
alert("请选择一个CA名称！");
return false;
}
window.open(document.all.friendly.value);
}
//-->
</script>

<select name=friendly size="1" onChange="FreindlyFun()">
<option selected value="各地CA站点">各地CA站点</option>
<option value="http://www.cqca.net">重庆数字证书认证中心</option>
<option value="http://www.cnca.net">广东省电子商务认证中心</option>
<option value="http://www.hbeca.com.cn">湖北省电子商务认证中心</option>
<option value="http://www.gxca.com.cn">广西数字证书认证中心</option>
<option value="http://www.snca.com.cn">陕西省数字证书认证中心</option>
<option value="http://www.hnca.com.cn/">河南省数字证书认证中心</option>
<option value="http://www.ahca.org.cn/">安徽省数字认证中心</option>
<option value="http://www.sxca.com.cn/">山西省电子商务认证中心</option>
<option value="http://www.jlca.com.cn/">吉林省数字证书认证中心</option>
<option value="http://www.tjca.net/">天津市数字证书认证中心</option>
<option value="http://www.bjca.org.cn/">北京数字证书认证中心 </option>
<option value="http://www.zjca.com.cn/">浙江省数字认证中心</option>
<option value="http://www.szca.gov.cn/">深圳市电子证书认证中心</option>
<option value="http://www.hebca.com/">河北省数字证书认证中心</option>
<option value="http://www.lnca.org.cn/">辽宁省数字证书认证中心</option>
<option value="http://www.whca.org.cn/">武汉数字证书认证中心</option>
</select>

[vickly]

jspadmin(阿笨狗

你的回答应该不是我要的答案~~~