Access911.net   |   a9BBS   |   OTaA System  
  搜索文章:  
Access911欢迎您光临  
   主页      上传      繁體版       论坛     
设为首页  |  加入收藏   
  
你现在的位置:文章索引 -> 文章分类 -> VBA  
 首页|  近日更新|  下载  |  文章索引  |  搜索|  术语|  承接工程|  
 
系统正在加载内容,请耐心等待...
 
 查询
 窗体
 报表
 
 
 VBA
 函数
 ADO/DAO/ADO.NET
 API
 ADP
 安全
 发布
 OA
 ASP/ASP.NET
 其他语言
 控件
 DELPHI
 C#/.Net
 本站
 其他
 小例程
 常用软件
 参考文档
 业主作品
 网友大作
 
 
友情链接
 access911.net
 
访问人次
 1702173
 
站长 E-Mail
 net911@sina.com
 access911@gmail.com
 
RSS 订阅

显示附加信息 >>>

使用TransferDatabase导入外部加密的数据库文件时,怎样自动输入密码?不用ODBC数据

作者:MS  摘自:Microsoft  :cg1  更新日期:2004-12-19  浏览人次:

 

问题:

使用TransferDatabase导入外部加密的数据库文件时,怎样自动输入密码?不用ODBC数据
库.

DoCmd.TransferDatabase acImport, "Microsoft Access", 数据库路径, acTable, 表
名称, 表名称

 


回答:

根据我的经验,在TransferDatabase方法中并不支持打开加密的文件。但是我们可以通过下面两种变通的方式来实现:

1. 通过DAO的方法来实现类似的功能,比如:
Dim db As DAO.Database, tdf As DAO.TableDef

Set db = CurrentDb
Set tdf = db.CreateTableDef ("tblTestLink")
tdf.SourceTableName = "tblTestLink"
tdf.Connect = ";DATABASE=c:\testdatatrans\source.mdb;PWD=<Password>" 
db.TableDefs.Append tdf
Set tdf = Nothing

如果希望手动输入密码的话,可以将语句修改成:
tdf.Connect = ";DATABASE=c:\testdatatrans\source.mdb;PWD="&InputBox("Enter Password")

2. 我们可以采取“欺骗”的方式来完成这个功能:在Access中先通过code打开该数据库,然后紧接着用TransferDatabase来完成这个操作:

Function foo()
    Dim db As Database
    Dim oAcc As Access.Application

    Const TMP = "<database name>"

    Set db = DBEngine.CreateDatabase(TMP, _
                        dbLangGeneral)
    db.NewPassword "", "<password>"
    db.Close
    Set db = Nothing

    Set oAcc = New Access.Application
    Set db = oAcc.DBEngine.OpenDatabase(TMP, _
                            False, False, ";PWD=<Password>")
    DoCmd.TransferDatabase acImport, "Microsoft Access", _
    <Database Path> acTable, <Source TableName>, <Destination TableName>
    db.Close
    Set db = Nothing
End Function

关于这个方法更多的详细描述,您可以参考MVP Michael Kaplan的文章:

Specify UserName & Password for new Access instance
http://www.mvps.org/access/modules/mdl0036.htm

 

 

 
相关文章
     没有手动相关文章
     关于 ACCESS 加密及密码破解问题的理解(再论)
     RC4、MD5、转16进制字符串结合运用加密字符串
     关于 ACCESS 加密及密码破解问题的理解
     Access安全吗?Access安全性之QA详解
     如何加密Access数据库?
     4 种常用加密算法-6-rsa
     4 种常用加密算法-4-BASE64
     4 种常用加密算法-3-md5
     4 种常用加密算法-2-RC4
     4 种常用加密算法-1-CFS
 
评论
     查看或发表更多的评论,请单击这里。
 
 
 
 
 
   
  Access911.net   |   a9BBS   |   OTaA System   |
建站日期:2000年4月2日  |  设计施工:陈格 ( access911 & cg1 )
 Copyright © 2000 - 2003 COMET, 陈格 保留所有权利