ASP与数据库（二）
日期：2010-12-05 浏览次数：20855 次
一、 向数据库中添加新数据 方法一：使用SQL语句，例wuf50.asp。 为了简化以后的程序，将与Access数据库的连接部分放在一个文件中，此文件以后需要用到时不再说明。 <% 'AdoAccess.asp Option Explicit Response.Expires = 0 '第一部分: 建立连接 Dim Cnn, StrCnn Set Cnn = Server.CreateObject("ADODB.Connection") StrCnn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Inetpub\home\asp\Northwind.mdb" Cnn.Open StrCnn %> 程序wuf50.asp <% @LANGUAGE = VBScript %> <!--#include file="AdoAccess.asp"--> <% ' wuf50.asp '第二部分: 使用 Connection 对象的 Execute 添加新数据 Dim StrSQL, rsTest StrSQL = "INSERT INTO 运货商 (公司名称,电话) VALUES('wu''feng','0571-7227298')" Cnn.Execute StrSQL %> <HTML> <BODY> <% '第三部分: 将得到的记录集显示到浏览器上 Set rsTest = Cnn.Execute("Select * From 运货商") Do While Not rsTest.EOF Response.Write rsTest(0) & " " & rsTest(1) & " " & rsTest(2) & " " & "<BR>" rsTest.MoveNext Loop '第四部分: 打扫战场 Cnn.close Set rsTest = Nothing: Set Cnn = Nothing %> </BODY> </HTML> 请注意以下几点： 1． 使用SQL语句向Access数据库中添加数据时必须使用Insert Into，而向SQL Server数据库中添加数据，使用Insert就可以了。 2． 使用SQL语句添加数据的格式如上例，注意需要添加'wu'feng'，在语句中必须使用'wu''feng'，因为SQL语句使用'作为字符串的分界符。 3． 把本例同以前所学的知识结合起来，就可以实现从HTML表单中添加数据。 4． 注意有一个数据类型为自动编号的字段，如本例中的“运货商ID”，因此你大可不必考虑如何写代码获得一个递增的编号。 方法二：使用Recordset对象的Addnew方法，例wuf51.asp。 <% @LANGUAGE = VBScript %> <!--#include file="AdoAccess.asp"--> <!--#include file="adovbs.inc"--> <% ' wuf51.asp '第二部分: 使用 Recordset 对象的 AddNew 方法添加新数据 Dim StrSQL, rsTest Set rsTest = server.CreateObject("ADODB.Recordset") rsTest.CursorType = adOpenKeySet 'adOpenDynamic '没有下面这一句, 将不允许更新数据库, 为什么? rsTest.LockType = adLockOptimistic rsTest.Open "运货商",Cnn,,,adCmdTable rsTest.AddNew rsTest("公司名称") = "wu'feng" rsTest("电话") = "0571-7227298" rsTest.Update %> <HTML> <BODY> <% '第三部分: 将得到的记录集显示到浏览器上 '将数据库指针移到表中的第一条记录 If Not rsTest.EOF <> 0 Then Response.Write "表中现有 [" & rsTest.RecordCount & "] 条数据" & "<Br><Br>" rsTest.MoveFirst End If Do While Not rsTest.EOF Response.Write rsTest(0) & " " & rsTest(1) & " " & rsTest(2) & " " & "<BR>" rsTest.MoveNext Loop '第四部分: 打扫战场 Cnn.close Set rsTest = Nothing: Set Cnn = Nothing %> </BODY> </HTML> 分析： 1． 为何要设置rsTest.LockType = adLockOptimistic Recordset对象的LockType属性有四个可选值： adLockReadOnly——默认值，表示以只读方式打开记录集，因而无法无法更改数据，在这种情况下使用AddNew方法就会发生错误。 adLockPessimistic——保守式记录锁定（逐条）。采用编辑时立即锁定数据源的记录的方式。此时，其他用户不能访问该数据。 adLockOptimistic ——开放式记录锁定（逐条）。只在调用 Update 方法时锁定记录。想想，这个属性是不是与我们讲过的Application对象的Lock、Unlock属性的意思差不多。 adLockBatchOptimistic——开放式批更新。用于成批更新数据，与UpdateBatch方法相对应。 顺便我们再提一下上一讲中提到的CursorType 属性，它同样有四个值： adOpenForwardOnly——仅向前游标，默认值，只能在记录中向前滚动。这可以节省资源并提高性能。 adOpenStatic——静态游标。可以用来查找数据或生成报告的记录集合的静态副本。另外，对其他用户所作的添加、更改或删除不可见。 推荐在ASP中只使用这两种游标。 adOpenKeyset——键集游标。键集游标与动态游标相似,不同的只是禁止查看其他用户添加的记录，并禁止访问其他用户删除的记录，其他用户所作的数据更改将依然可见。 adOpenDynamic——动态游标。可以看见其他用户所作的添加、更改和删除。允许在记录集中进行所有类型的移动。 可以肯定的一定是，这样抽象的描述有点似是而非，还是弄不太明白，简单的说， （1） 如果仅仅检索数据，使用默认值就可以了； （2） 如果使用Update方法更新一条数据，LockType属性使用adLockOptimistic，使用UpdataBatch方法成批更新数据，则使用adLockBatchOptimistic。
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
|
