FiveTech Software tech support forums

... instalado ADS 10 Quiero conectarme a un diccionario de datos xxxxx.add Hago Function Main() IF !AdsConnect60("/data/xxxxx.add",7,"ADSSYS","passwd") ? 'No se pudo abrir el diccionario de datos' endif return nil No da error, pero sale por True ¿Que me estaría faltando?

... ) lOk := .F. RddRegister("Ads", 1) RddSetDefault("Ads") AdsSetServerType ( 1 ) // local lOk = ADSConnect60( cPath, 1, "AdsSys", "",,@hAds) IF lOk dbUseArea(.T., "ADS", "MASTER", "_master", .T., .F.) xBrowse("_master") ...

... a conexão no servidor linux Utilizando a função: AdsConnect60( //192.168.1.27:6262/home/sg/bases/sguario/ser.ads.chico/sgsdatabase.add, 7, "ADSSYS" ,"" , 0, @hConnection ) Error 5004: Either ACE could not find the specified file, or you do not have sufficient rights to access ...

... connection on the linux server Using the function: AdsConnect60( //192.168.1.27:6262/home/sg/bases/sguario/ser.ads.chico/sgsdatabase.add, 7, "ADSSYS" ,"" , 0, @hConnection ) Error 5004: Either ACE could not find the specified file, or you do not have sufficient rights to access ...

... case aParams[ 1 ] == "uno" SetIniciales() RDDActual() if !AdsConnect60( "\\192.168.1.8\comuna2\ps-datos\unire.add" , 7 , "ADSSYS" , "/-789" ) msginfo('No se puedo conectar al diccionario de datos.') endif BuscoPersona ( aParams ) case aParams[ 1 ] == "dos" ...

... "ADS" ) SET SERVER REMOTE str_conn:="\\84.65.128.144:6262\C$\DBTEST\DATATEST.ADD" IF !AdsConnect60(str_conn, 7,"adssys" , "pass",@AdsHandle) MsgInfo( "DB NOT CONNECT!!" ) Dbcloseall() Return nil ENDIF USE FR_UTENTI ALIAS APPO SHARED NEW ...

The server version is the 10,and I'm connected to a remote as ADSSYS.
Making the SQL command inside the ARC32 works perfectly.
It is really strange.
If I change the while..endwhile procedure with a browse() I see only one empty record.

What is your server version? Are you connected to a remote server (not the local server)? Are you connected as the ADSSYS user?

Try executing the stored procedure from arc32, do you get results?


Reinaldo.

... is AIS and REMOTE  (4 + 2)    COMPRESSION = Always    4. If AdsConnect60(\\<ip address>:<port>\yourdataDD\your.ADD, ADS_AIS_SERVER, 'adssys',,,@hADS ) == .T. //means connected to your .add 5. open table as usual 'use table' //where table is added to your .add note: don't forget to ...

... cDict:='adstest.add' G_Msg('Povezovanje preko interneta ... ' + xRDDPath + cDict) if AdsConnect60( xRDDPath + cDict, ADS_AIS_SERVER, "ADSSYS")    ... I also shared volume C: as ADS91 with full access and changed ADS.INI on client machine: [MASTERM1] INTERNET_IP=192.168.1.101 INTERNET_PORT=50101 ...

... yo utilizo el de la version 7.x, tu seguro usaras el ultimo de la version 9, alli creas un diccionario de datos, que tendra un usuario por defecto ADSSYS, al diccionario (base de datos) agregas tablas, existentes o las creas alli mismo, luego al abrir las tablas tienes la opcion de encriptarlas.... ...

oConexionAdo:Open("Provider=Advantage.OLEDB.1;User ID=adssys;Data Source=diccionario.add;Persist Security Info=False;ServerType=ADS_REMOTE_SERVER;LockMode=ADS_COMPATIBLE_LOCKING")

saludos

... .dbf a .adt ? Vikthor La conexion al diccionario de datos la hago de la siguiente forma: AdsConnect60( "\\servidor\ads_data\MyDiccionario.add", 3,"ADSSYS",<cPassword>) En caso de haberle puesto password en el parametro <cPassword> iria este. Saludos. Una más que deseara saber: como ...

Arturo, para abrir una vista previamente creada en el architect yo uso ADO oConexionAdo:Open("Provider=Advantage.OLEDB.1;User ID=adssys;Data Source=diccionario.add;Persist Security Info=False;ServerType=ADS_REMOTE_SERVER;LockMode=ADS_COMPATIBLE_LOCKING") oComando:ActiveConnection(oConexionAdo) ...

Vikthor La conexion al diccionario de datos la hago de la siguiente forma: AdsConnect60( "\\servidor\ads_data\MyDiccionario.add", 3,"ADSSYS",<cPassword>) En caso de haberle puesto password en el parametro <cPassword> iria este. Saludos. Una más que deseara saber: como puedo abrir ...