Es posible saber cuándo fué iniciado el SQLServer (o MSDE), a travéz de VFP usando técnicas SPT (SQL Pass Through).
lcServer = "(local)"
TEXT TO lcConnString NOSHOW TEXTMERGE
[DRIVER=SQL Server;SERVER=< < lcServer > >;
DATABASE=tempdb;Network=DBMSSOCN;
Trusted_Connection=Yes]
ENDTEXT
lnHandle = SQLStringConnect(lcConnString)
IF lnHandle > 0
TEXT TO lcQuery NOSHOW
SELECT crdate AS dFecha
FROM master.dbo.sysdatabases
WHERE name = 'tempdb'
ENDTEXT
IF SQLExec(lnHandle,lcQuery,"cSQLServer") > 0
Messagebox("Fecha de Inicio del Servidor:"+cSQLServer.dFecha)
ELSE
IF AERROR(laError) > 0
Messagebox("Error al consultar fecha de Inico de SQLServer"+;
CHR(13)+"Error:"+laError[2])
ELSE
Messagebox("Error inesperado...")
ENDIF
ENDIF
ELSE
IF AERROR(laError) > 0
Messagebox("Error al intentar conectar"+CHR(13)+;
"Error:"+laError[2])
ELSE
Messagebox("Error inesperado al intentar conectar"+CHR(13)+;
"Error:"+laError[2])
ENDIF
ENDIF
Espero que les sea de utilidad.
Espartaco Palma Martínez
No hay comentarios. :
Publicar un comentario
Los comentarios son moderados, por lo que pueden demorar varias horas para su publicación.