방법: 사용자의 도메인 확인
업데이트: 2007년 11월
My.User 개체를 사용하여 현재 사용자에 대한 정보를 가져올 수 있습니다. 이 예제에서는 응용 프로그램에서 Windows 인증을 사용하는 경우 My.User.Name 속성을 사용하여 사용자의 도메인 이름을 가져오는 방법을 보여 줍니다.
응용 프로그램에서는 기본적으로 Windows 인증을 사용하므로 My.User는 응용 프로그램을 시작한 사용자에 대한 Windows 정보를 반환합니다.
예제
이 예제에서는 My.User.Name 속성을 구문 분석하여 도메인 이름을 확인하기 전에 응용 프로그램에서 Windows 인증을 사용하는지 여부를 확인합니다.
사용자 지정 인증을 구현할 때는 도메인 정보를 제공할 필요가 없기 때문에 응용 프로그램에서 사용자 지정 인증을 사용하는 경우에는 이 예제에서 빈 문자열을 반환합니다.
Function GetUserDomain() As String
If TypeOf My.User.CurrentPrincipal Is _
Security.Principal.WindowsPrincipal Then
' My.User is using Windows authentication.
' The name format is DOMAIN\USERNAME.
Dim parts() As String = Split(My.User.Name, "\")
Dim domain As String = parts(0)
Return domain
Else
' My.User is using custom authentication.
Return ""
End If
End Function