SET REDE=SIM

[ronnimadeira]

** Identificar Micro que está na rede **
SET REDE=SIM
Obs.: Tive que substituir esta variável de ambiente, pois no clipper eu conseguia identificar se o micro estava em rede ou não através desta variável, mas no Xharbour tive que colocar REDE2 pois na forma antiga não consigo pegar o valor dela, parece ser uma palavra reservada.

[sygecom]

Você esta usando "GetEnv() " para recuperar a variavel de ambiente ? pois verefique se isso não esta sendo usado por outro sistema no seu micro !

[Pablo César]

Eu por exemplo, crio um arquivo chamado REDE.SYS, que serve de guia para saber se está em rede. Este procedimento não ocupa memória, basta verificar a existência dele, por exemplo (a grosso modo):

Código: Selecionar todos

IF FILE("REDE.SYS")
   USE DBF SHARE
ELSE
   USE DBF EXCLUSIVE
ENDIF