Office中国论坛/Access中国论坛

标题: 读取链接表(DAO-RecordSet) [打印本页]

作者: george 时间: 2005-9-16 16:35
标题: 读取链接表(DAO-RecordSet)
请教高手：关于DAO

一般表的读取可用RecordSet来实现，那对连接表应该如何读取呢？好象RecordSet不行！？

作者: george 时间: 2005-9-16 21:57
自D

作者: george 时间: 2005-9-19 16:33
没人回答

作者: kennylee 时间: 2005-9-26 00:28
Dim db As Database

Dim tbl As TableDef

Set db = CurrentDb

DoCmd.Hourglass True

'  Dim pw

'  pw = InputBox("请输入后台数据库密码:", "密码")

For Each tbl In db.TableDefs

   If tbl.Attributes = dbAttachedTable Then

         tbl.Connect = "ms access

WD=123;DATABASE=" & CurrentProject.Path & "\data\a.mdb"

tbl.RefreshLink

End If

Next

DoCmd.Hourglass False

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