--------------------------------------------------------------------------------------------------
添加数据了！
1. 首先要做一个add.htm页面，用来填写信息，将表单的动作设置为add.asp
2.接下来，要书写提交后要处理的事，即“将提交数据添到数据库”，这个任务由add.asp完成
源码如下：
<%
set conn=server.createobject("adodb.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("/book.mdb")
name=request.form("name")
addr=request.form("addr")
tel_mobile=request.form("tel_mobile")
tel_home=request.form("tel_home")
tel_work=request.form("tel_work")
exec="insert into info(name,addr,tel_mobile,tel_home,tel_work)values('"+name+"','"+addr+"','"+tel_mobile+"','"+tel_home+"','"+tel_work+"')"
conn.execute exec
conn.close
set conn=nothing
%>
<%="记录添加成功!"%>---------------------------------------------------------------------------
有时间就我执行add.htm多添加几条信息进去吧！下一步骤要显示数据时会比较好看哦！
解释更清楚一些：
1. insert into后面加的是表的名字，后面的括号里面是需要添加的字段，不用添加的或者字段的内容可以省略。注意，这里变量一定要和ACCESS里面的字段名对应，否则就会出错!
2. exec是一个字符串，"insert into guestbook(name,tel,message)values('"是第一段，在ASP里面不能嵌双引号，所以可以用'代替双引号，放在双引号里面，连接两个变量用+或者&所以"',"又是一段，中间夹了一个name就是表单传来的变量，这样就可以在这个变量外面加两个''，表示是字符串了。注意，如果是数字型变量所以不需要外面包围的单引号！
============================================================
呵呵，开始制作显示信息了！先看看效果！
============================================================
步骤1：排版一个这要的表格，没有问题吧！
（如果有问题，就要先打开Dreamweaver练一下了）
============================================================
步骤二：在<table...的上一行，写上<%
set conn=server.createobject("adodb.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("/book.mdb")
exec="select * from info"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
说明一下：
1. 前两行刚才用过了，从add.asp复制过来就可以了！
2.第3行，设置查询数据库的命令，select后是查询的字段，如果全部用*，from数据库中的表名
3.第4行，定义一个记录集组件，用来放查询的信息
4.第5行，是打开这个记录集，exec是前面定义的查询命令，conn是前面定义的数据库连接组件，后面参数“1，1”，表示读取 [注：以后用修改记录就把参数设置为1，3]
============================================================
步骤三： 让记录显示出来啊！
=======================1============================
在
<td width="80">公司电话</td>
</tr>
下一行写上
<%do while not rs.eof%>
=====================================================
========================2===========================
在</table>上一行，写上<%
rs.movenext
loop
%>
=====================================================
========================3===========================
在表格第二行的单元格内写上要显示的信息[这些操作都在代码状态下输入，不要写错了哦]<td width="80"><%=rs("name")%></td>
<td width="200"><%=rs("addr")%></td>
<td width="80"><%=rs("tel_mobile")%></td>
<td width="80"><%=rs("tel_home")%></td>
<td width="80"><%=rs("tel_work")%></td>=====================================================
============================================================
OK了
当然，最好养成好习惯！在最后写上代码：
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
就是关闭rs和conn了！============================================================
今天掌握分页技术
上面实现了将数据从数据库显示的功能，但如果有1000条信息呢，将列得很长很长下来了！
这样的问题，能过“分页技术”解决！
分页技术，是ASP程序的难点，比较不好理解，实现的方法也多种多样！所以，很多人研究了好几天，也不理解！
这里用一种简单实用的方法：就直接修改上面的显示页面的asp文件吧！通过三个步骤完成吧！
步骤一：
修改<%do while not rs.eof%>为下面代码，rs.PageSize表示每页显示多少条信息，请自行修改！<%
rs.PageSize=3
pagecount=rs.PageCount
page=int(request.QueryString ("page"))
if page<=0 then page=1
if request.QueryString("page")="" then
page=1
end if
rs.AbsolutePage=page
for i=1 to rs.PageSize
if rs.EOF then
exit for
end if
%>
步骤二：
<%
rs.movenext
loop
%>
修改为
<%
rs.movenext
next
%>
步骤三：复制下面代码到要显示“上页、下页”的地方，为美观，将表格宽度width="520"，改为跟你页面表格一致！重要的，将index.asp替换为你正编辑的asp文件名！
<table width="520" border="0" align="center" cellpadding="5" >
<tr>
<td align="right">
<%if page=1 and not page=pagecount then%>
第<%=page%>页
<%for i=1 to pagecount%>
<a href="index.asp?page=<%=i%>"><%=i%></a>
<%next%>
<a href="index.asp?page=<%=page+1%>">下页</a>
<%elseif page=pagecount and not page=1 then%>
第<%=page%>页
<%for i=1 to pagecount%>
<a href="index.asp?page=<%=i%>"><%=i%></a>
<%next%>
<a href="index.asp?page=<%=page-1%>">上页</a>
<%elseif page<1 then%>没有任何记录！
<%elseif page>pagecount then%>没有任何记录！
<%elseif page=1 and page=pagecount then%>
<%else%>
第<%=page%>页
<%for i=1 to pagecount%>
<a href="index.asp?page=<%=i%>"><%=i%></a>
<%next%>
<a href="index.asp?page=<%=page-1%>">上页</a>
<a href="index.asp?page=<%=page+1%>">下页</a> </div>
<%end if%>
</td></tr></table>
骤OK了，呵呵给个图片看看效果：
============================================================
到此为止，已经算入门了哦！开发留言版、新闻系统，应该已经没问题了。
本帖最后由 yes9715 于 2008-12-23 12:39 编辑
