<% set rs=server.createobject("adodb.recordset")
rs.open "select * from ad order by bs",conn,1,1
do while not rs.eof
response.write "<a href="&trim(rs("url"))&" target=_blank>"&trim(rs("wordlink"))&"</a><br>"
rs.movenext
loop
rs.close
set rs=nothing
%>
注：“wordlink”是表里面的一个字段名。
2 连接数据库一般都用这条语句：
<!--#include file="conn.asp"-->
conn.asp代码如下：
<%@ codepage = "936" %> //这句话可以不要的
<%
dim conn
dim connstr
dim db
db="db/my.mdb"
set conn = server.createobject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath(db)
conn.open connstr
startime=timer()
%>
3例如：下面为添加留言的页面：(次文件名是tianjia.asp)
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
name = request("name")
mail = request("email")
face = request("face")
sql="select * from message" （message是表名）
rs.open sql,conn,3,3
rs.addnew
rs("a_name")=name
rs("a_mail")=mail
rs("face")=face //这个是选择的图象，在数据库表的字段中可以用image/1.jpg就可以了
rs.update
rs.close
response.redirect "xianshi.asp" //这句话是重定向页面，即跳转到xianshi.asp
%>
<%
set rs=nothing
conn.close
set conn=nothing
%>
在写留言的页面只要加这条语句：<form action=tianjia.asp method=post>则提交时就调用tianjia.asp
4 <%
set rs=server.createobject("adodb.recordset") //要对表进行操作就要这条语句就可以。
sqlcmd = "select * from message order by a_time desc" //按时间排序（a_time）是一个字段
rs.open sqlcmd, conn, adopenstatic, adlockpessimistic
page = clng(request("txtpage"))
rs.pagesize = 5 //每页显示五条信息
if page < 1 then page = 1
if page > rs.pagecount then page = rs.pagecount //总页数
rs.absolutepage = page
%>
●当想显示总页数时只需要这条语句： <%=rs.pagecount%>
●要显示当前页面为第几页时只要这条语句： <%=page%>
●下面是执行上一页、下一页的显示办法
<%
if page <> 1 then
response.write "<td ><font size=4>" &_
"<a href=xianshi.asp?txtpage=1>首页</a>"
response.write "<td ><font size=4>" &_
"<a href=xianshi.asp?txtpage=" & (page - 1) & ">上一页</a>"
end if
if page <> rs.pagecount then
response.write "<td ><font size=4>" &_
"<a href=xianshi.asp?txtpage=" & (page + 1) & ">下一页</a>"
response.write "<td ><font size=4>" &_
"<a href=xianshi.asp?txtpage=" & rs.pagecount & ">尾页</a>"
end if %>
来自广东
图象
|
|
|
|
|图象
名字
<font>来自<%=rs("area")%> </font> 就可以从数据库中调出“广东”两字
<img src="<%=rs("face")%>" width="90" height="90" border=0>调出图片
同样下面的123 也是从数据库中调出的<%=rs("a_name")%>
***要掉出什么内容只需要把光标移到哪里然后“取数” 最后不需要对数据表操作了要关掉表以及数据库的连接。代码如下所示：只要表没有关掉就可以随时对数据库操作，即可以用到下面的语句<%=rs("face")%>来取数。
<%
rs.movenext
if rs.eof then exit for
next
rs.close
conn.close
%>
文章整理：站长天空 网址：http://www.z6688.com/
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
