sqlhanddle="Driver={Mysql ODBC 3.51 Driver};dsn=hosxp;Server=localhost;Uid=sa;Pwd=sa;Database=hos"
sqlcondb=SQLSTRINGCONNECT(sqlhanddle)
?sqlcondb
IF sqlcondb > 0
= SQLEXEC(sqlcondb,'select * from patient limit 100' ,'patient')
= SQLEXEC(sqlcondb,'select * from ovst limit 100' ,'ovst')
SELECT * from patient INTO CURSOR cursor1
SELECT cursor1
BROWSE
= SQLDISCONNECT(sqlcondb)
ELSE
= MESSAGEBOX("no",0)
ENDIF
RETURN