打印本文 打印本文  关闭窗口 关闭窗口  
如何用VB访问外来数据库
作者:佚名  文章来源:不详  点击数  更新时间:2008/4/18 14:44:56  文章录入:杜斌  责任编辑:杜斌

  vb最引人注目的特点,也是其最令程序员关心的地方,就是它访问多种数据库的强大功能。vb中将非ms access数据库称为外来数据库(external database),如dbase、foxpro、odbc等。vb中使用数据控制访问外来数据库同访问access数据库类似,这里不再赘述,现在主要读一下用生成对象的方法来访问外来数据库。访问外来数据库((以dbase为例)大致分为以下几步: 

  第一步:建立一个access型数据库,并在数据库中创建新表—即为附加表。通过设置 

  附加表的各属性值,使其与你所要访问的数据库建立链接关系。程序代码如下: 
    dimdbasdatabase 
    dimtdasnewtabledef 
    setdb=opendatabase("mydb.mdb") 
    td.connect="dbase:database=c:\datadir" 
    td.sourcetablename="au thor" 
    td.name="dbaseauthortable" 
    db.tabledefsappendtd 
    db.close 
  第二步:设置ini文件路径。在vb的程序中使用了访问外来数据库操作,将应用程序生成exe文件后,必须提供一个ini文件。若找不到这个ini文件,将会导致不能访问数据库,并出现“notfoundin stollabkisams’的错误信息。设置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和表“dbaseau thortabk”即可访问你所要访问的外来数据库了。 

  使用这种方法访问外来数据库应该注意的是,附加表在所加到的数据库中只是建立了一个链接关系,表的实际所在,仍然存在于原数据库中,该表在所附加到的数据库中被删除时,只是删掉了链接关系,实际的表并没有被删除。
打印本文 打印本文  关闭窗口 关闭窗口