(«WScript.Network»). Имя пользователя не сохраняется в Access

Question

Я использовал следующий код VBA в форме (общая)

Public Function GetUserName() As String
    GetUserName = CreateObject("WScript.Network").UserName
End Function

Источник управления = имя_пользователя
Значение по умолчанию = GetUserName ()

Проблема - имя пользователяправильно заполнено в форме, однако оно не сохраняется в источнике управления, т.е. в таблице.Даже после того, как я сохраню и закрою форму.

Мне нужна форма для захвата и сохранения имени пользователя каждый раз, когда кто-то вносит изменения в запись.

Пожалуйста, помогите Я новичок в MS Access

Answer 1

Похоже, вы назначаете имя пользователя для источника управления.Доступ не работает, как это.Предполагается, что источник управления содержит имя столбца.

Создайте таблицу, имеющую столбцы, которые можно использовать для хранения вещей.Затем установите для свойства Источник записи формы это имя таблицы во время разработки в окне свойств.Затем установите Control Source в текстовом поле для имени столбца, в котором вы хотите сохранить данные, или добавьте объекты в форму , используя список полей.

В событии загрузки формы вы можетеназначьте имя пользователя этому текстовому полю с помощью

me!theTextBoxName = GetUserName()

Вы также можете сделать это с несвязанным текстовым полем, но это имя не будет сохранено при закрытии формы.

---

Нокак указывает @ June7, вы, вероятно, уже сделали это.В этом случае вы должны открыть форму с помощью

DoCmd.OpenForm "theFormName", DataMode:=acFormAdd

..., чтобы создать новую запись.