社区
ASP
帖子详情
关于下拉列表框连接数据库的问题。
97jr
2004-11-29 04:59:38
页面中有三个下拉列表t1,t2,t3,我想实现两个下拉列表从数据库中去数据实现联动,另外一个下拉列表直接从数据库中取数据列出。如何实现,谢谢!
...全文
190
2
打赏
收藏
关于下拉列表框连接数据库的问题。
页面中有三个下拉列表t1,t2,t3,我想实现两个下拉列表从数据库中去数据实现联动,另外一个下拉列表直接从数据库中取数据列出。如何实现,谢谢!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
alern_zyb
2004-11-29
打赏
举报
回复
连动
<%
Dim Rs_class
Set Rs_class = Server.CreateObject("ADODB.Recordset")
Rs_class.ActiveConnection = CM_unnamedDatabase
Rs_class.Source = " SELECT class.fldauto, class.fldname FROM class WHERE 1=1 "
Rs_class.CursorType = 0
Rs_class.CursorLocation = 2
Rs_class.LockType = 1
Rs_class.Open()
%>
<script language="javascript">
function listoption(src){
var obj = document.class3.fldclass2
removeoption(obj)
document.getElementById("list").src = "listup.asp?lfldno=" + src.value
}
function removeoption(obj){
var len=obj.options.length
var i=len-1
for(i;i>=0;i--){
obj.options[i]=null
}
}
function additem(i,val, txt){
document.class3.fldclass2.options[i] = new Option(txt,val);
}
</script>
<tr>
<td colspan="0" width="" class="Table_InSide"><div align="left">新闻大类 </div></td>
<td colspan="0" width="" class="Table_InSide"><div align="left">
<select name="fldclass" onchange="listoption(this)">
<option value="">--请选择--</option>
<%While NOT Rs_class.EOF%>
<option value="<%=Rs_class.Fields.Item("fldauto").Value%>"><%=Rs_class.Fields.Item("fldname").Value%></option>
<%Rs_class.MoveNext()
Wend
%>
</select>
</div></td>
</tr>
<tr>
<td colspan="0" width="" class="Table_InSide"><div align="left">新闻2类 </div></td>
<td colspan="0" width="" class="Table_InSide"><div align="left">
<select name="fldclass2">
<option value="">--请选择--</option>
</select>
</div></td>
</tr>
<iframe id="list" name="list" src ="" style="DISPLAY: none"></iframe>
listup.asp
<%@ Language=VBScript %>
<!--#include file="../inc/pub.asp" -->
<!--#include file="../../Connections/cm_dbconn.asp" -->
<%
s_bh=cstr(request("lfldno"))
Dim Rs_class2
Set Rs_class2 = Server.CreateObject("ADODB.Recordset")
Rs_class2.ActiveConnection = CM_unnamedDatabase
Rs_class2.Source = "SELECT fldauto, fldname FROM class2 WHERE fldclass=" + s_bh
Rs_class2.CursorType = 0
Rs_class2.CursorLocation = 2
Rs_class2.LockType = 1
Rs_class2.Open()
i=1
%>
<Script language=JavaScript>
<%While NOT Rs_class2.EOF%>
parent.additem(<%=i-1%>,"<%=Rs_class2.Fields.Item("fldauto").Value%>","<%=Rs_class2.Fields.Item("fldname").Value%>");
<%i=i+1
Rs_class2.MoveNext()
Wend%>
</Script>
<%
Rs_class2.close()
Set Rs_class2 = Nothing
%>
直接取数据
<%
Dim Rs_class
Set Rs_class = Server.CreateObject("ADODB.Recordset")
Rs_class.ActiveConnection = CM_unnamedDatabase
Rs_class.Source = " SELECT class.fldauto, class.fldname FROM class WHERE 1=1 "
Rs_class.CursorType = 0
Rs_class.CursorLocation = 2
Rs_class.LockType = 1
Rs_class.Open()
%>
<tr>
<td colspan="0" width="" class="Table_InSide"><div align="left">新闻大类 </div></td>
<td colspan="0" width="" class="Table_InSide"><div align="left">
<select name="fldclass">
<option value="">--请选择--</option>
<%While NOT Rs_class.EOF%>
<option value="<%=Rs_class.Fields.Item("fldauto").Value%>"><%=Rs_class.Fields.Item("fldname").Value%></option>
<%Rs_class.MoveNext()
Wend
%>
</select>
</div></td>
</tr>
yb2008
2004-11-29
打赏
举报
回复
http://www.hc189.com/menu.rar
C# 使用
下拉列表
框
动态查询数据库
C# 使用
下拉列表
框
动态查询数据库,先连接上SQL2005数据库吧,要不然程序不能运行的,一个简单的C#数据库例子,学习数据库操作必看的小程序。
C++ qt5 电子版教程
1.7 QFontComboBox字体
下拉列表
框
27 1.8 QSpinBox控件 28 1.9 QTimeEdit时间控件 29 1.10 QDateEdit日期控件 30 1.11 QScrollBar控件 30 1.12 QRadioButton单选按钮 31 1.13 QCheckBox复选
框
32 1.14 QListView ...
Google Android SDK开发范例大全(PDF高清完整版3)(4-3)
4.8 自定义下拉菜单模式——Spinner与setDropDownViewResource 4.9 动态添加/删除的Spinner菜单——ArrayList与Widget的依赖性 4.10 心爱小宝贝相片集——Gallery与衍生BaseAdapter容器 4.11 快速的搜索手机文件引擎...
Google Android SDK开发范例大全(PDF完整版4)(4-4)
4.8 自定义下拉菜单模式——Spinner与setDropDownViewResource 4.9 动态添加/删除的Spinner菜单——ArrayList与Widget的依赖性 4.10 心爱小宝贝相片集——Gallery与衍生BaseAdapter容器 4.11 快速的搜索手机文件引擎...
Google Android SDK开发范例大全(PDF高清完整版1)(4-1)
4.8 自定义下拉菜单模式——Spinner与setDropDownViewResource 4.9 动态添加/删除的Spinner菜单——ArrayList与Widget的依赖性 4.10 心爱小宝贝相片集——Gallery与衍生BaseAdapter容器 4.11 快速的搜索手机文件引擎...
ASP
28,390
社区成员
357,060
社区内容
发帖
与我相关
我的任务
ASP
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
复制链接
扫一扫
分享
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章