Caros amigos, alguém conhece um comando ou função q possibilite a comparação de 2 arquivos para verificar se existe diferença entre eles, q retorne um ERRORLEVEL ??
Como os executáveis estão nas estações, disponibilizo a atualização no servidor, rodaria esse programa q comparava o exe da estação com o da rede, havendo diferença executaria a copia do exe novo para estação.
Comparação de 2 executáveis ?
Moderador: Moderadores
-
Dudu_XBase
- Membro Master

- Mensagens: 1071
- Registrado em: 25 Ago 2003 16:55
Comparação de 2 executáveis ?
________________________________________________________________________________________________________
(Aow Saudade) Clipper 5.2e, Blinker 7, RDD SIXNSX, DBFCDX /Xharbour 1.0, Rdd Mediator (Mysql) Free , RDD Sqlrdd (Sql Server) Comercial
(Hoje) C# Python Sql Server e Oracle
-
clebermano
- Usuário Nível 3

- Mensagens: 187
- Registrado em: 03 Out 2004 12:39
- Contato:
-
Dudu_XBase
- Membro Master

- Mensagens: 1071
- Registrado em: 25 Ago 2003 16:55
Por data naum serve ja tentei....pq ocorre mtas atualizações durante o msm dia...
________________________________________________________________________________________________________
(Aow Saudade) Clipper 5.2e, Blinker 7, RDD SIXNSX, DBFCDX /Xharbour 1.0, Rdd Mediator (Mysql) Free , RDD Sqlrdd (Sql Server) Comercial
(Hoje) C# Python Sql Server e Oracle
Fala Taka !!!
Use a função FILECHECK() da CTP.
Fiz uns testes e funcionou beleza...
Basta fazer a comparação do checksum dos executaveis da estação e do servidor.
Segue abaixo o código que usei para teste.
Até logo.
Marcelo
Use a função FILECHECK() da CTP.
Fiz uns testes e funcionou beleza...
Basta fazer a comparação do checksum dos executaveis da estação e do servidor.
Segue abaixo o código que usei para teste.
Código: Selecionar todos
PARAM ARQUIVO
CLS
IF .NOT. FILE(ARQUIVO)
@ 05,00 SAY "Nao encontrado"
RETURN
ENDIF
CHECKSUM=FILECHECK(ALLTRIM(ARQUIVO))
@ 10,00 SAY CHECKSUM
INKEY(0)
RETURN
Marcelo
-
Dudu_XBase
- Membro Master

- Mensagens: 1071
- Registrado em: 25 Ago 2003 16:55
Ow Marcelo o "xBacon" agradece...rs...vlw deu tudo certo...aki...(y)
________________________________________________________________________________________________________
(Aow Saudade) Clipper 5.2e, Blinker 7, RDD SIXNSX, DBFCDX /Xharbour 1.0, Rdd Mediator (Mysql) Free , RDD Sqlrdd (Sql Server) Comercial
(Hoje) C# Python Sql Server e Oracle
