ローカル管理者アカウントを使用してユーザー ログインが必要なプログラムを作成します。しかし、ローカルの管理者アカウント名は PC ごとに異なるため、ユーザー名をハードコーディングすることはできません。
以下のコードは、管理者グループのユーザーのみを取得し、認証は取得しません。助けられる?1. ユーザー名とパスワードを認証する方法は? 2. ユーザーがローカル ユーザー アカウントのみを使用してログインするように強制する方法。
Dim localMachine As New DirectoryEntry("WinNT://" & "localhost")
Dim admGroup As DirectoryEntry = localMachine.Children.Find("Administrators", "group")
Dim members As Object = admGroup.Invoke("members", Nothing)
For Each groupMember As Object In CType(members, IEnumerable)
Dim member As New DirectoryEntry(groupMember)
MsgBox(member.Name)
Next