|
WndDoc = FindWindow("TipoVentana", "TITULODESISTEMA")
*"TipoVentana" varia segun la version de Foxpro, lo puedes averiguar con la herramienta SPY de Visual Studio
-Si consigues la declaracion de PostMessage puedes mandar a cerrar la sesion que se encuentre abierta previamente, del programa:
hWndDoc = FindWindow("TipoVentana", "TITULODESISTEMA")
Do WHILE hWndDoc 0
X = PostMessage(hWndDoc, WM_CLOSE, 0, 0)
hWndDoc = FindWindow("TipoVentana", "MedOft")
Enddo
Atte.,
O.Aguiar
|