asp select 下拉列表选项读取数据库表中的值解决思路
asp select 下拉列表选项读取数据库表中的值
比如说: 数据库 Database 表 teble 属性 a 值 1,2,3
能否将1,2,3分别显示在下拉列表选项里面?
a 的值如果变成 1,2,3,4能否有4个下拉选项?
------解决思路----------------------
读取数据,循环<option>就可以了
------解决思路----------------------
JS代码
html
------解决思路----------------------
网页端的js无法读取数据库,用asp读取数据库把值赋给一个js变量,然后用上面dotnetstudio提供的代码,就OK了
------解决思路----------------------
asp select下拉列表选项读取数据表中的值示例
<!--#include file="conn/conn.asp"-->//加载数据库连接
//数据库连接
<%
'打开数据库连接
db="data/fang_hua.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
%>//CodeGo.net/
//把数据库数据显示在下拉列表中
<%
set rs1=server.CreateObject("adodb.recordset")
sql1="select * from Tab_tongxun"
rs1.open sql1,conn,1,3
session("name1")=session("name1")
if not rs1.eof then
max=rs1.recordcount
%>
<select name="name1" id="ID">
<%
rs1.movefirst
while(not rs1.eof)
%>
<option value="<%=rs1("id")%>"><%=rs1("name1")%></option>
<%
rs1.movenext()
wend
else
response.Write("<script language=javascript>alert('对不起,您还没有添加您选择的工种');location='javascript:history.go(-1)'</script>")
end if
%>
</select>
比如说: 数据库 Database 表 teble 属性 a 值 1,2,3
能否将1,2,3分别显示在下拉列表选项里面?
a 的值如果变成 1,2,3,4能否有4个下拉选项?
------解决思路----------------------
读取数据,循环<option>就可以了
------解决思路----------------------
JS代码
var s="1,2,3";
var arr = s.split(",");
var sel = document.getElementById("select2");
for (var i = 0; i < arr.length; i++) {
var opt = document.createElement("option");
opt.text = arr[i];
sel.add(opt);
}
html
<select id="select2" style="width:200px">
</select>
------解决思路----------------------
网页端的js无法读取数据库,用asp读取数据库把值赋给一个js变量,然后用上面dotnetstudio提供的代码,就OK了
------解决思路----------------------
asp select下拉列表选项读取数据表中的值示例
<!--#include file="conn/conn.asp"-->//加载数据库连接
//数据库连接
<%
'打开数据库连接
db="data/fang_hua.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
%>//CodeGo.net/
//把数据库数据显示在下拉列表中
<%
set rs1=server.CreateObject("adodb.recordset")
sql1="select * from Tab_tongxun"
rs1.open sql1,conn,1,3
session("name1")=session("name1")
if not rs1.eof then
max=rs1.recordcount
%>
<select name="name1" id="ID">
<%
rs1.movefirst
while(not rs1.eof)
%>
<option value="<%=rs1("id")%>"><%=rs1("name1")%></option>
<%
rs1.movenext()
wend
else
response.Write("<script language=javascript>alert('对不起,您还没有添加您选择的工种');location='javascript:history.go(-1)'</script>")
end if
%>
</select>