[レジストリに値を書き込む]

HKEY_CURRENT_USER に WshTest というキーを作成し値を書き込みます。
既に同様のキーがあった場合は上書きされます。
※レジストリに間違った値を書き込むと、システムが正しく機能しなくなることもありますのでご注意ください。

【ソースコード】
[tips0111.vbs]
Option Explicit
On Error Resume Next

Dim objWshShell     ' WshShell オブジェクト

Set objWshShell = WScript.CreateObject("WScript.Shell")
If Err.Number = 0 Then
    objWshShell.RegWrite "HKCU\WshTest\Test1", "test #1", "REG_SZ"
    objWshShell.RegWrite "HKCU\WshTest\Test2", 2, "REG_DWORD"
Else
    WScript.Echo "エラー: " & Err.Description
End If

Set objWshShell = Nothing

【実行結果】
C:\> cscript //NoLogo tips0111.vbs
レジストリに値を書き込みました。