LOCAL liLen,lcOut,liOut,lihdbc #DEFINE SQL_DRIVER_ODBC_VER 77 #DEFINE SQL_ODBC_VER 10 lihdbc=SQLSTRINGCONNECT(connectstring) DECLARE INTEGER SQLGetInfo IN ODBC32.DLL INTEGER,; INTEGER, STRING @, INTEGER, INTEGER @ liLen=254 lcOut=SPACE(liLen) liOut=0 ?SQLGetInfo(SQLGETPROP(lihdbc,"odbchdbc"), SQL_ODBC_VER, @lcOut, liLen, @liOut) ?lcOut,liOut ?SQLGetInfo(SQLGETPROP(lihdbc,"odbchdbc"), SQL_DRIVER_ODBC_VER, @lcOut, liLen, @liOut) ?lcOut,liOut =SQLDISCONNECT(lihdbc)MartiJ