首页 
资讯中心 业内活动 行业人物 网站运营 站长商城 精品学院 站外休闲 求职招聘
特别专题 | 行业新闻 | 人物访谈 | 专栏作家 | 求职招聘 | 行业公司 | 网站名录 | 好站推荐 | 站长工具 | 站长大会
·呼和浩特网站备案 ·站长组、评论专员
·本站开展IDC托管 ·站长学习精品学院
·内蒙古精品网址站 ·内蒙古网站实名录
   当前位置:内蒙古IT实验室 内蒙古互联网实验室 内蒙古站长 >> 精品学院 >> 网络编程 >> ASP编程 >> 浏览文章
ASP与数据库应用
作者:未知 来源:互联网 收藏: 投稿

 一般来说,一个真正的、完整的站点是离不开数据库的,因为实际应用中,需要保存的数据很多,而且这些数据之间往往还有关联,利用数据库来管理这些数据,可以很方便的查询和更新。数据库有很多种,如:Fox 数据库(.dbf)、Access 数据库(.mdb)、Informix、Oracle 和 SQL Server 等等,在这里,我将以 Microsoft Access 数据库为例来说明ASP是如何访问数据库的。

常用数据库语句

  1.SELECT 语句:命令数据库引擎从数据库里返回信息,作为一组记录。
  2.INSERT INTO 语句:添加一个或多个记录至一个表。
  3.UPDATE 语句:创建更新查询来改变基于特定准则的指定表中的字段值。
  4.DELETE 语句:创建一个删除查询把记录从 FROM 子句列出并符合 WHERE 子句的一个或更多的表中清除。
  5.EXECUTE 语句:用于激活 PROCEDURE(过程)

用 ASP 来做一个自己的通讯录练练手吧……

一、建立数据库:

  用 Microsoft Access 建立一个名为 data.mdb 的空数据库,使用设计器创建一个新表。输入以下几个字段:

  字段名称  数据类型  说明      其它
  ID     自动编号  数据标识    字段大小:长整型 新值:递增 索引:有(无重复)
  username  文本    姓名      缺省值
  usermail  文本    E-mail     缺省值
  view    数字    查看次数    字段大小:长整型 默认值:0 索引:无
  indate   时间日期  加入时间    缺省值

  保存为 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 = "fytb@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 "

姓名:"& rs("username") &" E-mail:"& rs("usermail") &" 查看:"& rs("view") &"次 "& rs("indate") &"加入

"
    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 = "fytb@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;使用 delete 语句删除记录;conn.Execute 来执行;最后关闭。
  删除多条记录为:sql = "delete from data where ID in (ID1,ID2,ID3)"
  删除所有记录为:sql = "delete from data"

总结:
  以上教程是针对ASP的初学者而写的,只是介绍了一些基本的用法,在了解之后可以自己去试试,重要的在于能举一反三、综合运用。更多的语法和参数请参阅 Microsoft Access 帮助中的 Microsoft Jet SQL 参考,由于本人才疏学浅、能力有限,如有表达不明确有地方还望指出,如果在应用当中遇到什么问题,也希望能够提出。谢谢

浏览:  


人支持

Tags:
发表评论】【告诉好友】【打印此文】【收藏此文】【关闭窗口
 最新推荐
网站运营资深人士徐志勇
内蒙古IT实验室开展IDC业务
“人肉搜索”首上大银幕《无形杀》观众定结尾
售楼广告恶搞“红色经典” 网友称赞有创意(图)
少年总裁张伯宏
微软正式公布反盗版政策 盗版用户将遭黑屏警告
千橡启用域名Kaixin.COM:开心网被全面克隆
内蒙古高校主流媒体上上网
内蒙古电影网站长巴特尔
内蒙古电影网
 相关文章
暂无相关链接
 文章评论:
 最新文章
ASP提速技巧五则
ASP开发经验谈 ASP开发10条经验总结
GB码和BIG5码的互换技术
使用ASP常见问题解答
维护 ASP 应用程序的安全
基础开发入门级:JSP与ASP的比较
如何把ASP编写成DLL
用asp自动解析网页中的图片地址
ASP与数据库应用
精华 ASP 代码
 编辑推荐
网站运营资深人士徐志勇
内蒙古IT实验室开展IDC业务
“人肉搜索”首上大银幕《无形杀》观众定结尾
售楼广告恶搞“红色经典” 网友称赞有创意(图)
少年总裁张伯宏
微软正式公布反盗版政策 盗版用户将遭黑屏警告
千橡启用域名Kaixin.COM:开心网被全面克隆
内蒙古高校主流媒体上上网
内蒙古电影网站长巴特尔
内蒙古电影网
 热门排行
哀悼地震死难同胞网站变灰色
北京市有望在IT行业试行在家办公
谁来保护弱势站长群体的信息安全?
IT实验室2007年度网络宣传大事例
访谈:客齐集员工—内蒙古小伙儿姜丰波
北方新报做媒 一对网络情侣喜结良缘
3158商机网与IT实验室08元旦联谊活动MTV
IT实验室与3158商机网元旦活动
震撼世界!2008年互联网趋势预测
邢明:明后两年将是互联网的社区年
 
孵化网站:  
内蒙古在线 内蒙古文学网 内蒙古好网 网络广告网 内蒙古旅游在线 内蒙古汽车网 婴幼儿保健网 内蒙古大学生网 内蒙古物流网 内蒙古房产网内蒙古家居装饰网
合作媒体:
DoNews IT中国 站长网 落伍者 中国站长站 AdminTech 内蒙古新闻网 北方新闻网 内蒙古晨报 内蒙古商报 呼和浩特晚报
合作赞助:
内蒙古新闻网 新闻网博客频道 图吧 飞普科技 盛开元广告 内蒙古商报 互联网实验室 乌海在线 广东武警医院整形美容 广州整形美容医院 梦想家博客
友情链接:
内蒙古电子杂志网内蒙古第一站子寒热点互联网BIOS之家分享IT每一天IT技术部
山西站长网山炮摇滚视频网草原论坛中国生活指南网内蒙古动漫电影网阿尔山旅游网呼和浩特人才网
内蒙古拍易拍信息网串串网站导航站长中国网罗伊-电子商务信息网络安全调查九上网导航 计算机病毒处理中心
鄂尔多斯之窗内蒙古房地产家具网内蒙古金融网内蒙信息港内蒙信息网青城之恋塞外传媒网
包头移动公寓网内蒙古生活信息媒体网呼和浩特餐饮娱乐网7度POP网蒙古文化呼和浩特好评网
IT动力源呼伦贝尔旅游网包头社区论坛包头品牌网太平洋电脑网内蒙古站全客网土默川信息网
关于本站 - 业务合作 - 广告合作 - 联系站长 - 设为首页 - 加入收藏 - 友情连接 - 雁过留声
内蒙古IT实验室 版权所有 蒙ICP备07001325号 本站特约顾问:资深的互联网专家黄相如
Copyright(C) 2008 NmgLabs.com All Rights ReservedWeb Hosting Pal