Entrar
 
HomeBibliotecaWikiAprenderGaleriaDownloadsSuporte ComunidadeFóruns

none
Como adicionar informações no Registro

 > 

    Pergunta

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Fabrio como eu coloco nas opções qualquer uma que for escolhida pra executar um arquivo de extensao reg.

    Exemplo.

    Opção 1 = Adicionar informação na chave "ABC"

                          executar=diretorio\informação1.reg

    Opção 2 = Adicionar informação na chave "EFG"

                          executar=diretorio\informação2.reg

    Pode me ajudar?


    • Dividir Fábio JrModerator sexta-feira, 17 de fevereiro de 2012 22:51 Assunto diferente do inicio do tópico
    quarta-feira, 15 de fevereiro de 2012 22:15
    |

Respostas

  • Question
    Entrar para Votar
    1
    Entrar para Votar

    Estranho fiz o teste e funcionou, então teste criar o reg pelo vbs

    no lugar de 

    'objShell.run("REGEDIT /S Z:\teste\informação1.reg")'

    faça: 

    		If UserOption(0).Checked Then
			objShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\teste\teste",2,"REG_DWORD"
			Msgbox "Adiconado com sucesso!"

     TIPOS DE CHAVES
    REG_SZ (string)
    REG_EXPAND_SZ (string)
    REG_DWORD (Integer)
    REG_BINARY (Integer)

    teste criar assim e ver se dar certo..

    quinta-feira, 16 de fevereiro de 2012 00:22
    |

Todas as Respostas

  • Question
    Entrar para Votar
    1
    Entrar para Votar

    Boa noite ,

    Maninho você pode tentar usar dessa forma....

    <html>
<head>
<title>HTA Helpomatic</title>

<HTA:APPLICATION
     ID="objHTAHelpomatic"
     APPLICATIONNAME="HTAHelpomatic"
     SCROLL="yes"
     SINGLEINSTANCE="yes"
     WINDOWSTATE="maximize">
</head>
<script language="vbscript">

Set objShell = CreateObject("WScript.Shell")

	Sub RunScript
		If UserOption(0).Checked Then
			objShell.run("REGEDIT /S Z:\teste\informação1.reg")
			Msgbox "Adiconado com sucesso!"
		End If
		If UserOption(1).Checked Then
			Msgbox "abrir a calculadora"
			objShell.run("calc.exe")
		End If
		If UserOption(2).Checked Then
			Msgbox " Acessar o Google."
			objShell.run("iexplore.exe www.google.com.br")

		End If
	End Sub
</script>
<body>
<input type="radio" name="UserOption" value="1">Adicionar REG<BR>
<input type="radio" name="UserOption" value="2">Calculadora<BR>
<input type="radio" name="UserOption" value="3">Google<BR>
<input id=runbutton  class="button" type="button" value="Executar" name="run_button"  onClick="RunScript">
</body>
    testa aí

    quarta-feira, 15 de fevereiro de 2012 23:31
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Aparecido, esta 99%, agora consigo executar os arquivos "reg", porem as informações nao estão sendo adicionados no Registro da maquina.

    Efetuando diretamente o arquivo reg funciona, as informações são adicionadas, voce sabe me dizer o que possa ser isso?

    Nao apresenta erro nenhum.

    Obrigado desde já.

    quarta-feira, 15 de fevereiro de 2012 23:58
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Faça o seguinte tire o "/S" do regedit e verifique se ele esta puxando o reg ... 

    quinta-feira, 16 de fevereiro de 2012 00:03
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar
    Sim ja fiz isso ele puxa o reg, porem as informações nao aparecem, somente executando manualmente.
    quinta-feira, 16 de fevereiro de 2012 00:06
    |
  • Question
    Entrar para Votar
    1
    Entrar para Votar

    Estranho fiz o teste e funcionou, então teste criar o reg pelo vbs

    no lugar de 

    'objShell.run("REGEDIT /S Z:\teste\informação1.reg")'

    faça: 

    		If UserOption(0).Checked Then
			objShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\teste\teste",2,"REG_DWORD"
			Msgbox "Adiconado com sucesso!"

     TIPOS DE CHAVES
    REG_SZ (string)
    REG_EXPAND_SZ (string)
    REG_DWORD (Integer)
    REG_BINARY (Integer)

    teste criar assim e ver se dar certo..

    quinta-feira, 16 de fevereiro de 2012 00:22
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Aparecido eu testei em um outro SO (XP) e funcionou normalmente (dos dois jeitos que você passou), obrigado pela ajuda.

    Antes eu estava testando no Windows 7 e nao funcionava, não sei o que possa ser.


    • Editado andre080310 quinta-feira, 16 de fevereiro de 2012 17:53
    quinta-feira, 16 de fevereiro de 2012 15:37
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    No WIn7 tente executar o HTA com elevação e ver se funfa.... 

    em todo caso vc pode usar essa linha e ver se funciona...

    objShell.run("cmd /c reg import Z:\teste\informação1.reg")
    quinta-feira, 16 de fevereiro de 2012 17:48
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar
    Adicionei o codigo acima mas nao funcionou, o cmd pisca rapidamente na tela mas nao adiciona informações no registro.
    quinta-feira, 16 de fevereiro de 2012 18:00
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Beleza altera o /c por /k que o CMD ficara aberto, o erro....

    quinta-feira, 16 de fevereiro de 2012 18:23
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Dividi o tópico em dois porque o assunto é diferente da dúvida original (Menu vs. Importa .reg)

    tópico original:

    Menu em VBS

    http://social.technet.microsoft.com/Forums/pt-BR/scriptadminpt/thread/f5c82ee1-a767-475e-a4d7-46dab20329ff

    Fábio de Paula Junior


    sexta-feira, 17 de fevereiro de 2012 22:53
    |
    Moderador
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    André,

    Vc pode também pegar apenas o parametro do comando e colar num prompt de comando, com isso pelo menos você descobre se o seu comando esta certo, se estiver certo então provavelmente é um erro de sintaxe do script.

    Cole em um prompt o comando(com as sua infomações)

    reg import Z:\teste\informação1.reg

    Um erro comum é o caminho do .reg conter espaços, então você deve colocar o path entre aspas, exemplo

    reg import "Z:\teste do script\informação1.reg"

    Fábio de Paula Junior

    quinta-feira, 23 de fevereiro de 2012 15:50
    |
    Moderador