Koneksi MySQL to vfp

Subyek: Koneksi MySQL to vfp Sun Jun 08, 2008 8:42 pm

Sekarang banyak orang yang memilih membuat database menggunakan MySQL. Banyak cara melakukan koneksi vfp ke MySQL, salah satunya yaitu dengan menggunakan ODBC.
Sebelumnya setting koneksi ODBC pada control panel windows, administrative tools, Data Source (ODBC), kemudian lakukan setting ODBC pada tab System DSN/User DSN.
Berikut adalah bentuk form koneksi :

Pada Form buat :
Property :
sql_cur (none)
koneksi (none)

Code:: Method
pertama
THISFORM.dbase.VALUE=" "
THISFORM.username.VALUE=" "
THISFORM.passwd.VALUE=" "
THISFORM.REFRESH
thisform.dbase.SetFocus

Connect.Click
zdbase=ALLTRIM(thisform.dbase.Value)
zuser=ALLTRIM(thisform.username.Value)
zpass=ALLTRIM(thisform.passwd.Value)

msql = "DATABASE="+zdbase+";SERVER=localhost;port=3306;UID="+zuser+";PWD="+zpass+";provider=MSDASQLR;DRIVER={MySQL ODBC 3.51 Driver};"
THISFORM.Koneksi = SQLSTRINGCONNECT( msql )
IF THISFORM.Koneksi <= 0
=MESSAGEBOX("Koneksi Gagal", 0+16, "Konfirmasi")
ELSE
=MESSAGEBOX("Koneksi Berhasil", 0+64, "Konfirmasi")
ENDIF
THISFORM.sql_cur = "QT"+SUBSTR(SYS(2015), 5)

thisform.pertama()
koneksi = thisform.koneksi
sql_cur=thisform.sql_cur
thisform.Release

Batal.click
thisform.Release

Cara Lain :

Code:: procedure sql_cur
parameters msql, mnama_cur
mdodol=sqlconnect("namadb","","")

if mdodol<=0 then
Messagebox("Gagal Melakukan Koneksi Ke server"+chr(13)+;
"(Server Tidak Online)",16,"Informasi")
quit

else
mhasil=sqlexec(mdodol,msql,mnama_cur)
if mhasil=-1 then
sqlrollback(mdodol)
messagebox("Terjadinya error transfer data. "+;
"Start program ini lagi!"+msql)
endif
sqldisconnect(mdodol)
endif
endproc

Selamat mencoba, semoga bermanfaat... thumbs up

Subyek: Re: Koneksi MySQL to vfp Mon Jun 09, 2008 12:07 am

Pak sangak.. mautanya nie kalu coding yang dibawah masukin dimana ya?? rock on !

Subyek: Re: Koneksi MySQL to vfp Tue Jun 10, 2008 2:57 pm

buat dia dalam program, kemudian simpan dengan nama apa aja (mis : sangak)
terus pada form untuk memanggil tuh prosedure buat coding :

msql="select from ......" atau
msql="insert into ...." dan lain2 sesuai query yang anda inginkan..
DO sangak WITH msql,"alias"

semoga membantu..
kalu memang anda sedang dalam proses pembuatan, jika ada kendala coba di sharing aja codingnya biar kita bahas bersama.. peace

Subyek: Re: Koneksi MySQL to vfp Thu Jun 26, 2008 5:38 pm

Pak sangak.. kalu MySQL n ODBC nya pake yang versi berapa??

Subyek: Re: Koneksi MySQL to vfp Fri Jun 27, 2008 5:15 pm

Kalu sample tsb saya menggunakan MySQL ver 3.23.47 (berada satu paket pada PHPTriad) dan ODBC 3.51..
tapi kalu mbak menggunakan versi lain bisa juga tinggal disesuaikan saja pada koneksi ODBC nya..
semoga membantu... thumbs up

Subyek: Re: Koneksi MySQL to vfp Sun Jul 06, 2008 12:32 am

#@$%$^$#%$^*&*^23#^456&$#*)*(*&^$#...;

Kepala ku dipenuhi code2 yg tak kumengerti mengapa dia ada...

Pusing... confused

Subyek: Re: Koneksi MySQL to vfp Tue Jul 29, 2008 4:31 pm

Minum bodrex aj mas vakoo..

Subyek: Re: Koneksi MySQL to vfp Mon Aug 04, 2008 11:44 am

pak sangak hebat ya...S-3 dimana pak??? Very Happy

buka les privat la pak...biar kami2 bisa blajar..biar kami pinter... Very Happy

Subyek: Re: Koneksi MySQL to vfp Mon Aug 04, 2008 11:55 am

pak sangak hebat ya...S-3 dimana pak??? Very Happy

buka les privat la pak...biar kami2 bisa blajar..biar kami pinter... Very Happy

Subyek: Re: Koneksi MySQL to vfp Mon Aug 04, 2008 2:44 pm

Mas soumy....

Double post tuh... tongue

» Encrypt vfp to MySQL
» E-Book Untuk belajar MySQL