lnConnHandle=Sqlstringconnect("driver={SQL Server};server=SQLSRVB;uid=name;pwd=pass;database=db") lcSQLConn = SQLEXEC(lnConnHandle, "SELECT * FROM members WHERE (active = 1 AND last_update > '1/1/1900')",'MEMBERS') IF lcSQLConn = -1 MESSAGEBOX("[ERR]Failure to connect to SQL Server MEMBERS") lcError = .T. ENDIF = SqlDisconnect(lnConnHandle)TIA,