Question

在访问中，我创建了一个包含四列的表。该表的目标是成为一个清单。我允许一列接受空值（我的复选框在我进行时填写）。一列仅用作唯一标识符。其余两列用于填写日期。

我希望能够将这些列追加到动态数据中。即，我想追加由函数生成的日期，如果在源（查询）中更改，则可以在刷新表后更新。这是否可以在访问中进行，如果是这样的话怎么办？如果它不可能，有没有办法在SQL中执行此操作？

Answer 1

“我想追加函数生成的日期...”

运行该函数时，运行将附加数据的VBA脚本。所以，在函数结束的某个地方（或者你调用函数的地方），你可以使用这样的代码：

Dim db as Database
Dim rec as Recordset

Set db = CurrentDB
Set rec = db.OpenRecordset ("Select * FROM YourTableName")

rec.AddNew
'Can also use rec("1stDateFieldName") = Whatever is in the first date field
rec(2) = Whatever is in the first date field      
'Can also use rec("2ndDateFieldName") = Whatever is in the second date field
rec(3) = Whatever is in the second date field  
rec.Update

rec.Close
db.Close

显然，变量需要根据您的独特目的进行一些调整，但这应该可以让您了解如何执行此操作。

Answer 2

惯用SQL方法是不在基表中存储日期。相反，您只需创建一个新的查询，将基表（ID，checkcolumn）与日期表/查询（ID，date1，date2）连接起来。

如果您愿意使用特定于Access 2010的功能，则可以使用数据宏来检查某些表数据是否已更改，并将表日期更改为匹配。

表内的动态字段更新

2 个答案: