查看完整版本: VB两种操作Access数据库方法的比较

VB两种操作Access数据库方法的比较

在VB编程中通常要与数据库打交道，对于数据量较小的应用，一般选用Access作为数据库，因为Access数据库比较简单，功能也比较齐全，数据的备份、拷贝都很方便，且程序发布时不需要额外单独安装其它的数据库管理软件。因此，在功能能够满足要求的条件下，Access数据库往往成为一些小型数据库软件的首选。
2s9xoM*{ .j0d$US.?RF/WC
　　关于用VB操作Access库表的方法有多种，一般初学者往往会使用数据控件，许多资料上也大都以此作为操作Access数据库的起点来介绍，因为这个方法使用起来非常简单，但使用数据控件的方法在程序编码上往往不够灵活。现在介绍一下其它两种操作Access数据库的方法。
Yy G Rgw c^|%V
:^f?*V&gP{ 　　第一种：使用数据库对象ZV_4d*S0j

U&PVy2M:h 　　首先，要进行有关数据对象的声明，代码如下。/g2oA+x{D

7^a*I E1y Vhj+Y \"r4L(A-m,N

V)CGu0W
.u3V+VE+f R8l6H :sB;HuBi3^&H I+f,b
;oD2}0Pf.w,H
)p[a{N4Qzh`
scW0RsNG

![/Bsl%h;o:x6ZQ Dim MyWs As Workspace0w{Y@ Gw
Dim MyDB As Database
IMoa!Us&Cr*KA,u Dim WordTab As Recordset
m4Xs-C+l;L5{8^ 　　生成工作区，打开数据库，然后再根据需要打开相应的库表。4B6hkV-hV3GrLy-a
g
6Kd _J*c s
@r t,d5rCjO4HhL2k
W Qi(BdQ'BvK

h HUd\\~ #oHQC}Tm

1T9]*[ J4lU
4p9Y!H8mYiI2Z
}wMc8~s1U)I\J X
;TeG]6I4]G Set MyWs = DBEngine.CreateWorkspace?″″? ″Admin″? ″″? dbUseJet?
CENbEYb$q a,r Set MyDB = MyWs.OpenDatabase?数据库名称? False? False?\*CYqf9YJb-FX
Set WordTab = MyDB.OpenRecordset?″表名″? dbOpenDynaset?
lH-F5O^R5b'T 　　这种方法的优点是代码比较简单，要求的环境为DAO 2.5/3.51，其中表名可以换成SELECT语句，即根据条件打开所需要的记录集，这种方法可脱离数据控件，可以比较方便灵活地操作数据库表，增加了程序的灵活性。!p(X(Gcx
!c`f!u(?F9N
　　提示：经过测试发现，这种方法只能打开Access97库表，对于Access2000库表却无能为力，会弹出库表格式不对的出错提示。另外，对数据环境的要求仍比较多。
0KG;ScI !s4oYd yt$gjI7j8D8F
　　第二种：使用ADODB!n@6c*`5?A2^'R
"]1_I Z$KM#q
　　首先，声明一个链接变量，并根据需要声明记录集变量。Z8J"R|(xA

.WW!?uKaS?7Rs FmL @"`)E

knxs k C z
$[h?{,m1}5IL (W)BVU+]n:rll3u

/K8]|^y;h 0z^3T1I+H6Cg`:I gT

@a;sc2~
XCW\6a`z Dim LocCnn1 As ADODB.Connection
EH)]0y5Vwp Dim LocRst1 As ADODB.Recordset
@
Yl9`2v7lD 　　建立与数据库的链接，如果数据库没有口令，最后一行可以不写（写上也不会错）。
sj.y5^C_4X GGB4vS )a.ZgEjn8bi
vD0O

F RxDl&XE
Q
+M3e"dr$oh nR ,az{n8C[\
RgJ^%\x

HU|l Dz
d,Dgo9Qy D,|*G.F )[n+V{ {-k,Y5h
\-M1t8}H r$[g8l
Set LocCnn1 = New ADODB.Connection
?
d;Q\.qy%Q LocCnn1.Open ″Provider=Microsoft.Jet.OLEDB.4.0?User ID=Admin?″  _'G7]n)yO.f#^o/{QA
″Data Source=″  App.Path  ″\数据库名称.mdb?″ _-|'Y6d+cYwfD;_
″Mode=Share Deny None?Extended Properties=''?Persist Security Info=False?″  _
'c
m|3o#L)Kb X%@_ f ″Jet OLEDB?Database Password='asp561rbc'?″ ][*I
l*X`L
　　这种方法虽然代码长一些，但对数据环境要求低，且结构清晰，所编写的发布程序也大为减小。由于与链接SQL Server等数据库的方法一样，因而大量的操作数据库的代码相同，当数据库需要由Access扩充到一些大型数据库，或由一些大型数据库裁剪出一个简单数据库时，程序的移植会比较方便。
8V_ WH9dJ!I9w uE+iQw#d
　　另外，这种方法对于Access97及Access2000均能很好地支持，兼容性好。对于大量插入、删除、修改等操作，只在Connection层进行即可，既可提高速度又可减少代码。
LWt.]G`w G-M 0~rK~i_
　　如果还要获取具体的记录集内容，则须再根据条件打开具体的库表，代码如下：J0n*| I/~NR^M
P&j_ dV

fwp\k?/I&x
1|*CNj*M[1a
F2T:sA)px2M DR[w
z#E\xt[
*U:h%w(@QNAIb#j
r

0RJw$I%A
xm#WI*@8g0q A Ge
uk"w0ze,}
Set LocRst1 = New ADODB.Recordset　
'YHq*@,idV'N6tb LocRst1.CursorType = adOpenKeyset
cFlW/}Kg!j!K LocRst1.LockType = adLockOptimistic
CU%t&UFO+_ LocRst1.Open ″SELECT ? FROM 表名″? LocCnn1?adCmdText"t/zR^ H}L6] M0u!Ex
　　提示：一般情况下，建议使用第二种方法。