2014-10-07 52 views
0

我有一個訪問表,列username。我有多個用戶將在不同的時間使用數據庫,他們將向表中添加行。但每次用戶添加新行時,他/她的用戶名都必須出現在表的用戶名列中,而不必單獨輸入。我試過把UCase(Environ("USERNAME"))作爲默認值,但Environ是一個未知的函數。我在VBA中使用此UCase(Environ("USERNAME"))以在導出表時獲取用戶名。在訪問表中將用戶名設置爲默認值

有沒有什麼辦法可以將列的de​​afult值設置爲用戶的用戶名?

+0

用戶如何向表中添加記錄?如果你的答案是直接的,那就是你的問題!如果他們正在使用表單,那麼您可以使用表單的按鈕事件。 – PaulFrancis 2014-10-07 09:53:04

+0

他們會像添加普通表一樣添加它,但表格將在表單(表單內的表單)中查看。但謝謝你的提示。我會研究按鈕事件,如果這是一條路,我也不介意使用VBA來做這件事。 – 2014-10-08 06:13:21

回答

1

創建公共職能描述here

Public Function GetUserName() As String 
    ' GetUserName = Environ("USERNAME") 
    ' Environ("USERNAME") is easily spoofed, see comment by HansUp 
    GetUserName = CreateObject("WScript.Network").UserName 
End Function 

,並使用=GetUserName()作爲控制默認值。

相關問題