asp中sql指定条件查询的问题
asp书写网页,使用的access数据库。我的问题很简单,但因为对sql了解的不多,所以本人不会写!问题是:我在写asp网页。数据库中的一个表中有id字段,我要通过sql...
asp书写网页,使用的access数据库。
我的问题很简单,但因为对sql了解的不多,所以本人不会写!
问题是:
我在写asp网页。数据库中的一个表中有id字段,我要通过sql查询语句查询出该表中指定id的上下两个id的数据以及该指定id的数据,并且指针指向指定的id。怎么写?例如:该表中有title字段,我需要查询出该表指定id为5的上下两个id字段中的title数据,并且要查询出id为5的title数据。 展开
我的问题很简单,但因为对sql了解的不多,所以本人不会写!
问题是:
我在写asp网页。数据库中的一个表中有id字段,我要通过sql查询语句查询出该表中指定id的上下两个id的数据以及该指定id的数据,并且指针指向指定的id。怎么写?例如:该表中有title字段,我需要查询出该表指定id为5的上下两个id字段中的title数据,并且要查询出id为5的title数据。 展开
2个回答
展开全部
经测试运行正确:
<%
id=50
Set Conn=Server.CreateObject("Adodb.Connection")
SQL="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.Mappath("你的数据库名")
Conn.Open SQL
'查询id=50的记录
Set rs=Server.CreateObject("Adodb.recordset")
sql1="select * from 你的表名 where id="&id
rs.open sql1,conn,1,1
if not rs.eof
response.write rs("title")
end if
rs.close
set rs=nothing
'查询id=50的上一条记录
Set Rs=Server.CreateObject("ADODB.RecordSet")
sql2="Select top 1 * From 你的表名 where id<"&id&" order by id desc"
rs.open sql2,conn,1,1
if not rs.eof
response.write rs("title")
end if
rs.close
set rs=nothing
'查询id=50的下一条记录
Set rs=Server.CreateObject("ADODB.RecordSet")
sql3="Select top 1 * From 你的表名 where id>"&id&" order by id asc"
rs.open sql3,conn,1,1
if not rs.eof
response.write rs("title")
end if
rs.close
set rs=nothing
%>
<%
id=50
Set Conn=Server.CreateObject("Adodb.Connection")
SQL="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.Mappath("你的数据库名")
Conn.Open SQL
'查询id=50的记录
Set rs=Server.CreateObject("Adodb.recordset")
sql1="select * from 你的表名 where id="&id
rs.open sql1,conn,1,1
if not rs.eof
response.write rs("title")
end if
rs.close
set rs=nothing
'查询id=50的上一条记录
Set Rs=Server.CreateObject("ADODB.RecordSet")
sql2="Select top 1 * From 你的表名 where id<"&id&" order by id desc"
rs.open sql2,conn,1,1
if not rs.eof
response.write rs("title")
end if
rs.close
set rs=nothing
'查询id=50的下一条记录
Set rs=Server.CreateObject("ADODB.RecordSet")
sql3="Select top 1 * From 你的表名 where id>"&id&" order by id asc"
rs.open sql3,conn,1,1
if not rs.eof
response.write rs("title")
end if
rs.close
set rs=nothing
%>
展开全部
'指定id的title
id=指定的数字
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From 你的表 where id="&id, conn,1,1
if not rs.eof then
response.write(rs("title"))
end if
'指定id的上一条记录
Set Rs_R=Server.CreateObject("ADODB.RecordSet")
sql_R="Select top 1 * From 你的表 where id <"&id
Rs_R.open sql_R,conn,1,1
if not Rs_R then
response.write(Rs_R("title"))
end if
'指定id的下一条记录
Set Rs_N=Server.CreateObject("ADODB.RecordSet")
sql_N="Select top 1 * From 你的表 where id >"&id
Rs_N.open sql_N,conn,1,1
if not Rs_N then
response.write(Rs_N("title"))
end if
id=指定的数字
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From 你的表 where id="&id, conn,1,1
if not rs.eof then
response.write(rs("title"))
end if
'指定id的上一条记录
Set Rs_R=Server.CreateObject("ADODB.RecordSet")
sql_R="Select top 1 * From 你的表 where id <"&id
Rs_R.open sql_R,conn,1,1
if not Rs_R then
response.write(Rs_R("title"))
end if
'指定id的下一条记录
Set Rs_N=Server.CreateObject("ADODB.RecordSet")
sql_N="Select top 1 * From 你的表 where id >"&id
Rs_N.open sql_N,conn,1,1
if not Rs_N then
response.write(Rs_N("title"))
end if
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询