Me interesa probar ADS

[Armando]

Hola amigos:

Estoy tratando de probar Advantage Data Server, he instalado el servidor pero
no logro compilar en pequeño programa de prueba que tome del foro, me tira
errores que me hacen pensar que me falta linkar algo.

Unresolved External HB_FUN_ADSSETFILETYPE Referenced from . . . .
y varias más.

Podrían indicarme si necesito instalar algo más ?, debo incluir LIBs en mi script
de compilación ?.

Pueden ver que necesito de ayuda basica, y será bienvenida.

Saludos

[jrestojeda]

Hola...
Estás agregando "ACE32.lib"?

Saludos, Esteban.

[Armando]

Esteban:

Gracias por tu respuesta.

No he agregado minguna LIB a mi script de compilación, solo he instalado Advantage
Data Server y nada mas.

He buscado la Lib ACE32.LIB y no la encuentro, disculpa mi ignorancia, donde la debo tener ?

Estoy probando con FWH810, xHarbour y BCC55

Saludos

[jrestojeda]

Hola Armando...
Si no la tienes debes generarla con el ImpLib.exe de Borland a partir de ACE32.Dll, luego la lib generada la agregas a tu proyecto!
La ACE32.Dll la obtienes de la instalación de ADS Server.
Luego por línea de comandos ejecutas lo siguiente: "implib ace32.lib ace32.dll" (Sin la comillas)
Espero te sirva la ayuda.
Saludos, Esteban.

[Armando]

Esteban:

Muchas gracias ya la he logrado crear con tu consejo, ahora me tira el siguiente error

Unable to open file ADVANTAGE.LIB

Existirá algun tutorial ?, para no estar dando mucha lata

Saludos

[Patricio Avalos Aguirre]

Hola

estas son las librerias de ADS

Code: Select all  Expand view

c:\xharbour\lib\rddads.lib+
c:\xharbour\lib\ace32.lib +
 

[Armando]

Patricio:

Gracias por tu respuesta, estoy incluyendo esas dos LIBs pero no hay éxito.

Saludos

[jrestojeda]

Hola...
Podrías dar más detalles del error que te aparece? O mostrar el código del ejemplo...?
A ver si podemos ayudarte.

En principio todo está en las dos Libs que menciona Patricio y en agregar #Include "ADS.CH" en todos los PRGs.

Pero si muestras algo por ahi podemos ayudarte mejor.
Saludos, Esteban.

[Armando]

Esteban:

El código es muy sencillo incluso lo tome del foro

Code: Select all  Expand view

#include "fivewin.ch"
#include "ads.ch"


FUNCTION main()
LOCAL cAlias := "sql", cRec := ""

    rddRegister( "ADS", 1 )
    rddsetdefault( "ADS" )

    AdsSetFileType( ADS_CDX )

    SET SERVER LOCAL
    adsConnect(".")

    adsRightsCheck( .F. )

    //ADSSETDATEFORMAT("DD/MM/YYYY")

    SELECT 0
    ADSCreateSQLStatement( cAlias, 2 )
    ADSPREPARESQL( "select * from customer where state = 'NY'" )
    ADSEXECUTESQL()

    ? (cAlias) -> ( lastrec() )
    (cAlias) -> ( DBGOTOP() )
    DO WHILE ! (cALias) -> ( EOF() )
       cRec += STR( (cAlias)->(RECNO()) )
       (cAlias) -> ( DBSKIP() )
    ENDDO

    ? cRec

    BROWSE()

    DBCLOSEALL()
return NIL
 

Y este es el error

[url=http://img225.imageshack.us/i/clip1a.jpg/]
[/url]


Como ves estoy compilando con VERCE, xHabrour y FWH 810

Saludos y gracias por tu ayuda

[jrestojeda]

Prueba lo siguiente...

Cambiar estas líneas, tambien cambia el orden:

Code: Select all  Expand view

AdsSetFileType( ADS_CDX )
SET SERVER LOCAL

Code: Select all  Expand view

SET SERVER LOCAL
SET FILETYPE TO CDX

Prueba y vemos que pasa...
Saludos!

[Armando]

Esteban:

Nop, sigue igual.

Saludos

[Patricio Avalos Aguirre]

se ve claro el error, no existe la lib advantage.lib

yo no utilizo verse, trata de modificar las librerias o bien cambia de nombre a rddads.lib advantage.lib

[jrestojeda]

se ve claro el error, no existe la lib advantage.lib

yo no utilizo verse, trata de modificar las librerias o bien cambia de nombre a rddads.lib advantage.lib

Claro...
Yo en mi proyecto no tengo niguna "Advangage.lib", y todo funciona correctamente.

[acuellar]

Hola distinguidos

Dónde consigo ADS para instalarlo me interesa aprender

Gracias amigos

Saludos,

Adhemar

[Patricio Avalos Aguirre]

Hola

http://devzone.advantagedatabase.com/dz/content.aspx?key=20

busca en el foro, habia un link de ads server 10 con 2 licencias gratis, no lo pude encontrar