Office中国论坛/Access中国论坛

标题: 关于易和链接表管理器的一个问题向各位高手求教 [打印本页]

作者: yj11252551 时间: 2004-3-22 00:08
标题: 关于易和链接表管理器的一个问题向各位高手求教
首先感谢朱大师无私地公开易和链接表管理器的源码。但是我用了以后发现一个问题：把主窗体的属性设为弹出、模式后不能正常显示链接表的信息，都改成否以后又正常了！不知道为什么？特向各位高手求教！

作者: yj11252551 时间: 2004-3-22 02:36
没人理我？

作者: yj11252551 时间: 2004-3-22 18:57
标题: ？
各位高手，求求您们了！

作者: secowu 时间: 2005-8-18 20:45
问题确实有另外，如果你试着更改位置后重新链接会发现很有意思的错误能链接第一个表其它的一概报错重链也不行

作者: secowu 时间: 2005-8-23 20:43
也就是说不能批量自动更新链接需要自己手动一个一个的链接特麻烦＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝试验操作： 1.将易和链接表管理器导入你的程序 2.运行链接表管理器一次 3.关闭MDB 4. 更改后台数据库的名字 5.开启MDB，用链接表管理器进行重新链接

作者: 红寺 时间: 2005-8-23 20:48
有密码的后台也能用这个链接管理器吗?

作者: secowu 时间: 2005-8-23 20:54

Private Sub cmdRefresh_Click()

Dim rst As Recordset

Dim id As Integer

If IsNull(txtName) Or txtName = "" Then

      Beep

Else

      id = Me.subForm.Form!id

      If ReLink(Me.txtName, Me.txtPath, Me.txtPWD, id) Then



         Me.subForm.Form.Requery



         Set rst = Me.subForm.Form.RecordsetClone



         rst.FindFirst "ID = " & id

         If rst.NoMatch Then

'这里是不是还少了什么？

         Else

            Me.subForm.Form.Bookmark = rst.Bookmark

         End If

         rst.Close

      End If

End If

End Sub

哪位高手将上面的代码，改成程序自动刷新所有链接？

全部MDB程序见下面：

点击浏览该文件

[此贴子已经被作者于2005-8-23 12:59:36编辑过]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)