LinkManager Ver 1.00
易和链接表管理器(ONLY MDB FILE)
运行平台: ACCESS 2002
使用方法:
一、引用(二种方法)
1、第一种方法:在VBA编辑器,点菜单--工具--引用--浏览,找到LinkManager.mde
2、第二种方法:将LinkManager.mde复制到你的数据库所在的文件夹中,并将下列过程粘贴到你的数据库的模块中
Public Sub AddRef()
Dim ref As Reference
On Error GoTo errhandler
Set ref = References("LinkManager")
Exit Sub
errhandler:
Set ref = References.AddFromFile(CurrentProject.path & "\LinkManager.mde")
End Sub
Public Sub RemoveRef()
Dim ref As Reference
On Error Resume Next
Set ref = References("LinkManager")
References.Remove ref
End Sub
调用AddRef过程引用LinkManager.mde, 调用RemoveRef过程从数据库中移除对LinkManager.mde的引用
二、使用LinkManager
在你的程序中调用
LinkManager.LinkMan
执行结果如下图:
[em24]
[此贴子已经被作者于2003-10-14 17:01:15编辑过]
|