diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 9b51500d54..400ccf1943 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-11-06 16:15 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)
+  * harbour/contib/rddads/adsfunc.c
+    * AdsIsConnectionAlive() guarded using #if ADS_LIB_VERSION >= 800
+
 2009-11-06 00:15 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/src/rtl/strcase.c
   * harbour/src/rtl/cdpapi.c
diff --git a/harbour/contrib/rddads/adsfunc.c b/harbour/contrib/rddads/adsfunc.c
index 8315aa7380..12ec16d3e9 100644
--- a/harbour/contrib/rddads/adsfunc.c
+++ b/harbour/contrib/rddads/adsfunc.c
@@ -1436,11 +1436,15 @@ HB_FUNC( ADSCONNECTION )                /* Get/Set func to switch between connec
 
 HB_FUNC( ADSISCONNECTIONALIVE ) /* Determine if passed or default connection is still valid */
 {
+#if ADS_LIB_VERSION >= 800
    UNSIGNED16 bConnectionIsAlive = 0;
 
    AdsIsConnectionAlive( HB_ADS_PARCONNECTION( 1 ), &bConnectionIsAlive );
 
    hb_retl( bConnectionIsAlive != 0 );
+#else
+   hb_retl( 0 );
+#endif
 }
 
 HB_FUNC( ADSGETHANDLETYPE )             /* DD, admin, table */