ASP数据库编程技巧

最新推荐文章于 2017-03-26 20:17:54 发布

leujboik

最新推荐文章于 2017-03-26 20:17:54 发布

阅读量408

点赞数

本文链接：https://blog.csdn.net/u014739770/article/details/24404835

版权

ASP数据库编程技巧

Active Server Pages是功能强大、易于学习的服务器端脚本编程环境，ASP内置ADO组件，因此可以轻松的存取各种数据库，从而大大缩短了程序开发时间。本文将笔者从事ASP数据库编程的两点经验贡献出来，供大家参考。

一、与数据库建立连接

　　我们常用的数据库一般为Microsoft Access或SQL Server，为了使用这两种数据库，我们通常需要先创建和配置ODBC数据源，但事实上，ASP脚本可以使用OLD DB的其他驱动程序直接把ADO绑定到数据库而不使用ODBC作为一个附加层，请看：

1．与Microsoft Access数据库建立连接

Set Cnn = Server.CreateObject("ADODB.Connection")

Cnn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\asp\data")

& "\example.mdb;"

　　在这里，Server对象的MapPath方法将指定的虚拟路径转换为真实的文件路径，最终结果类似：c:\InetPub\home\asp\data\example.mdb。

2．与SQL Server数据库建立连接

Set Cnn = Server.CreateObject("ADODB.Connection")

strConn = "Provider=sqloledb; User ID=sa; Password=; Initial Catalog=pubs; Data

Source=16.62.5.8"

Cnn.Open strConn

　　Initial Catalog后指定数据库名，Data Source后为机器名或IP地址。

二、从ASP脚本中访问数据库的两种方法

1．通过SQL语句来访问数据库

1）若需要返回 Recordset 对象引用（如查询操作）先要建立一个名为Cnn的连接

strQry = "SELECT * FROM authors"

Set rsTest = Cnn.Execute(strQry)

然后可以通过循环显示记录集rsTest中的有关数据。

2）若不需要返回数据（如增加、修改、删除操作）

strQ = "INSERT INTO Shippers (CompanyName, Phone) VALUES ('O''Conner Delivery', '(503)

555-0201')"

Cnn.Execute strQ

2．通过Recordset对象的Open、AddNew、Delete、Update和UpdateBatch方法访问数据库

Set rsTest = Server.CreateObject("ADODB.Recordset") '创建Recordset对象

rsTest.CursorLocation = adUseServer　　 '使用服务器端游标

rsTest.CursorType = adOpenForwardOnly '使用仅向前游标类型

rsTest.LockType = adLockOptimistic　　 '开放式记录锁定（逐条）

rsTest.Open "SELECT * FROM Shippers WHERE CompanyName = 'United Package'", Cnn, , ,

adCmdText

' 第五个参数：adCmdText指示数据源是一个SQL语句。

rsTest("Phone") = "(503) 555-8888"

rsTest.Update

Response.Write "更新单个记录 " & objRS("Phone") & ". "

　　为了更好的理解ADO的数据库编程，下面提供一个完整的实例(NorthWind.mdb是Microsoft Access97自带的一个数据库，文件adovbs.inc可在C:\Program Files\Common Files\System\ADO下找到)：

<% @LANGUAGE = VBScript %>

Response.Expires = 0

Dim StrCnn,Cnn,objRS, strOut, ID

Set Cnn = Server.CreateObject("ADODB.Connection")

StrCnn="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" &

Server.MapPath("\asp24") & "\NorthWind.mdb;"

Cnn.Open StrCnn

Response.Write StrCnn & " "　　'看看输出的结果

Set objRS = Server.CreateObject("ADODB.Recordset")

objRS.CursorLocation = adUseServer

objRS.CursorType = adOpenKeyset

objRS.LockType = adLockOptimistic

objRS.Open "运货商", Cnn, , , adCmdTable

objRS.AddNew

objRS("公司名称") = "吴丰"

objRS("电话") = "571-7227298"

objRS.Update

ID = objRS("运货商ID")

Response.Write "新增记录运货商ID为 "

Response.Write ID & ". "

objRS.Close

objRS.CursorLocation = adUseClient

objRS.CursorType = adOpenForwardOnly

objRS.LockType = adLockReadOnly

objRS.Open "运货商", Cnn, , , adCmdTable

下面为显示信息部分-运货商ID: 公司名称电话

While Not objRS.EOF

strOut = objRS("运货商ID") & ": " & objRS("公司名称")

strOut = strOut & " " & objRS("电话")

Response.Write Server.HTMLEncode(strOut) & " "

objRS.MoveNext

Wend

objRS.close : Cnn.close

Set objRS = Nothing : Set Cnn = Nothing

</BODY></HTML>

leujboik

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
ASP数据库编程技巧

ASP数据库编程技巧Active Server Pages是功能强大、易于学习的服务器端脚本编程环境，ASP内置ADO组件，因此可以轻松的存取各种数据库，从而大大缩短了程序开发时间。本文将笔者从事ASP数据库编程的两点经验贡献出来，供大家参考。一、与数据库建立连接　　我们常用的数据库一般为Microsoft Access或SQL Server，为了使用这两种数据库，我们通常需要先创建
复制链接

扫一扫