你的网站还像往常一样“静态”吗?目前,有相当一部分几何级增长的互联网网站仍然固守“静态”,已经落后于时代的步伐。所谓“静态”,就是网站的内容是“固定的”。
当用户的浏览器通过互联网的HTTP协议请求web服务器提供网页内容时,服务器只将已经设计好的静态HTML文档发送到用户的浏览器。它的页面内容只使用标准的HTML代码,
最多加上现在流行的GIF89A格式的动态图片,比如几只小狗小猫跑来跑去的动画效果。如果网站维护者想要更新网页内容,他必须手动更新他所有的HTML文档。
“静态”网站的致命弱点是难以维护。为了不断更新网页内容,必须反复制作HTML文档。随着网站内容和信息量的不断增加,你会觉得工作量超乎想象。
一般来说,一个真实完整的网站离不开数据库,因为在实际应用中,有大量的数据需要保存,这些数据之间往往存在关联。使用数据库来管理这些数据可以非常方便地进行查询和更新。有很多种数据库,
如:福克斯数据库(。dbf),访问数据库(。mdb)、Informix、oracle和sql server等。这里,
我将与你分享ASP如何访问Access数据库的信息。
常见数据库语句
1.SELECT语句:命令数据库引擎将数据库中的信息作为一组记录返回。
2.INSERT INTO语句:向表中添加一条或多条记录。
3.UPDATE语句:创建一个更新查询,以根据特定条件更改指定表中的字段值。
4.DELETE语句:创建一个删除查询,从FROM子句中列出的一个或多个表中清除记录,并符合WHERE子句。
5.EXECUTE语句:用于激活过程。
使用ASP成为你自己的通讯录培训师.
首先,建立一个数据库:
使用Microsoft Access建立一个名为data.mdb的空数据库,并使用设计器创建一个新表。输入以下字段:
字段名称数据类型描述其他
ID自动编号数据标识字段大小:长整型新值:增量索引:是(无重复)
用户名文本名称默认值
用户邮件文本电子邮件默认值
视图视图数量字段大小:长整型默认值:0索引:无
日期时间日期添加时间默认值
保存为data.mdb 文件,为了便于说明,只是做了一个比较简单的库。
二、连接数据库
方法1:
Set conn=Server.CreateObject('ADODB.Connection')
conn.Open 'driver={Microsoft Access Driver (*.mdb)};dbq='Server.MapPath('data.mdb')
方法2:
Set conn=Server.CreateObject('ADODB.Connection')
conn.Open 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='Server.MapPath('data.mdb')
注意:一个页面中,只要连接一次就可以了,数据库使用完后要及时关闭连接。
conn.Close
Set conn=Nothing
三、添加新记录到数据库
Set conn=Server.CreateObject('ADODB.Connection')
conn.Open 'driver={Microsoft Access Driver (*.mdb)};dbq='Server.MapPath('data.mdb')
username='风云突变'
usermail='ec0705liujuan@163.com'
indate=Now()
sql='insert into data (username,usermail,indata) values(''username'',''usermail'',''indate'')'
conn.Execute(sql)
conn.Close
Set conn=Nothing
说明:建立数据库连接;通过表单获取姓名、E-mail 字符串,Now()获取当前时间日期;使用insert into 语句添加新记录;conn.Execute 来执行;最后关闭。
四、选择数据库里的记录
1.选择所有记录的字段(按记录倒序排序):sql='select * from data order by ID desc'
2.选择所有记录的姓名和E-mail字段(不排序):sql='select username,usermail from data'
3.选择姓名为“风云突变”的所有记录:sql='select * from data where username=''风云突变'''
4.选择使用163 信箱的所有记录(按查看次数排序):sql='select * from data where usermail like '%'@163.com'%' order by view desc'
5.选择最新的10个记录:sql='select top 10 * from data order by ID desc'
SQL 语句已经知道了,不过在Web应用时,还得创建一个RecordSet 对象得到记录集,才能把从数据库里取出的值应用在网页上,如果现在将所有的记录显示在网页上就这样:
Set conn=Server.CreateObject('ADODB.Connection')
conn.Open 'driver={Microsoft Access Driver (*.mdb)};dbq='Server.MapPath('data.mdb')
sql='select * from data'
Set rs=Server.CreateObject('ADODB.RecordSet')
rs.Open sql,conn,1,1
Do While Not rs.Eof
Response.Write 'p姓名:' rs('username') ' E-mail:' rs('usermail') ' 查看:' rs('view') '次 ' rs('indate') '加入/p'
rs.MoveNext
Loop
rs.Close
Set rs=Nothing
conn.Close
Set conn=Nothing
说明:建立数据库连接;创建rs 得到记录集;循环显示记录,rs.Eof 表示记录末,rs.MoveNext 表示移到下一个记录;最后关闭。
五、修改(更新)数据库记录
修改记录的E-mail:
Set conn=Server.CreateObject('ADODB.Connection')
conn.Open 'driver={Microsoft Access Driver (*.mdb)};dbq='Server.MapPath('data.mdb')
ID=1
usermail='ec0705liujuan@163.com'
sql='update data set usermail=''usermail'' where ID='CInt(ID)
conn.Execute(sql)
conn.Close
Set conn=Nothing
说明:建立数据库连接;获取记录ID、新E-mail 字符串;使用update 语句修改记录;conn.Execute 来执行;最后关闭。
如果使记录的查看值加1,则:sql='update data set view=view+1 where ID='CInt(ID)
六、删除数据库记录
删除某一条记录:
Set conn=Server.CreateObject('ADODB.Connection')
conn.Open 'driver={Microsoft Access Driver (*.mdb)};dbq='Server.MapPath('data.mdb')
ID=1
sql='delete from data where ID='CInt(ID)
conn.Execute(sql)
conn.Close
Set conn=Nothing
说明:建立数据库连接;获取记录ID;使用