hola Carlos si estas utilizando el sqlexec el te retorna un valor numerico

1 si es completada la transccion

-1 si no se completa la transaccion.

creo que es asi de todos modos para estos casos yo verifico de esta manera

SQLSetprop(0,"ConnectTimeOut",3)
SQLSetprop(0,"DispLogin",3)
Local vlcservidor,vlcbasededatos,vlcusuario,vlcclave
Local vlcerrormensaje,vlnlocalnumconex
vlcservidor=Alltrim(PvproLocal.ServerName) && Tambien se puede colocar el IP
vlcbasededatos=Alltrim(PvproLocal.Bdatos)
vlcusuario = Alltrim(PvproLocal.usuario)
vlcclave = Alltrim(PvproLocal.Password)
pvpro2006="Driver={SQL Server}"+;
	";Server="+vlcservidor+;
	";Database="+vlcbasededatos+;
	";Uid="+vlcusuario+;
	";Pwd="+vlcclave+";"

concredito = Sqlstringconnect(pvpro2006)
If concredito <= 0
     messagebox("Servidor Fuera de Linea Intente en otro Momento!!!",16,"")
     poner rutina de fuera de linea a funcionar....
     Return 
Endif
Str_Inserta = "select * from clientes where codigo = '"+ALLTRIM(_CrCode002_)+"'"
If SQLExec(concredito,Str_Inserta,'cliPAG') <= 0
     Pner Rutinas para fuera de linea.	
Endif
=SQLDisconnect(concredito)

creo que este es un concepto bien basico pero muy util para tus casos.


sin mas y esperando que sea de tu ayuda.


saludos......