レジストリの値を取得、変更したい。 VBS/WSH

質問

指定するキーが無かった場合は終了。
あった場合、指定キーにデータを上書きする。
無かった場合は終了する。

こういうVBSプログラムを書きたいと思っています。
例）HKEY_CURRENT_USER\Software\TEST1\TEST2\TEST3の中の
　　名前が　Level　のキーの値を5に変更

色々探した結果
----------------------------
WScript.Echo "レジストリの値を変更します"
Set Shell = CreateObject("Wscript.shell")
On Error Resume Next
If IsNull(shell.regread("HKEY_CURRENT_USER\Software\TEST1\TEST2\TEST3\Level")) Then
WScript.Echo "レジストリが存在しません。"
Else
WScript.Echo "レジストリのLavelキーの値を5に変更します。"
Shell.RegWrite "HKEY_CURRENT_USER\Software\TEST1\TEST2\TEST3\Level", 5, "REG_SZ"
End If
--------------------------------
このように書いて、VBSとして実行しようと思うのですが
何か問題とかありそうでしょうか？
（また、思い通りの操作ができそうでしょうか…）

レジストリということもあり、何も考えずに実行してしまうのは少し怖いです。
以上、回答お願い致します。

回答No.1

chie65536（@chie65535） · ベストアンサー

＞何か問題とかありそうでしょうか？
＞（また、思い通りの操作ができそうでしょうか…）

問題無さそうですが、実際に試してないので判りません。

＞レジストリということもあり、何も考えずに実行してしまうのは少し怖いです。

仮想PCを構築して、仮想PCの中で実行しましょう。

仮想PCは「割り当ててあるHDDイメージファイル」をバックアップしてあれば、いつでも、バックアップしてあった状態に戻せます。

仮想PCは、例えレジストリが破壊さえたとしても、HDDイメージファイルをバックアップで上書きして元に戻せば、すぐに復活します。

お礼

回答ありがとうございます。
問題無さそうなので、使ってみたいと思います＾＾

仮想PC、やったことないですがやり方を探して
やってみたいと思います！
ありがとうございました＾＾