Question

我正在创建一个通过Access表格填充的客户投诉数据库。每个条目均由一个顺序的自动编号字段编号，以创建一个“投诉编号”。发布投诉后，我想使用MkDir创建一个文件夹，其中可以包含与投诉有关的任何文档或图像。我希望文件夹名称为投诉编号名称。我能找到的最佳解决方案是DMax + 1自动编号（投诉编号）字段。

我设法获得了函数（从宏开始运行）来创建文件夹。但是，我无法弄清楚DMax或命名部分。

Public Function makenewfolder()
 'create complaint number

Me.[Complaint Number] = DMax([Complaint Number], [tbl_Complaint_Problem_Log]) + 1

MsgBox "Complaint Number Generated"

'need code to create folder

If Dir("F:\Customer Complaints\" & Me.[Complaint Number], vbDirectory) = "" Then

  MkDir ("F:\Customer Complaints\" & Me.[Complaint Number])

Else

'do nothing for directory already exists

End If
End Function

调整代码时，我收到了许多错误代码，但是我目前仍停留在

2465-Microsoft Access找不到表达式中引用的字段“ | 1”。

Answer 1

DMax需要字符串作为参数。

所以你需要类似的东西

Me.[Complaint Number] = DMax("[Complaint Number]", "tbl_Complaint_Problem_Log") + 1

在自动编号字段上使用DMax命名MkDir创建的文件夹

1 个答案: