Pages

Sunday, May 9, 2010

Koneksi VFP 9.0 ke Database MySQL via coding

Pertama-tama bingung juga mau nulis apa tentang Visual Foxpro disini, sampai akhirnya nyoba yang simple aja deh koneksi Foxpro ke Database MySQL, semoga berguna buat kita semua.
berikut source codenya :

SQLSETPROP(0,"DispLogin",3)
konek = "DRIVER={MySQL ODBC 3.51 Driver};server=&alamatkompserver;database=&namadatabase;uid=&namauser;pwd=&passdatabase;PORT=3306;OPTION=3;STMT=;"

PUBLIC gnConnHandle
gnConnHandle = SQLSTRINGCONNECT(konek)

IF gnConnHandle <0
MESSAGEBOX("Koneksi ke database gagal ",16,"Informasi")
CLEAR EVENTS
CLOSE ALL
QUIT
ELSE
WAIT WINDOW NOWAIT '"Koneksi ke Server, . . . . Sukses"'
ENDIF

oh iya kalau menggunakan ODBC MySQLnya bukan yang versi 3.51 tinggal ganti aja listing yang DRIVER={MySQL ODBC 3.51 Driver}; sesuai dengan odbc yang anda di pakai.

No comments: