北极虾的虾头能吃吗:我要ASp调用一个表内容怎么弄?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 22:18:05
库表A内有 id name title content 列
实现
new.asp?id=1
显示
id为 1的文章
new.asp?tit=XXX
显示
所有类别为XXX的文章列表
请问代码怎么写啊?
详细写好么?

dim tit
tit=request.QueryString("tit")
if tit<>"" then
dim rs
set rs=conn.execute("select * from 表A where title='"&tit&"'")
if rs.bof and rs.eof then
response.Write("没信息!")
else
循环内容
end if
rs.close
set rs=nothing
end if

不明白加我QQ 52527129

楼上正解,
优化一下:
dim tit
tit=trim(request.QueryString("tit"))
if tit="" then
response.Write("错误参数!")
response.end
end if
dim rs
set rs=conn.execute("select * from 表A where [title]='"&tit&"'")
if rs.bof or rs.eof then '楼上错了
response.Write("文章不存在或已经被删除!")
end if
while not rs.bof and not rs.eof
'文章标题,
'作者
'内容
rs.movenext
wend
rs.close
set rs=nothing