いろんな事をツラツラ~と書いています。

VBでActive Directoryから名前を取得する

Visual Basicで、Active Directoryを利用してアカウントに設定した名前を取得する方法をメモしておきます。

参照設定で「Active DS Type Library」にチェックを入れる。

以下、サンプルです。

On Error Resume Next

Dim domainName As String
Dim accountName As String

domainName = "DOMAIN_NAME"
accountName = "ACCOUNT_NAME"

Dim user As IADsUser
Set user = GetObject("WinNT://" & domainName & "/" & accountName & ",user")

If (Err.Number = 0) Then
    MsgBox user.FullName
Else
    MsgBox "失敗"
End If

Set user = Nothing
 

コメント

コメントの投稿

送信時にキーを入力しておくと後でコメントの編集ができます。
管理人にのみ表示する

トラックバック

トラックバックURL:

ブログURL(言及リンク)を含まないトラックバックは受け付けない設定になっています。

プロフィール

かず

かず (プロフィール)

サイト検索

カレンダー

 2017年07月 
- - - - - - 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 - - - - -

月別アーカイブ

QRコード

QRコード

フィード

RSS 1.0 RSS 1.0

follow us in feedly


スポンサード リンク

Amazon.co.jp

楽天

FC2ブログ

ブログ


Copyright (C) 2017 はッいィ~!? All Rights Reserved.
テンプレート by LinkFly