ma kasi mas Eris Riso atas saran & bantuannya, sekarang udah bisa kok. Nanti klo ada masalah lgi aq tanya2 lagi ya...
ERIS RISO wrote: > > Coba ganti user nya menjadi "root" dan passwordnya kosongin, tapi ga jamin > bisa tergantung pas instalasinya gimana > > _____ > > From: [email protected] > <mailto:indoprog-vb%40yahoogroups.com> > [mailto:[email protected] > <mailto:indoprog-vb%40yahoogroups.com>] On > Behalf Of Wahyu D S S > Sent: 15 Desember 2006 14:49 > To: [email protected] <mailto:indoprog-vb%40yahoogroups.com> > Subject: [indoprog-vb] DB MySQL dengan VB > > Dear, > > Halo kawan2 mohon bantuan dan pencerahannya. Gini aq lgi buat program > dengan menggunakan database MySql, aq sudah download & install driver > untuk ODBC nya, nah sewaktu aq mau execute programnya keluar error > seperti ini : > *"Run-time error '-2147467259 (80004005)' : [MySQL][MyODBC > 5.00.10][MySQL] 1045 Access denied for user 'test'@'localhost' (using > password: NO)" > *nah untuk listing koneksinya seperti ini : > > Option Explicit > Dim db_name As String > Dim db_server As String > Dim db_port As String > Dim db_user As String > Dim db_pass As String > Dim strConnect As String > Public MyConn As New ADODB.Connection > > Public Sub OpenDB() > db_name = "test" > db_server = "localhost" > db_port = "3306" > db_user = "test" > db_pass = "123456" > strConnect = "Provider=MSDASQL. 1;Password= ;Persist Security > Info=True;User ID=;Extended Properties=" & Chr$(34) & "DRIVER={MySQL > Connector/ODBC v5};DESC= ;DATABASE= " & db_name & ";SERVER=" & db_server > & ";UID=" & db_user & ";PASSWORD=" & db_pass & ";PORT=" & db_port & > ";OPTION=16387; STMT=;" & Chr$(34) > MyConn.ConnectionString = strConnect > MyConn.CursorLocation = adUseClient > MyConn.Open > End Sub > > Sewaktu aq coba di Database MySQL nya si gak masalah, aq test koneksinya > bisa. Nah waktu jalan di VBnya error. Mohon bantuannya kepada suhu2 & > master VB. Terima Kasih. > > > [Non-text portions of this message have been removed] > >
