Incluir pasta no Path do windows

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
janio
Colaborador
Colaborador
Mensagens: 1846
Registrado em: 06 Jul 2004 07:43
Localização: UBAJARA - CE

Incluir pasta no Path do windows

Mensagem por janio »

Pessoal,

Tem alguma maneira de incluir UMA PASTA no path do windows?

Se pelo prompt eu colocar set path=%path% bla bla... isso fica apenas para essa janela do prompt aberta. Fechou, perdeu o caminho.

Gostaria de incluir de forma definitiva a pasta do meu sistema no path do windows

Janio
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
Kapiaba
Colaborador
Colaborador
Mensagens: 1908
Registrado em: 07 Dez 2012 16:14
Localização: São Paulo
Contato:

Incluir pasta no Path do windows

Mensagem por Kapiaba »

Avatar do usuário
janio
Colaborador
Colaborador
Mensagens: 1846
Registrado em: 06 Jul 2004 07:43
Localização: UBAJARA - CE

Incluir pasta no Path do windows

Mensagem por janio »

Obrigado, Kapiaba!

Complementando... mim refiro a alterar o PATH de dentro do proprio sistema acessando o registro do windows ou outra forma que funcione!

Janio
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
Kapiaba
Colaborador
Colaborador
Mensagens: 1908
Registrado em: 07 Dez 2012 16:14
Localização: São Paulo
Contato:

Incluir pasta no Path do windows

Mensagem por Kapiaba »

Avatar do usuário
janio
Colaborador
Colaborador
Mensagens: 1846
Registrado em: 06 Jul 2004 07:43
Localização: UBAJARA - CE

Incluir pasta no Path do windows

Mensagem por janio »

Kapiaba, obrigado! Não lembrava mais daquele post...

Após alguns testes, o resultado eh o seguinte:

1-) O comando hb_setEnv() seta a variável path (ou qq outra) de modo correto. Porém, não de forma permanente, mas apenas para aquela seção do aplicativo. Fechou o sistema, perdeu o path.

2-) O comando setx faz a alteração do path de forma permanente, contudo há apenas 2 inconvenientes: a) Este comando não existe no windowsXP; b) o sistema precisa ser executado como administrador para poder efetuar a mudança no registro do Windows.

Entao ficou assim e funciona para o que eu estava precisando:

Código: Selecionar todos

   cPathWindows := GetEnv( "Path" )

   If hb_at("CriaSoftWare",cPathWindows) = 0
      cPathWindows_ := '"' + '%Path%;C:\CriaSoftWare' + '"'
      cPathWindows  := "setx PATH " + cPathWindows_ + " /m"
      MyRun( '&cPath' ) 
   Endif
Vlw

Janio
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
Responder