首先要打开数据库,以下是一种方法:
<%DimConn
DimConnStr
ConnStr=”Provider=Microsoft.Jet.OLEDB.4.0;DataSource=”&Server.MapPath(“数据库地址”)
SetConn=Server.CreateObject(“ADODB.Connection”)
Conn.openConnStr
IfErrThen
Err.Clear
SetConn=nothing
Response.Write”数据库连接出错,请检查Conn.asp文件中的数据库参数设置。”
Response.End
EndIf%>
接下来查找需要的数年据
<%setrs=server.createobject(“ADODB.recordset”)
sql=”selecttop1*fromname”‘name为数据库里的数据表名称
rs.opensql,conn,1,1
ifrs.eofandrs.bofthen
response.write”没有相关新闻!”
else
response.write”<li>”&rs(“title”)’title为数数据表的字段名称
endif
rs.close
setrs=nothing
%>