Desde que inicié clipper he utilizado este funcion de red, pero me he dado cuenta que no me esta funcionando con ADS LOCAL
- Code: Select all Expand view
USE (cDbf) NEW ALIAS (cAlias) VIA "ADS" EXCLUSIVE
if !NetErr()
dbSetIndex( cIndex )
OrdSetFocus( 1 )
dbGotop()
return( .t. )
endif
MSgInfo( "Error al abrir "+cDbf )
return( .f. )
Esto funcionaba un día,que version no lo se, pero funcionaba
si la base cDbf esta abierta igualmente trata de abrirla y al ejecutar
dbgotop se cae, diciendo que no existe alias...
lo he solucionado momentaneamente asi
- Code: Select all Expand view
if !NetErr() .and. !empty( alias() )
dbSetIndex( cIndex )
OrdSetFocus( 1 )
dbGotop()
return( .t. )
endif
Pero no es la idea, ya que la funcion Neterr() debiera controlar las funciones de red
Alguien le ha pasado
atentos a sus comentarios...
