BUG 修正-链接表管理器(ONLY MDB FILE)

zhangxiyou

好东西，支持。

ousa

好啊!支持

liguang

顶

okmijn

没下载啊

5988143

谢谢分享~

媒人

我正需要这样一个东西啊

狼书生

真是好DD，谢谢咯！

t360103

以下是引用zhuyiwen在2003-10-16 11:08:00的发言：

LinkManager Ver 1.00
易和链接表管理器(ONLY MDB FILE) BUG 修正版
修正日期: 2003.10.16
BUG说明: 当出错信息中出现单引号时,运行出错

运行平台: ACCESS 2002



注: 此修正只支持ACCESS 2002, 因无ACCESS 2000, 所以没有转换, 对ACCESS 2000用户只有说声"抱歉!"

此版运行平台: ACCESS 2002(不支持其它ACCESS版本)

此版为免费版本. 源代码价格: 100元人民币!

使用方法:
一、引用（二种方法）
1、第一种方法：在VBA编辑器，点菜单--工具--引用--浏览，找到LinkManager.mde
2、第二种方法：将LinkManager.mde复制到你的数据库所在的文件夹中，并将下列过程粘贴到你的数据库的模块中

1. 
   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]

9399100

o

enter180

链接表管理器！！



****