FiveTech Software tech support forums

... LIB|adsfunc
Error: Unresolved external 'AdsDDGetUserProperty' referenced from I:\HARBOUR\LIB\RDDADS.LIB|adsfunc
Error: Unresolved external 'AdsDisconnect' referenced from I:\HARBOUR\LIB\RDDADS.LIB|adsfunc
Error: Unresolved external 'AdsRestructureTable' referenced from I:\HARBOUR\LIB\RDDADS.LIB ...

... AdsSetServerType ( 1 ) // local
lOk = ADSConnect60( cPath, 1, "AdsSys", "",,@hAds)
IF lOk
dbUseArea(.T., "ADS", "MASTER", "_master", .T., .F.)
xBrowse("_master")
ELSE
MsgStop(" Error connecting to tables " )
END

DBCloseAll()
AdsDisconnect( hAds )

return (nil )

Best regards,
ryugarai27

... hAds)
IF lOk
dbUseArea(.T., "ADS", "MASTER", "_master", .T., .F.)
xBrowse("_master")
ELSE
MsgStop(" Error connecting to tables " )
END

AdsDisconnect( hAds )

return (nil )

But when I tried to compile the source on FWH1706, it compiles without errors but launching the programs produces an ...

... Error: Unresolved external 'AdsDDGetUserProperty' referenced from C:\PIETER\XHAR
BOUR123\LIB\RDDADS.LIB|adsfunc
Error: Unresolved external 'AdsDisconnect' referenced from C:\PIETER\XHARBOUR123
\LIB\RDDADS.LIB|adsfunc
Error: Unresolved external 'AdsRestructureTable' referenced from C:\PIETER\XHARB ...

... ADSCreateSQLStatement( "SQLArt", ADS_CDX ) MsgStop( "Fallo en la conexión a "+h1["Articulos"]:cAlias, "Reintente..." ) AdsDisconnect() return( nil ) end if !ADSExecuteSQLDirect( "SELECT Count(*) FROM BDCA02 WHERE FTag01=.T." ) MsgStop( "Fallo en la ...

Con ADSConnect(cPathTEM) , solamente así pude abrir tablas libres del DD
y después cerrar la coneccion AdsDisconnect().

Carles,

He probado con AdsApplicationExit, AdsDisconnect, AdsSetDefault, AdsSetSearchPath. Y no lo he conseguido con ninguna.

... Error: Unresolved external 'AdsDDGetUserProperty' referenced from C:\FIVETECH\XHARBOUR\LIB\RDDADS.LIB|adsfunc
Error: Unresolved external 'AdsDisconnect' referenced from C:\FIVETECH\XHARBOUR\LIB\RDDADS.LIB|adsfunc
Error: Unresolved external 'AdsRestructureTable' referenced from C:\FIVETECH ...

... D:\mistablas\"
2. s:=ADSCONNECT(RUTABUS)
3: h:=ADSCREATESQLSTATEMENT("sqlalias",3)
4. ADSEXECUTESQLDIRECT(cSQL)
...
sqlalias->(DBCLOSEAREA())
ADSDISCONNECT(ADSGETCONNECTIONHANDLE())

Esto me implica tener que estar utilizando la instruccion (2.) cada vez que deseo hacer una consulta.

Sabiendo que ...

... c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_ADSGETCONNECTIONHANDLE' referenced from D:\FUEN32\WAT5\RELEASE\WAT_T01.OBJ
mgat - 0 error(es), 2 advertencia(s)

Por otro lado realicé una llamada a AdsDisconnect() y me devuelve verdadero; por lo supongo que desconecta. Es así?

Saludos

... 0 )

IF ! ADSCreateSQLStatement("SQLarea",2) // 2 == ADS_CDX
MsgAlert( "ADSCreateSQLStatement( 'SQLArea', 2 )" )
AdsDisconnect(AdsGetConnectionHandle())
RETU .F.
ENDIF

IF ADSExecuteSQLDirect( consulta )

FOR nI := 1 TO 20

cTxt ...

... 125;), ;
::aLocalidades:= ::CargaArr( oMeter, oTxt ) }, "", "Cargando Tabla..." )
else
AdsDisconnect()
SQLarea -> ( DbCloseArea() )
return( lOk )
end


No entiendo donde incluir DBSelectAr( 0 ); probe ...

... con con un msg de error de que primero debo cerrar la primer consulta. Como lo hago?

Tambien de este ejemplo observo que en el sample se usa AdsDisconnect(AdsGetConnectionHandle()) donde, AdsGetConnectionHandle() parece no estar en la version 6.2 puede ser?
Es suficiente con AdsDisconnect ...

... nada, algo bien simple me conformo

AdsConnect
ADSCreateSQLStatement("SQLarea",2)
ADSExecuteSQLDirect( <cConsulta> )
y despues cierro el area SQLarea
AdsDisconnect

A proposito, donde ha quedado la funcion AdsGetConnectionHandle() en la nueva version de xHarbour ??? Sabes algo al respecto ?


Hernan