如何在ASP共实现这个功能?

来源:百度知道 编辑:UC知道 时间:2024/05/17 21:39:06
有一个数据库123.mdb,数据库里面有个表abc,表abc中有个字段名为www,字段www的值为qqq。
建一个网页123.asp,假如123.mdb这个数据库里有qqq这个值得话,123.asp就正常显示,假如123.mdb里没有qqq这个值,123.asp就显示:数据库里没有QQQ这个值!
数据库连接代码conn.asp已经写好。
请问如何实现?请给出123.asp的代码,如果测试可以通过的话,追加50分~
先谢啦!

<%
Dim rs,isok
isok = False
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open "SELECT [www] FROM [abc]",conn
isok = False
If Not rs.Eof Then
If LCase(rs("www"))="qqq" Then
isok = True
End If
End If
rs.Close
Set rs = Nothing
If isok Then
Response.Write "正常显示"
Else
Response.Write "数据库里没有QQQ这个值!"
End If
%>

连接数据库:
'==============conn.asp===============
<%
set rs=server.createobject("adodb.recordset")
Set Conn = Server.CreateObject("ADODB.Connection")
conn = "DBQ=" + server.mappath("123.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
%>

显示:
'=================123.asp====================

<!--#include file="conn.asp" -->
<%
SQL="select *