TempVar用于查询

时间:2014-04-23 16:19:37

标签: sql vba ms-access access-vba

因此,我的客户端每次运行进程时都需要更新4个查询。

我正在设置一个宏来询问用户对名为' FileDate'的变量的输入。

以下是它的外观:

SetTempVar
    Name = FileDate
    Expression = InputBox("Enter FileDate (yyyymmdd):")

现在这很好(从我能说的)

然后我想使用MessageBox来显示tempvar的值,因为它在同一个宏中,我没有看到任何问题。

MessageBox
    Message = "You entered:" & [TempVars]![FileDate] & "."
    Beep = Yes
    Type = Informative
    Title = Input

我尝试过这种语法的几种变体而没有进展......

问题

我无法让Messagebox真正显示设置给该变量的值,它只显示消息 - 有没有人知道将其输入Messagebox的正确语法?

一旦我搞清楚了,我想将其输入输入框一次,然后将变量插入到需要更新的每个查询中。

目前,我接受每个查询的用户输入:

UPDATE test_PCP_Changes SET test_PCP_Changes.Datercvd = [Enter FileDate (yyyymmdd): ]
WHERE (((test_PCP_Changes.Datercvd) Is Null));

我希望它像:

UPDATE test_PCP_Changes SET test_PCP_Changes.Datercvd = [TempVars!FileDate]
WHERE (((test_PCP_Changes.Datercvd) Is Null));

但不确定如何将其传递给查询。我假设一旦它在宏中,只要我不删除它,只要Access打开就应该可用..

任何人都知道我错过了什么?

1 个答案:

答案 0 :(得分:2)

将消息框上的消息更改为以=。

开头

Access macro with expression