| 投稿日 | ： 2007/06/02(Sat) 21:25 |
| 投稿者 | ： sato |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: Windowsのユーザ環境変数の値を変更する方法 |
魔界の仮面弁士さん、返信ありがとうございます。また魔界の仮面弁士に無断で
コードを使用させていただいており、申し訳ございません。
■.Put_の部分でエラーに関して
>Windows のユーザ アカウントを指定していない(空っぽの状態)だからでは?
現在、"Owner(パスワード無)"というコンピュータの管理者権限で実行して
いるのですが、そのままではまずいということでしょうか。
■設定したユーザ環境変数２個を恒常的に利用する場合について
ユーザ環境変数「Config1(値：aaa)」「Config2(値：bbb)」
Dim userName As String
'userName = Environ("UserName")
userName = "Administrator"
With GetObject("winmgmts:\\.\root\cimv2").Get("Win32_Environment").SpawnInstance_
.Name = "Test"
.VariableValue = "abcd"
.userName = userName
.Put_
End With
こちらのコードに関して、実行の際にTest(値：abcd)というユーザ環境変数を作成する
というコードと解釈しておりますが、既に設定しているユーザ環境変数を呼び出して、
値を上書きするといったことをするにはどのようにしたらいいでしょうか。
何かヒントありましたら、教えてください。よろしくお願いします。