Código para criar a chave no registry, é só ajustar e substituir pelo pretendido, conforme o tipo de chave o valor tem que ser string ou número e formatado para tal, ou seja um string tem que ser contida em aspas e um número é óbvio que tem que ser um numero válido!!!
dim oShell
set oShell = Wscript.CreateObject(“Wscript.Shell”)
oShell.RegWrite “HKLM\CAMINHO\COMPLETO\PARA\A\CHAVE”, VALOR, “TIPO_DE_CHAVE”
Set oShell = Nothing
Tipos de Chaves:
REG_SZ (string)
REG_EXPAND_SZ (string)
REG_DWORD (Integer)
REG_BINARY (Integer)