ACCESS数据库的连接和读取记录
今天要学习的内容有一点枯燥，但是很重要。在这里大家不需要知道命令具体的运行情况，外面的很多书籍之所以不适合入门就是因为介绍了太多的理论知识，让初学者一头雾水。
下面开门见山，看两句话：
<%
t ateobject("tion")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&rver.mappath("example3.mdb")
%>
第一句话定义了一个adodb数据库连接组件，第二句连接了数据库，大家只要修改后面的数据库名字就可以了。是不是很简单？
下面再看三句：
<%
exec="lect * from guestbook"
形容贫穷的成语
t ateobject("dt")
rs.open exec,conn,1,1
%>
这三句加在前面两句的后面，第一句：设置查询数据库的命令，lect后面加的是字段，如果都要查询的话就用*，from后面再加上表的名字，我们前面建立的是不是一个gustbook表阿？第二句：定义一个记录集组件，所有搜索到的记录都放在这里面，第三句是打开这个记录集，exec就是前面定义的查询命令，conn就是前面定义的数据库连接组件，后面参数“1，1”，这是读取，后面讲到修改记录就把参数设置为1，3，好了接下来我们读取记录。
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<%do while f%><tr>
<td><%=rs("name")%></td>
<td><%=rs("tel")%></td>
<td><%=rs("message")%></td>
<td><%=rs("time")%></td>
</tr><%
rs.movenext
loop
%>
</table>
在一个表格中，我们用4列分别显示了上次建立的表里面的四个字段，用do循环，f的意思是条件为没有读到记录集的最后，rs.movenext的意思是显示完一条转到下面一条记录，<%=%>就等于<%respon.write%>用于在html代码里面插入asp代码，主要用于显示变量。
学会数据库的基本操作1（写入记录）
数据库的基本操作无非是：查询记录，写入记录，删除记录，修改记录。今天我们先学习写入记录。
先建立一个表单：
<form name="form1" method="post" action="example5.asp">
name <input type="text" name="name"><br>
tel <input type="text" name="tel"><br>
message <input type="text" name="message" value=""><br>
<input type="submit" name="Submit" value="提交">
<input type="ret" name="Submit2" value="重置">
一年级的画</form>
表单提交到example5.asp，下面是example5.asp的代码：
<%
t ateobject("tion")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&rver.mappath("example3.m
db")
name=request.form("name")
tel=request.form("tel")
message=request.form("message")
exec="inrt into guestbook(name,tel,message)values('"+name+"',"+tel+",'"+message+"')"
ute exec
开业典礼conn.clo
t conn=nothing
respon.write "记录添加成功!"
%>
在这里前面两句我不说了，后面三句我也不说了，前面说过exec里面的是执行的命令，添加记录的比较繁，大家要仔细看。inrt into后面加的是表的名字，后面的括号里面是需要添加的字段，不用添加的或者字段的内容就是默认值的可以省略。注意，这里的变量一定要和ACCESS里面的字段名对应，否则就会出错。values后面加的是传送过来的变量。exec是一个字符串，"inrt into guestbook(name,tel,message)values('"是第一段，在ASP
里面不能嵌双引号，所以可以用'代替双引号，放在双引号里面，连接两个变量用+或者&所以"',"又是一段，中间夹了一个name就是表单传来的变量，这样就可以在这个变量外面加两个''，表示是字符串了，后面的tel是数字型变量所以不需要外面包围''，大家慢慢分析这句话，如果用表单传来的数据代替变量名字的话这句话为（假设name="aaa",tel=111,message="bbb"）：玩的英语怎么说"inrt into guestbook(name,tel,message)values('aaa',111,'bbb')"。
接下来的ute 就是执行这个exec命令，最后别忘记把打开的数据库关闭，把定义的组件设置为空，这样可以返回资源。上次的读取为了简单，我没有关闭，大家可以补充上去：
rs.clo
t rs=nothing
conn.clo
t conn=nothing
记住，次序不可以颠倒！
学会数据库的基本操作2（查询记录）
在第四天中我们有这样一个程序：
<%
t ateobject("tion")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&rver.mappath("example3.mdb")
exec="lect * from guestbook"
t ateobject("dt")
rs.open exec,conn,1,1
%>
我们查询的是所有的记录，但是我们要修改、删除记录的时候不可能是所有记录，所有我们要学习检索合适的记录。先看一条语句：
a="张三"
b=111
exec="lect * from guestbook where name='"+a+"'and tel="+b
where后面加上的是条件，与是and，或是or，我想=，<=，>=，<，>的含义大家都知道吧。
这句话的意思就是搜索name是张三的，并且电话是111的记录。还有一点就是如果要搜索一个字段里面是不是包含一个字符串就可以这么写：where instr(name,a)也就是搜索name里面有a（张三）这个字符串的人。
我这里的a,b,是常量，大家可以让a,b是表单提交过来的变量，这样就可以做一个搜索了。
下面大家看看这个代码，理解一下：
<form name="form1" method="post" action="example6.asp">
搜索：<br>
name =
<input type="text" name="name">
and tel=
<input type="text" name="tel">
<br>
<input type="submit" name="Submit" value="提交">
<input type="ret" name="Submit2" value="重置">
</form>
example6.asp：
<%
name=request.form("name")
tel=request.form("tel")
t ateobject("tion")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&rver.mappath("example3.mdb")
exec="lect * from guestbook where name='"+name+"' and tel="+tel
t ateobject("dt")
rs.open exec,conn,1,1
%>
<html>
<head>
八谷
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; chart=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
魔方怎么玩<%
do while f
%><tr>
<td><%=rs("name")%></td>
<td><%=rs("tel")%></td>
<td><%=rs("message")%></td>
<td><%=rs("time")%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
</body>
</html>
学会数据库的基本操作3（删除记录）
开门见山，大家直接看程序。
exec="delete * from guestbook where id="&request.form("id")
上面这句话完成了删除记录的操作，不过锁定记录用了记录唯一的表示id，我们前面建立数据库的时候用的是系统给我们的主键，名字是编号，由于是中文的名字不是很方便，大家可以修改为id，不修改的话就是
exec="delete * from guestbook where 编号="&request.form("id")
下面我们看完整的代码：一个表单传给ASP文件一个ID，然后这个ASP文件就删除了这个ID。
<form name="form1" method="post" action="example7.asp">
delete:
<input type="text" name="id">
<input type="submit" name="Submit" value="提交">
</form>
example7.asp：
<%
上元夜古诗t ateobject("tion")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&rver.mappath("example3.mdb")
exec="delete * from guestbook where 编号="&request.form("id")
ute exec
%>
我在示例里面加了一个example72.asp，和example4.asp差不多，就是加了一个id字段，大家可以先运行这个文件看一下所有记录的ID和想删除记录的ID，删除记录以后也可以通
过这个文件复查。等到最后一天，我们会把所有的这些东西整合的。大家就不会需要这么麻烦的操作。
example72.asp：
<%
t ateobject("tion")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&rver.mappath("example3.mdb")
exec="lect * from guestbook"
t ateobject("dt")
rs.open exec,conn,1,1 %>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; chart=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<%
do while f
%><tr>
<td><%=rs("编号")%></td>
<td><%=rs("name")%></td>
<td><%=rs("tel")%></td>
<td><%=rs("message")%></td>
<td><%=rs("time")%></td>
</tr>
<%
rs.movenext
loop
%>北京天安门简笔画
</table>
</body>
</html>
