Access快速开发平台--获取通用导入功能导入了哪些字段

时　间:2021-01-14 21:17:15
作　者:易勋   ID：35404  城市：上海
摘　要:Access快速开发平台中，有一个模块需要导入更新，但是每次导入哪些数据不一定，这样的情况要怎么获取本次导入了哪些字段，然后根据导入的字段去更新数据库中的数据。
正　文:

前   提:

通用导入功能在导入的时候需要勾选Import，那么这个导入的对应是在SysLocalImportSpecs和TMP_ImportSpecs

SysLocalImportSpecs是保存的正式规格，所以在这里是没意义的，因为我们要获取的当前导入的字段情况。

TMP_ImportSpecs这张表就是存储的当前导入的规格，所以我们可以从这张表中获取导入了哪些字段。

下面的代码就是通过一个简单的循环，获取当前导入了哪些字段，导入了的字段就可以使用导入的数据进行更新。

代   码:

    Dim rst As DAO.Recordset
    Set rst = CurrentDb.OpenRecordset("Select * FROM TMP_ImportSpecs Where TableName='TMP_PartInfo' AND Import=True AND ToField<>'PartNo' ")
    Dim strSET As String
    Do Until rst.EOF
        strSET = strSET & "tblPartInfo.[" & rst![ToField] & "]=TMP_PartInfo.[" & rst![ToField] & "], "
        rst.MoveNext
    Loop
    rst.Close

因为这里PartNo是主键，所以在生成更新SQL SET子句的时候需要排除。生成了strSET之后就可以将这个字符串拼接到SQL语句中执行了。

Access快速开发平台QQ群 (群号:321554481) 　　　　　　Access源码网店