Kalau dari promptnya (mysqlc.exe), nggak ada masalah. Masalahnya baru ada saat query tsb masuk ke VB.
'Option Connection' itu yg pada fungsi 'OpenDatabase' kan? Saya pernah nyoba option=1, 2, 3 dan 16387, tapi nggak pengaruh. Ohya, MySQLnya versi 4.0.18 dan MyODBC 3.51.11-2. Ada saran lain? -- Eddy S. Wibowo --- In [email protected], "Aidil" <[EMAIL PROTECTED]> wrote: > COBA printah-perintah Query yang anda gunakan langusng ditest pada dot > prompt dari Mysql, kalau ternyata bisa berlaku ini berarti bukan pada > mysqlnya tapi pada Option Connection anda yang mungkin harus di check lagi > > > ----- Original Message ----- > From: "Eddy Wibowo" <[EMAIL PROTECTED]> > To: <[email protected]> > Sent: 14 September, 2005 11:19 PM > Subject: [Programmer-VB] Problem ADO dan MySQL > > > > Rekan2, > > > > Saya membuat program VB dgn ADO dan database MySQL. Problemnya, > > pada SQL, fungsi2 seperti 'dayofmonth' dan 'date_format' kok nggak > > dikenali ya. Pesan errornya seperti "undefined > > function 'date_format' in expression". Saat run, langsung error > > pada baris OpenRecordset. Kodenya seperti di bawah. > > > > Ada saran? > > > > -- > > Eddy S. Wibowo > > > > > > > > > > > > Option Explicit > > Const NAMA_KONEKSI = "coba" > > Const PARAM_KONEKSI = "odbc;database=pingpong;uid=root" > > > > Private Sub Command1_Click() > > Dim db As Database > > Set db = bukaKoneksi > > > > Dim rs As Recordset > > Set rs = db.OpenRecordset("select * from ajb_tmlogajuan where > > dayofmonth(tglkeputusan)='20'") > > Do While Not rs.EOF > > Debug.Print rs!nopengajuan, rs!tglkeputusan > > rs.MoveNext > > Loop > > > > rs.Close > > db.Close > > Set rs = Nothing > > Set db = Nothing > > End Sub > > > > Private Function bukaKoneksi() As Database > > Set bukaKoneksi = OpenDatabase(NAMA_KONEKSI, dbDriverComplete, > > False, PARAM_KONEKSI) > > End Function ------------------------ Yahoo! Groups Sponsor --------------------~--> Fair play? Video games influencing politics. Click and talk back! http://us.click.yahoo.com/T8sf5C/tzNLAA/TtwFAA/k7folB/TM --------------------------------------------------------------------~-> Untuk keluar dari millis ini, kirim email kosong ke: [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/Programmer-VB/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
