UC知道asp跳转菜单如何写?带数据库查询的.急~~!!!!!
来源：百度知道 编辑：UC知道 时间：2024/06/04 16:19:48
请问各位大虾,怎样连接数据库,并用sql查询语句将所要的值一一列在跳转菜单里呢?下面是我的数据库连接程序<%
Dim startTime,ZD_AccessTimes,ZD_OpenCache
startTime=Timer()
ZD_AccessTimes=0
set conn=server.CreateObject("adodb.connection")
DBPath = Server.MapPath(ZD_Dataname)
conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
'On Error Resume Next
%>
列如数据库中有个表有atid这个关键,和同一行的title列一一对应,我想把title中的值放到跳转菜单中,我应该怎么写?并且,每个值都有一个相应的链接.请大家帮忙,如果好的话一定再加分.
我做了这样的代码,但是还是不行,.请指点一下
<select name="articletype" class="dataInput" title="">
<option value="0" classs="blueText">--期 数--</option>
<%
dim rsObj,strSQL
dim title
dim i
set rsObj = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM ZD_Announce where isShow=true order by atid desc"
rsObj.Open strSQL,conn,adOPenKeyset,adLockReadOnly
Dim startTime,ZD_AccessTimes,ZD_OpenCache
startTime=Timer()
ZD_AccessTimes=0
set conn=server.CreateObject("adodb.connection")
DBPath = Server.MapPath(ZD_Dataname)
conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
'On Error Resume Next
%>
列如数据库中有个表有atid这个关键,和同一行的title列一一对应,我想把title中的值放到跳转菜单中,我应该怎么写?并且,每个值都有一个相应的链接.请大家帮忙,如果好的话一定再加分.
我做了这样的代码,但是还是不行,.请指点一下
<select name="articletype" class="dataInput" title="">
<option value="0" classs="blueText">--期 数--</option>
<%
dim rsObj,strSQL
dim title
dim i
set rsObj = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM ZD_Announce where isShow=true order by atid desc"
rsObj.Open strSQL,conn,adOPenKeyset,adLockReadOnly
有几种方法
你的跳转菜单如果是通过表单提交的话,建议将查询出的值存入HIDDEN里一起提交
再通过request.from()来取出
也可以通过session和cookie来传递,不过不建议用这个
用隐藏表单传递的话,将取出的值放入同一个Form里的HIDDEN里一起传递
还有方法是通过GET超链接传递,比如你转向的地址是a.asp,那你可以将链接设置为a.asp?atid=title
title是数据库里查询出的某一对应列
然后通过request.querystring("atid")来取出值