VB中利用远程数据库的访问之数据处理案例

　　数据处理

　　数据连接建立后，可以用openrecordset方法打开一个记录集，并可用dbgrid控件和data控件方便地浏览整个记录集。如果使用表类型(table-type)记录对象，则对应的是一个实际存在的数据库表，在多用户环境下，其它用户对数据的修改会立即反映到表中;如果使用动态集类型(dynaset-type)记录对象，则对应的既可以是一个表中全部记录，又可以是一个查询的结果，并且可以更新记录集中的记录;如果使用快照类型 (snapshot-type)记录对象，则对应的可以是表中的全部记录，也可以是一个查询结果，但不能进行记录的增加、删除和修改操作。此外，还可以建立其它类型的记录对象，如仅向前型(forward only-type)记录对象和动态型(dynamic-type)记录对象。

　　下面是打开动态集记录对象并显示记录的过程：

　　public sub rst_display(strdb as string, strrst as string, strform as form)

　　set dbs = opendatabase(strdb)

　　set rst = dbs.openrecordset(strrst, dbopendynaset)

　　strform!data1.databasename = dbs.name

　　strform!data1.recordsource = rst.name

　　strform!data1.refresh

　　strform!dbgrid1.rebind

　　end sub

　　上述过程有三个参数，其中strdb用来指定本地数据库名(包括路径)，linktdfname是在设为首页本地数据库中新建的链接远程表的表名，strform是网格控件和数据控件所在的窗体名。调用此过程可以基于新表建立一个动态集类型的记录对象，并可在网格中浏览各个记录。

　　断开连接可以通过关闭应用程序或设置连接超时来实现。注意：如果对数据库对象使用close方法，则由于在miscrosoft jet数据库引擎内部缓存了连接，实际上连接并未取消。