IDENTIFICAR ONDE O EXECUTAVEL ESTA RODANDO?

LUIS.HERRERA 28/10/2010 07:35:29
#356115
Bom dia,

Surgiu uma dúvida:
Quando instalamos um aplicativo (VB6) nas estações de trabalho, e depois deslocamos apenas o Executável para o servidor, a fim de centralizar o sistema em rede, sempre que rodamos o sistema (pela estação) o EXE é executado na RAM da estação perfeitamente, porém o app.path dele continua apontando para o Servidor que é o local efetivamente de onde ele está.

O que gostaria de saber é como posso saber, ao rodar o aplicativo, em que micro ele está sendo executado?

Preciso comparar alguns arquivos nessa estação, em relação aos que estão no servidor, tipo arquivos de help, e outros para atualização, além de poder gravar um log por máquina e não por servidor.
LORD6666 28/10/2010 07:55:15
#356119
Eu utilizo aqui na empresa um sistema parecido.
Pra identificar qual é a máquina eu criei um banco de dados na rede e quando o usuário loga o programa envia qualquer informação que eu queira para o banco de dados. Assim da pra saber onde ele está logado.
MARCELO.TREZE 28/10/2010 09:26:00
#356130
vc tentou pegar o ip da máquina, não sei se vai funcionar, mas procure aqui algo como exibir ip da maquina, veja se o executavel identifica o ip da maquina em que está rodando.
LUIS.HERRERA 28/10/2010 13:59:02
#356169
Lord6666 eu sei quem está usando o sistema pelo login, não é isso que preciso.

LVFIROT isso não funciona em todos os Windows, ex: 98.
O problema é que preciso pegar o path da estação para verificar os arquivos locais e substituir pelos do servidor se necessário.

Isso teria de funcionar em qualquer windows, uma vez que meu programa está rodando em vários windows (98, Win 2000, XP, Vista, Server 2003 e Server 2008), além disso roda no Win 32 e 64 bits. Muitas rotinas como Environ$ não funcionam em todos.

MARCELO.TREZE 28/10/2010 17:29:29
#356199
luiz e usando um winsock, não funcionaria em todas as máquinas

Text1.Text = Winsock1.LocalIP
LUIS.HERRERA 28/10/2010 21:33:04
#356218
Não sei, pois não uso o winsock. Mas com ele dá para pegar o IP, seja por máquina virtual (remote desktop, terminal server, etc..) além das estações locais?

Caso afirmativo, de posse do IP, como no VB6 eu conseguiria consultar um arquivo (DLL, OCX, txt) ?
Daria para usar o IP com o Kill e o Copy para substituir os arquivos? Sei que aceitam um path completo, mas o IP funciona também?

MARCELO.TREZE 29/10/2010 15:52:51
#356287
olha acredito que sim, seria algo do tipo

kill [Ô]\\192.168.0.17\pasta\arquivo.ext[Ô]


olha só é apenas uma suposição, eu não testei.

Tópico encerrado , respostas não são mais permitidas