ADS error 5159

[Patricio Avalos Aguirre]

Estimados, estoy cambiando de base de dato de (dbf) a (adt), pero me esta arrojando este error que no lo he podido decifrar
ADSADT/5159 error de apertura

EN CAMBIO CON DBF/CDX ME ABRE BIEN


lo que hago es lo siguiente

Code: Select all  Expand view  RUN


__rddSetDefault( "ADS" )
rddRegister( "ADS", 1 )
AdsSetFileType(ADS_ADT) //ADS_CDX
IF !AdsConnect60( "\\SERVERCARMONA\ADT\DATOS\ADTBASES.ADD", 2, "adssys", "1234" )
   ALERT( "ERROR..." )
   RETURN
endif
SELE 0 ; USE "\\SERVERCARMONA\ADT\DATOS\USUARIOS" VIA "ADS"
//aqui sale el error ADSADT 5159
BROWSE()



cualquier ayuda bienvenida

atte
Patricio

[R.F.]

Me surgen algunas preguntas....

1) ¿ para que estas usando un diccionario de datos si vas a utilizar la tabla como tabla libre ?

2) Estas usando un servidor remoto ?

3) Tienes la tabla ADT registrada en el diccionario de datos ?

No es necesario hacer una conexion a un diccionario de datos con tablas ADT, funcionan igual que los DBFs, es decir,como tablas libres.

[Patricio Avalos Aguirre]

Hola Rene

Gracias por responder

1) ¿ para que estas usando un diccionario de datos si vas a utilizar la tabla como tabla libre ?
R:no entiendo?

2)Estas usando un servidor remoto ?
R: SI

3) Tienes la tabla ADT registrada en el diccionario de datos ?
R: SI

con tablas dbf/cdx lo tengo igual y me funciona muy bien tanto remoto, internet, pero ahora que estoy probando con tablas adt me sale este error, pero si le sacos las tablas al diccionario funciona bien?

yo entiendo:
local=sin servidor ADS
remoto=con servidor ADS instalado en win2k3, etc
internet= igual remoto + diccionario de datos

atte
Patricio

nota: Lo ideal es tener las tablas en el diccionario de datos y asi poder verlas, usar las consulta SQL, etc

[Patricio Avalos Aguirre]

Estimados

alguien tiene un ejemplo de como abrir una base de datos ADT y que este en el diccionario de datos

desde ya gracias
Patricio

[Patricio Avalos Aguirre]

Solucionado gracias a Marcelo Via Giglio

Para los que le interese:

Code: Select all  Expand view  RUN

rddRegister( "ADS", 1 )
RddSetDefault("ADS")
SET FILETYPE TO ADT
SET SERVER REMOTE
AdsUseDictionary( .T. )
AdsRightsCheck( .F. )

IF !AdsConnect60( "\\server\sistema\dicc.add", 7, "adssys", "pass" )
   MsgInfo( "Error.." )
   Quit
endif

AdsUseDictionary( .T. )
AdsRightsCheck( .F. )

use articu shared new
browse()
bla...
bla..
//ahora a probar :-)



Saludos
Patricio