Наименование созданной MkDir папки с помощью DMax в поле автонумерации - PullRequest
0 голосов
/ 28 октября 2019

Я создаю базу данных жалоб клиентов, которая заполняется через форму доступа. Каждая запись пронумерована последовательным полем автонумерации, чтобы создать «Номер жалобы». Когда жалоба опубликована, я хочу использовать MkDir для создания папки, в которой могут храниться любые документы или изображения, связанные с жалобой. Я хочу, чтобы имя папки было именем номера жалобы. Лучшее решение, которое я могу найти, - это DMax + 1 в поле autonumber (Complaint Number).

Мне удалось получить функцию (запуск макроса) для создания папки. Тем не менее, я не могу понять 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', указанное в вашем выражении.

1 Ответ

0 голосов
/ 28 октября 2019

DMax необходимо Strings в качестве параметров.

Так что вам нужно что-то вроде

Me.[Complaint Number] = DMax("[Complaint Number]", "tbl_Complaint_Problem_Log") + 1
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...