ADO.NET有很多值得学习的地方,这里我们主要介绍ADO.NET Recordset对象,包括介绍CursorLocation属性、UpdateBatch方法、Open方法等方面。CursorLocation属性:指定记录集的光标位置,有adUseServer和adUseClient两种。如果在connection对象连接前未指定游标,则必须在此设置。UpdateBatch方法:同时保存多条被更改的记录。Open方法:建立1个记录集。
#T#其中,Source即RecordSource参数可以是1个查询、存储过程名或表名等;或者1个Command对象变量名(此时要省略 ActiveConnection参数,即为空),ActiveConnection参数指明该记录集基于哪个Connection连接对象,这个连接对象必须是已建立的连接,当没有Connection对象时,该参数就直接指定一个ConnectionString连接串;Cursortype指明游标类型,Locktype指明记录锁定方式(记录集是否可修改/只读),Options是说Source参数中内容的类型,如表,存储过程等,与 Command对象的Commandtype类似。
使用ADO.NET Recordset对象Open方法,不要事先建立Connection和Command对象,也可打开数据源——其实,它们三个对象本来就是平行的嘛,如:
- Dim rst As New ADODB.Recordset
- Private Sub Form_Load()
- Const cnStr = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\工商所收费系统\MyDatabase.mdb"
- rst.Open "select * from Unitrecord", cnStr, adOpenDynamic, adLockOptimistic
- End Sub
只要这么几句,就打开一个记录集了。
ADO.NET Recordset对象Save方法:将记录集存为1个文件。本方法不会关闭记录集。该方法在记录集建立后才能使用。在第1次使用该方法存储记录集后,如果需要往同一文件存储同样的记录集,要省略文件名。我在使用ADO.NET Recordset对象时遇到1难题:竟没用来!我在声明段和Form_load事件中声明了对象变量,也设置了connectionstring,open属性,也给记录集对象赋予了Execute方法得到的记录,可是,记录集对象不可用,如:(红色代码为修改后的正确写法。)。
- Dim cn As ADODB.Connection
- Dim cmd As ADODB.Command
- Dim rst As ADODB.Recordset
- rivate Sub Form_Load()
- Set cn = New ADODB.Connection
- cn.ConnectionString = "FILE NAME=C:\WINDOWS\Desktop\Savelink.UDL"
- cn.CursorLocation=adUseClient
- cn.Open
- Set cmd = New ADODB.Command
- Set cmd.ActiveConnection = cn
- cmd.CommandText = "select * from sub1"
- Set rst = New ADODB.Recordset
- Set rst = cmd.Execute() ‘缺省情况下,记录集为只读,如果要修改记录,需要设定记录集的LockType属性,或在记录集对象的OPEN方法中一并设置。
- rst.Open "sub1", cn, adOpenDynamic, adLockOptimistic
- (注:第1个参数”sub1”也可采用1个command对象名,但那样的话要省略后面cn,如下:
- rst.Open cmd, , adOpenDynamic, adLockOptimistic)
- Label2.Caption = "本过程共" & rst.RecordCount & "步。"
- rst . addnew
- rst(0) = "搞试验"
- rst(1) = "我的实验"
- rst.Update ‘这句不能丢!设为adLockOptimistic对记录的修改不会自动进行保存!!!!
- End Sub
执行到label2.caption=…rst.RecordCount…和rst . addnew时就出错了,好象根本就没有rst似的。