如何用VB访问外来数据库

2018-06-17 17:13:13来源:未知 阅读 ()

新老客户大回馈,云服务器低至5折

VB最引人注目的特点,也是其最令程序员关心的地方,就是它访问多种数据库的强大功能。VB中将非MSAccess数据库称为外来数据库(ExternalDatabase),如dBASE、FoxPro、ODBC等。VB中使用数据控制访问外来数据库同访问Access数据库类似,这里不再赘述,现在主要读一下用生成对象的方法来访问外来数据库。访问外来数据库((以dBASE为例)大致分为以下几步:
第一步:建立一个Access型数据库,并在数据库中创建新表—即为附加表。通过设置
附加表的各属性值,使其与你所要访问的数据库建立链接关系。程序代码如下:
DimDbasDatabase
DimTdasNewTabledef
SetDb=OpenDatabase("MYDB.MDB")
Td.Connect="dBASE:DATABASE=c:\DATADIR"
Td.SourceTableName="AUTHOR"
Td.Name="dBASEAuthorTable"
Db.tabledefsAppendTd
Db.close
第二步:设置INI文件路径。在VB的程序中使用了访问外来数据库操作,将应用程序生成EXE文件后,必须提供一个INI文件。若找不到这个INI文件,将会导致不能访问数据库,并出现“NOTFOUNDINSTOLLABKISAMS'的错误信息。设置INI文件路径后,VB的程序会在WINDOWS子目录中寻找与应用程序同名的INI文件。设置INI文件路径代码为:
SetDataAccessOption1,“Path\Filename”
第三步:编辑.INI文件可对不同种类的数据库进行设置,下面为一INI文件代码:
[Options]
SystemDB=c:\MyPATH\SYSTEM.MDA
[ISAM]
PageTimeout=5
MaxBufferSize=128
LockRetry=20
CommitLockPetry=20
ReadAheadPages=16
[InstallableISAMs]
Paradox3.x=C:\VB\pdx110.DLL
FoxPro2.0=C:\VB\xbs110.DLL
FoxPro2.5=C:\VB\pdx110.DLL
dBASE=C:\VB\pdx110.DLL
dBASE=C:\VB\pdx110.DLL
Btrieve=C:\VB\btrv110.DLL
[ParadoxISAM]
PageTimeout=600
ParadoxUsername=BaiUser
ParadoxNetPath=P:\PDXDB\
CollatingSeguence=Ascii
[dBASE]
centry=off
Data=American
Mark=47
Deleted=on
这样通过访问新数据库MYDB.MDB和表“DBASEAUTHORTABK”即可访问你所要访问的外来数据库了。
使用这种方法访问外来数据库应该注意的是,附加表在所加到的数据库中只是建立了一个链接关系,表的实际所在,仍然存在于原数据库中,该表在所附加到的数据库中被删除时,只是删掉了链接关系,实际的表并没有被删除。->

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:一个封装了WinInetAPI函数的类(CWinInetConnection)

下一篇:VB调用API函数使窗口保持在最上层