链接有密码的后端数据库问题

money

设有两个数据库:  ABC前端.mdb 、 ABC后端.mdb（有数据库密码:“test”）
ABC前端.mdb  所有表链接自  ABC后端.mdb

请指教，有什么简便方法，使得  ABC前端.mdb 打开时不需要回答 ABC后端.mdb 密码？

wuyuanhui

此问题我也很苦恼!!
望高手能回答(有高手发过例子,但是mde的)

[此贴子已经被作者于2003-9-22 11:23:11编辑过]

zhengjialon

搜索一下这里有例子的。

money

竹笛师傅曾提供过一个链接是有例子的,但主要内容是链接一个有密码的后端的其中一个表,语句也太深了!   参考如下:

作者： 朱亦文

function lj()
dim catdb as adox.catalog
dim tbllink as adox.table

set catdb = new adox.catalog
catdb.activeconnection = currentproject.connection

set tbllink = new adox.table ' 建立一个新的表对象

with tbllink
.name = "订单" ' 链接表名称
set .parentcatalog = catdb

.properties("jet oledb:create link") = true
.properties("jet oledb:link datasource") = _
"c:\program files\zhanyexing\123.mdb"
.properties("jet oledb:link provider string") = _
"ms access;pwd=123;" ' 提供者及密码
.properties("jet oledb:remote table name") = "订单" ' 原数据库中的表
end with

catdb.tables.append tbllink ' 添加到库中
set tbllink = nothing
end function

请大家帮忙, 我只想有什么简便方法，使得  ABC前端.mdb 打开时不需要回答 ABC后端.mdb 密码？同时使得前端已链接了后端的所有表.   谢谢!