DBUSEAREA Noutra máquina.

[crisvam]

 Bom dia Senhores,

 

Alguem poderia me ajudar a resolver o seguite:

1 - Um aplicativo precisa abrir arquivo dbf numa pasta compartilhada em outra máquina.

2 - Já fiz assim DbUseArea(.t.,"DBFXDX","\\Nome Maquina\Pasta compartilhada\ARQUIVO.DBF","ALIAS",.T.,.F.)

     Erro: Erro de parametros

3 - Coloquei o path na função set(_SET_PATH,"\\nome maquina\Pasta\Arq.DBF") e coloquei as funções:

Request DBFCDX
RddSetDefault("DBFCDX")        // Drive padrão cdx
DBSetDrive("DBFCDX")    // Drive padrão cdx

E usei o comando Use Arq.DBF ALIAS  Apelido SHARED NEW e dar erro Dos3. Mas no confignt file=125 e o arquivo existe na pasta compartilhada.

 

Agradeço desde já a cooperação 

[Theotokos]

eu uso mapear a unidade de rede, assim vc usa a Unidade

Mapear ==>  \\Nome Maquina      Unidade Mapeada ==> Z:

Z:\Pasta\Arq.DBF

 

[ADutheil]

Já tentou com IP no lugar do nome da máquina?

[Theotokos]

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=19202&p=101061&hilit=Map+Network+Drive#p101061

 

[Ariston Santos]

Eu uso assim ha muito tempo e nunca tive problema:

cPasta := "\\SERVIDOR\MEUPROGRAMA\DADOS" // Endereço da pasta compartilhada. Pode ser por IP. Ex: \\192.168.0.100\MEUPROGRAMA\DADOS
SET DEFAULT TO &(cPasta)
USE ARQUIVO.DBF SHARED NEW // Em rede é sempre bom abrir compartilhado
OrdListClear()
OrdListAdd("ARQUIVO.CDX","CHAVE01","CHAVE02")
SET ORDER TO TAG CHAVE01 IN &("ARQUIVO.CDX")
* ou ARQUIVO->(DBSETORDER(1))
XBROWSE()
CLOSE ARQUIVO.DBF

 

[crisvam]

Pessoal obrigado a todos pela ajuda. Vou estudar cada uma e depois postarei o resultado.

Na verdade o meu problema é o seguinte:

1 - quero usar um aplicativo instalado numa máquina e desta máquina abrir, ler e escrever dados numa pasta compartilhada em outra máquina

2 - Gostaria de usar os comandos do Harbour/xHarbour, principalmente a a função "DbUseArea", se isso for possível

3 - Mas me deparei com a dificuldade de não conseguir abrir os arquivos da pasta na outra máquina.

Os colegas já apontaram algumas possíveis soluções. Vou testa-las.

 

Agradeço a todos pela cooperação.