ユーザーの存在確認

解決


VBS初心者  2006-02-06 01:57:18  No: 93978

場違いな質問かもしれませんが、VBSの質問です。

登録したいユーザーが既に登録されているかを確認したいです。
On Error Resume Next は使用していないのでerr.numberを
使用してエラーだったらのような判定はできません。

IsMemberを使用して判定しようとしていますが、
登録されていないユーザー情報を取得しようとするとエラーとなります。

何かよい手はありますでしょうか?


40859  2006-02-06 04:09:27  No: 93979

> 登録したいユーザーが既に登録されているかを確認したいです。
何のユーザーが、どこに登録されているかを確認したいの?

> On Error Resume Next は使用していないので
使用すれば解決できるのに、あえてそうしていないのなら、
なぜエラー対処をしていないのかを説明しないと、話が進まないような。

> IsMemberを使用して判定しようとしていますが、
IsMember ってのが、どのオブジェクトのメソッド(or プロパティ)なのやら。。。
このへん?
http://msdn.microsoft.com/library/en-us/sqldmo/dmoref_m_i_39d0.asp

> 登録されていないユーザー情報を取得しようとするとエラーとなります。
どんなエラー?

> 何かよい手はありますでしょうか?
質問内容が曖昧すぎるので、良いも悪いも無いような。


VBS初心者  2006-02-06 07:19:08  No: 93980

>> 登録したいユーザーが既に登録されているかを確認したいです。
> 何のユーザーが、どこに登録されているかを確認したいの?
コンピュータにローカルユーザ−を登録する時に同名のユーザーが
登録されているかを確認したいと思います。

>> On Error Resume Next は使用していないので
> 使用すれば解決できるのに、あえてそうしていないのなら、
> なぜエラー対処をしていないのかを説明しないと、話が進まないような。
お客様の要望で既に登録されているのでエラーなのか、それとも別のエラーが
発生したのかを判断できなくなるため、On Error Resume Nextを使用していません。
エラーコードで判断できるとは思いますが、判断資料として余計な資料の
提出を行う必要があるためです。

>> IsMemberを使用して判定しようとしていますが、
> IsMember ってのが、どのオブジェクトのメソッド(or プロパティ)なのやら。。。
現在は
ComputerName = 自分のPC名
NEWUSER = 追加したユーザー名
CompPath = "WinNT://" & ComputerName & ",Computer"
Set Computer = GetObject(CompPath)
Set NewUser = Computer.GetObject("user", NEWUSER)

とコーディングを行っており、
Set objNewUser = objComputer.GetObject("user", cstNEWUSER)
で登録されていないと「ユーザー名が見つかりません」というエラーが発生します。


あっきー  2006-02-06 08:58:58  No: 93981

こんな感じでもアカウントの一覧はとれますよ

http://wmifun.atinfinity.net/sample/win32_useraccount.html


VBS初心者  2006-02-06 19:57:26  No: 93982

あっきーさんありがとうございます。
HPの方法で解決しました。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加