您的网🤩站是否仍一如既往地保持“静态【jìng tài】💾”？目前呈几何增长的🕓互联网【hù lián wǎng】网🔷站中【zhàn zhōng】🚧，有相当一部分仍固守“静态【jìng tài】💾”，无形中已大大落后于🐗时代的【shí dài de】🕓步伐。所谓“静态【jìng tài】💾”指的【zhǐ de】🕓就是网【jiù shì wǎng】站的🕓网页内容【róng】🔮“固定不变🏰”，当用户【dāng yòng hù】浏览器【liú lǎn qì】通过互【tōng guò hù】联网的🕓HTTP协议向WEB服务器😳请求提供网页🧞内容【róng】时✌，服务器😳仅仅是【jǐn jǐn shì】将原已【jiāng yuán yǐ】设计好的🕓静态【jìng tài】💾HTML文档【wén dàng】传✊送给用户浏览【hù liú lǎn】器。其页面的内容【róng】🎰使用的🕓仅仅是【jǐn jǐn shì】标准的🥋HTML代码，最多再【zuì duō zài】😪加上流💖行的🚌GIF89A格式的【gé shì de】🌙动态图片🦈，比如产生几只小狗小【xiǎo gǒu xiǎo】猫跑来【māo pǎo lái】🕑跑去的⏭动画效【dòng huà xiào】果【guǒ】🦌。若网站维护者要更新网页的【wǎng yè de】内容【róng】🎰，就必须🧢手动地【shǒu dòng dì】来更新其所有的🕓HTML文档【wén dàng】。

　　“静态”网站的致命弱👯点就是不易维护【hù】，为了不断更新网页内【wǎng yè nèi】✉容，你必须不断地重复制😅作【zuò】🙀HTML文档，随着网【suí zhe wǎng】站内容📲和信息量的日📵益扩增【yì kuò zēng】，你就会【nǐ jiù huì】👼感到工作【zuò】🙀量大得出乎想象【xiàng】👞。

　　一般来【yī bān lái】说🔁，一个真🕵正的【de】🍺、完整的【de】站点是🕊离不开数据库【shù jù kù】❕的【de】，因为实际应用【jì yīng yòng】🎢中【zhōng】🍺，需要保😃存的【de】数🈹据【jù】很多，而且这【ér qiě zhè】些数据【jù】之间往【zhī jiān wǎng】👫往还有关联，利用数据库【shù jù kù】❕来管理这些数据【jù】，可以很方便的【de】🌒查询和【chá xún hé】更新【gèng xīn】⛱。数据库【shù jù kù】❕有很多种，如：Fox 数据库【shù jù kù】❕(.dbf)、Access 数据库【shù jù kù】❕(.mdb)、Informix、Oracle 和 SQL Server 等等【děng děng】，在这里🙈，我将日前整理好的【de】ASP是如何访问Access数据库【shù jù kù】❕的【de】资料拿出来🎠和大家🐄分享一【fèn xiǎng yī】下。

常用数据库语句

　　1.SELECT 语句【yǔ jù】🙈：命令数【mìng lìng shù】据库引🈲擎从数📹据库里【jù kù lǐ】返回信息，作为一【zuò wéi yī】组记录【zǔ jì lù】。
　　2.INSERT INTO 语句【yǔ jù】🙈：添加一【tiān jiā yī】个或🚊多个记录😪至一个📌表。
　　3.UPDATE 语句【yǔ jù】🙈：创建更新查询【xīn chá xún】🧕来改变基于特📁定准则的指定【de zhǐ dìng】表中的字段值。
　　4.DELETE 语句【yǔ jù】🙈：创建一❤个删除查询把记录从🎯 FROM 子句列出并符合【hé】 WHERE 子句的【zǐ jù de】一个或🚊更多的【gèng duō de】表中清🤶除。
　　5.EXECUTE 语句【yǔ jù】🙈：用于激活🚺 PROCEDURE（过程）

用🐤 ASP 来做一【lái zuò yī】个自己的通讯录练练🌄手吧【shǒu ba】……

一、建立数据库：

　　用【yòng】 Microsoft Access 建立一【jiàn lì yī】个名为🎿 data.mdb 的空数【de kōng shù】据库📅，使用【yòng】设🈴计器创建一个新表【xīn biǎo】。输入以下几个💬字段：

　　字段名🐑称💓　　数据类【shù jù lèi】🌒型💽　　说明　　　　　　其它【qí tā】
　　ID　　　　　自动编【zì dòng biān】号🛑　　数【shù】据标识🚴　　　　字段大【zì duàn dà】小：长整型💽　新值【xīn zhí】👅：递增　索引【suǒ yǐn】🕕：有【yǒu】🍝（无重复【wú chóng fù】）
　　username　　文本　　　　姓名　　　　　　缺省值
　　usermail　　文本　　　　E-mail　　　　　缺省值
　　view　　　　数字【shù zì】　　　　查看次数【shù】　　　　字段大【zì duàn dà】小：长整型💽　默认值😮：0　索引【suǒ yǐn】🕕：无
　　indate　　　时间🐮日期【rì qī】　　加入时间🐮　　　　缺省值

　　保存为 data.mdb 文件💹，为了便📼于说明【yú shuō míng】，只是做了一个【le yī gè】😫比较简【bǐ jiào jiǎn】单的库。

二、连接数据库

　　方法【fāng fǎ】📖1：
　　Set conn = Server.CreateObject("ADODB.Connection")
　　conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("data.mdb")

　　方法【fāng fǎ】🔺2：
　　Set conn = Server.CreateObject("ADODB.Connection")
　　conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb")

　　注意🈂：一个页🐎面中【miàn zhōng】，只要连【zhī yào lián】接一次就可以🙏了，数据库使用完🛵后要及时关闭【shí guān bì】连接【lián jiē】。
　　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

　　说明🤹：建立数据库连接【jiē】；通过表【tōng guò biǎo】✔单获取⬇姓名、E-mail 字符串【zì fú chuàn】，Now()获取当【huò qǔ dāng】🤢前时间【qián shí jiān】日期💇；使用 insert into 语句添加新记录【lù】；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 语句已🈂经知道了【le】📺，不过在Web应用时🤡，还得创建一个【jiàn yī gè】🍺 RecordSet 对象得【duì xiàng dé】🚈到记录集【jí】，才能把从数据库里取【kù lǐ qǔ】出的值应用在⌛网页上🌰，如果现在将所有的记录显示在网页【zài wǎng yè】上🌰就这样【jiù zhè yàng】：

　　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") &"次【cì】　"& rs("indate") &"加入【jiā rù】🎻</p>"
　　　　rs.MoveNext
　　Loop

　　rs.Close
　　Set rs = Nothing
　　conn.Close
　　Set conn = Nothing

　　说明：建立数📹据库连接🏯；创建💆 rs 得到记录集；循环显【xún huán xiǎn】⛱示记录，rs.Eof 表示记【biǎo shì jì】录末，rs.MoveNext 表示移【biǎo shì yí】🐞到下一个记录【gè jì lù】；最后关闭【bì】。

五、修改（更新）数据库记录

　　修改记录的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

　　说明：建立数【jiàn lì shù】据库连【jù kù lián】接；获取记【huò qǔ jì】录🅾ID、新🏘 E-mail 字符串；使用 update 语句修【yǔ jù xiū】改记录【gǎi jì lù】🅾；conn.Execute 来执行【lái zhí háng】🙂；最后关闭。
　　如果使记录的🏯查看值加📴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

　　说明【shuō míng】：建立数【jiàn lì shù】📋据库连接；获取记😑录ID；使用【shǐ yòng】