VBA /訪問 - 用戶特定檢測空閒時間

Question

我想知道是否可以使用下面的鏈接中提到的檢測空閒時間方法，但使其成爲用戶特定的。 MS鏈接檢測空閒時間碼：http://support.microsoft.com/en-us/kb/128814

我的數據庫（Access 2010中）當前記錄網絡usrname，將有可能使用類似

If usrname = X then IDLEMINUTES = 100 
Else IDLEMINUTES = 20 
End If 

，使每usrname空閒時間不同？

在此先感謝！

Answer 1

是的，你可以做到這一點，使用您鏈接到代碼：

Dim IdleMinutes as Integer 
If Environ("UserName") = "jdoe" Then IdleMinutes = 100 
    Else IdleMinutes = 20 
End If 

請注意，我定義IdleMinutes作爲一個變量，而不是一個常數，因爲他們在自己的示例代碼顯示。那是因爲你不能重新定義（從Microsoft）恆定：

Once a constant is declared, it cannot be modified or assigned a new value. 

此外，雖然Access有一個叫CurrentUser（），你不想調用，因爲這告訴你訪問用戶名的方法，這通常是「管理員」，除非您使用的訪問安全，這是不常見的。 如果你不想使用環境變量，你可以使用WinAPI調用shown here，雖然我使用Environ("UserName")，它工作正常。