Question

下午好，我有一个访问查询，其中包含我所有客户的列表，我们可以调用该CUS 我有另一个查询，其中包含ORDERS列表

我想写一些循环通过客户列表的VBS并导出一个包含属于该客户的所有订单的csv文件。

然后，vba将转移到列表中的下一个客户并执行相同的操作。

任何帮助都会很棒。

以下代码片段

几乎没有得到WHERE条件工作它继续显示一个弹出窗口让我填充但是相同的字符串正在提供msgbox罚款这里是一个片段下面是在循环内

<form>
  <div class="sd-container">
    <input class="sd" type="date" name="selected_date" />
    <span class="open-button">
      <button type="button"></button>
    </span>
  </div>
</form>

Answer 1

不要在VBA变量周围使用[]。当您只想给用户留言时，不要使用Parens作为MsgBox。 parens使它成为一个需要用户响应来设置变量的函数。

MsgBox strcustcode & " has " & ordercount & " orders"

将变量连接到SQL语句中。如果OCUSTCODE是文本类型字段，请对参数使用撇号分隔符。

StrSQL = "Select * From [24-ND_Cus] Where [OCUSTCODE] = '" & strcustcode & "'"

我不建议定期修改设计和更改查询的代码SQL语句正在改变设计。如果唯一的更改是过滤条件，并且动态参数化查询无法正常工作，我建议使用“临时”条件。\ n＆＃39; temp＆＃39; table - table是永久性的，data是临时的。删除并写入记录到表中并导出表。

将字符串结果传递给查询然后导出为csv

1 个答案: