Nome maquina /ou IP

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

Moderador: Moderadores

lucimauro
Usuário Nível 3
Usuário Nível 3
Mensagens: 465
Registrado em: 21 Set 2004 21:02
Localização: Sobral-CE

Mensagem por lucimauro »

Gente pelo que sei e faco nao precisa renomear quando o servidor e terminal é win Xp, voce simplimente pode chegar no servidor ou terminal e mandar substituir o arquivo executavel.e para que os usuaros recebao as atualizao so é nescessario que eles saio do sistema e entre novamente.
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

lucimauro escreveu:Gente pelo que sei e faco nao precisa renomear quando o servidor e terminal é win Xp, voce simplimente pode chegar no servidor ou terminal e mandar substituir o arquivo executavel.e para que os usuaros recebao as atualizao so é nescessario que eles saio do sistema e entre novamente.
Isso eu fazia quando usava CLIPPER com BLINKER. Quando o .EXE era 16Bits, não sei pq mas aceitava mesmo ! agora em xharbour(32Bits) não aceita.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Mensagem por Maligno »

Com semáforos pode-se fazer manutenção perfeitamente, sem esse tipo de problema.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
MARCELOG
Usuário Nível 4
Usuário Nível 4
Mensagens: 546
Registrado em: 15 Mar 2005 16:54
Localização: Divinópolis/MG

Mensagem por MARCELOG »

Peraí gente!
O cara quer criar índices e db(f)s ou atualizar o sistema, trocando o executável por um mais novo?

MarceloG
Água mole em pedra dura tanto bate que até espirra!
ederxc
Usuário Nível 4
Usuário Nível 4
Mensagens: 619
Registrado em: 15 Set 2006 08:40
Localização: Pedreira -SP-

Mensagem por ederxc »

MARCELOG escreveu:Peraí gente!
O cara quer criar índices e db(f)s ou atualizar o sistema, trocando o executável por um mais novo?

MarceloG

É a coisa flui !

Maligno, que lance é esse de semafaros que voce esta falando ! :|<
C:\Xharbour\Xdev\Fw\VSX
Avatar do usuário
Pablo César
Usuário Nível 7
Usuário Nível 7
Mensagens: 5312
Registrado em: 31 Mai 2006 10:22
Localização: Curitiba - Paraná

Mensagem por Pablo César »

Eu acredito que o Maligno refere-se a criar um arquivo com o nome de PARATUDO.SYS por exemplo. Como disse o colega Marcelo, você tenta abrir DBF em modo exclusivo, se conseguiu é porque ninguém está acessando e se alguém tentar entrar, dará uma mensagem "Sistema em manutenção, aguarde..." Mas para isso deve ser feito uma rotina de manutenção que crie esse arquivo (MEMOWRIT("PARATUDO.SYS","") e colocar no início do sistema:

IF FILE("PARATUDO.SYS")
MENSAGEM("Sistema em manutenção, aguarde...")
inkey(5)
quit
ENDIF

Essa é a minha opinião para realizar alguns procedimentos que requerem a saída de todos no sistema.
Um clip-abraço !

Pablo César Arrascaeta
Compartilhe suas dúvidas e soluções com todos os colegas aqui do fórum.
Evite enviar as dúvidas técnicas por MPs ou eMails, assim todos iremos beneficiar-nos.
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Mensagem por Maligno »

ederxc escreveu:Maligno, que lance é esse de semafaros que voce esta falando ! :|<
É basicamente o que Pablo comentou. Dá pra fazer um monte de coisas com semáforos e arquivos de comunicação. Até processamento distribuído. É só usar a imaginação.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Mensagem por Hasse »

Boa tarde companheiros. (não os do Lula, evidente. rss, rss...)

Também desejo compartilhar como eu faço a substituição dos executáveis, no servidor.

Eu também mantenho UM só executável no servidor. Já fiz várias outras tentativas, e no meu caso, ainda é a melhor solução.

Para não haver problemas com a substituição, eu crio um BAT em cada terminal, que faz uma cópia do executável do Servidor para o terminal, e a seguir arquivo é executado.

Desta forma todos estão sempre com a última versão, e eu não me preocupo com negativas de acesso para gravar a nova versão. E funciona muito bem. A grande maioria dos usuários nem percebe que alguma coisa mudou.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar do usuário
alaminojunior
Colaborador
Colaborador
Mensagens: 1717
Registrado em: 16 Dez 2005 21:26
Localização: Ubatuba - SP

Mensagem por alaminojunior »

Já que estamos falando de xHarbour e aproveitando a dica do Maligno, vejam só:
Existe uma função em xHarbour que coloca rotinas em background de n em n milisec´s ( lembram da ontick() ).
Então pensei.... ( eu também faço isso )

deixar esta rotina em back, quando ela detectar o arquivo EXENOVO.EXE na pasta, emite um aviso "Este computador se autodestruirá em n segundos, corra enquanto pode !!!" Aquelas coisas de filme de ficção.

passado estes n segundos, todos os arquivos são fechados e o sistema é encerrado.

Em Clipper precisaria ser bem estudado, pois dependeria do fluxo das operações, porém em xHarbour, independe de onde esteja parado o sistema.

Mais alguma sugestão ?
Compilador xHarbour 1.2.3 + Embarcadero C++ 7.30
MySQL c/ SQLRDD
HwGui + GTWVG
Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

Mensagem por asimoes »

Aproveitando a idéia do Pablo, quando o arquivo paratudo.sys existir na pasta de dados do sistema, após o último DBUNLOCK(), Caso o usuário esteja incluindo, alterando, deletando registro, uma função exemplo: Em_Manutencao() que verifica a existencia do arquivo e retorne um lógico, caso retorne .t., manda uma mensagem pro usuário sair ou dali mesmo encerra a aplicação. E caso o usuário tente entrar o controle já estaria na entrada do aplicativo. Simples como matar barata. Pode-se usar a função KEYSEC()


SET KEY -9 TO CHECA

KEYSEC(-9,60,- 1,.T.)

A cada minuto o keysec dispara a tecla f10 que por sua vez executa a função checa.


:)Pos
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Responder