Berikut contoh (juga hasil tanya sana-sini dan browsing, termasuk di milist
ini):
Langkah 1 adalah kita membuat file dsn yang nantinya kita letakkan di folder
tempat Exe program kita
Berikutnya pada aplikasi.open() contoh scriptnya:
string ls_dsn
ls_dsn='C:\NamaFolderAplikasi'
SQLCA.DBMS="ODBC"
SQLCA.DBParm =
"ConnectString='FileDSN="+ls_dsn+";UID=abc;PWD=xyz',ConnectOption='SQL_DRIVER_CONNECT,SQL_DRIVER_NOPROMPT;'"
connect using sqlca;
if sqlca.sqldbcode<>0 then
messagebox("Koneksi
Gagal", "Koneksi ke Server Gagal",stopsign!)
halt
close
else
open(w_login)
end if