2012年10月10日 星期三

查詢目前使用者 名稱 與 權限

這篇就來教如何查詢目前使用者 名稱 與 權限
一樣,我們還是維持超簡單的作風來做程式碼教學

  ~程式碼 VB~  

以下程式碼為查詢使用者名稱
MsgBox(My.User.Name)


非常簡單的程式碼
裡面「My.User.Name」就是使用者名稱囉~


接下來的是使用者權限
Dim isAdmin As Boolean
isAdmin = My.User.IsInRole("administrators" )
If  isAdmin Then
    MsgBox("具有管理員身分") 
Else
    MsgBox("不具有管理員身分") 
End If