Access中的Update 能跨数据库吗?

马喜立　发表于：2011-09-26 14:33:53 　

Update 基金购买记录,基金列表 Set 基金购买记录.最新复权净值=基金列表.最新复权净值 Where 基金购买记录.基金代码=基金列表.基金代码
以上的写法就正确,但是,我{基金购买记录}是根据另外一个文件里面的{基金列表}去更新.
我想如下写法,但是报错,高手帮忙下.
update 基金购买记录,基金列表 in 'D:\001_Work基金资料数据库.accdb' Set 基金购买记录.最新复权净值=基金列表.最新复权净值 Where 基金购买记录.基金代码=基金列表.基金代码

Top

dbaseIIIer 发表于：2011-09-27 00:24:21

把另一个MDB的数据表, 关连到本MDB(或可改名)便能完成你所要的方 !

Top

马喜立发表于：2011-09-27 10:51:45

搞定了,附上代码供类似的人参考使用.

Public Sub abcd()
    Dim LinkName As String
    Dim SourceTableName As String, Sql1 As String
    Dim NowTableName As String
    Dim LinkType As String
    Dim Db As DAO.Database
    Dim Tab1 As DAO.TableDef
    Dim I As Long
    Set Db = CurrentDb



'''用之前建立连接表
    LinkName = "D:\客户资料数据库.accdb"
    SourceTableName = "客户资产主表"
    LinkType = "Microsoft Access"
    NowTableName = "临时借用的表"
    DoCmd.TransferDatabase acLink, LinkType, LinkName, acTable, SourceTableName, NowTableName, False, False


''''开始使用.................

'''使用完毕!

'''用完之后把连接表删掉
    Sql1 = "Drop Table " & NowTableName
    Db.Execute (Sql1)

End Sub

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

Access中的Update 能跨数据库吗?