Hi Rakesh

Try this

STORE SQLSTRINGCONNECT("DSN=Visual FoxPro Database; UID=;PWD=;
SourceDB=C:\Testdata.dbc;SourceType=DBC;
Exclusive=No;BackgroundFetch=Yes;
Collate=Machine;Null=Yes;Deleted=Yes;");
TO gnConnHandle

IF gnConnHandle < 0
= MESSAGEBOX('Cannot make connection', 16, 'SQL Connect Error')
ELSE
= MESSAGEBOX('Connection made', 48, 'SQL Connect Message')

* your codes
* ...

= SQLDISCONNECT(gnConnHandle)
ENDIF

Replace the database C:\Testdata.dbc with yours.


HTH

- Ram