Başka bilgisayardan mysql erişim

[merakli_72]

Arkadaşlar selam,
Kendi bilgisayarımda mysql ve wamp server kurulu aşağıdaki kodlar ile kendi bilgisayarımdan sorunsuz olarak mysql bağlanabiliyorum.
peki ağ üzerindeki diğer bilgisayarların benim bilgisayarımdaki mysql bağlanabilmesi için kodları nasıl revize etmeliyim



SERVER=xx.yy.zzz.vv (bilgisayarımın ipsi)
SERVER=//xx.yy.zzz.vv
SERVER=//xx.yy.zzz.vv/localhost

şeklindeki yazımlar işe yaramadı
NOT: ilgili bilgisayarda MySQL ODBC 3.51 Driver kurulu

sub ConnectmySQL(sql as string)

Dim oConn As ADODB.Connection
Dim rs As ADODB.Recordset



Set oConn = New ADODB.Connection
oConn.Open "DRIVER={MySQL ODBC 3.51 Driver}; " _
& "SERVER=localhost; Stmt=SET NAMES 'latin5';" _
& "DATABASE=krfhed; UID=root;PWD=;option=3"

Set rs = oConn.Execute(sQl)

End sub

 

[denemetor]

MySQL sadece yereli dinliyor olabilir. Ayar dosyasindan disariyi dinleyecek sekilde degistirdikten sonra genelde 3306 numarali olan porta istek yapmalisiniz.

 

[merakli_72]

merhaba,
öncelikle cevabınız için teşekkür ederim,
fakat konu hakkında çok yeniyim
bilgim yok denecek kadar az,
bunun nasıl olacağı konusunda daha ayrıntılı açıklama yapabilirmisiniz.

Teşekkürler

 

[denemetor]

Windows altinda hic MySQL kullanmadim ama Linux sistemlerde /etc/mysql dizini altinda my.cnf diye bir dosya olur. Bu dosya ilk kurulumda genelde 127.0.0.1 yani localhost'u dinleyecek sekilde birakilir. (bind address opsiyonu) Sizin bu PC disindan MySQL'e ulasmak icin o ayari eger localhost'u dinleyecek sekilde ayarliysa degistirmeniz gerekir. Ornegin 0.0.0.0 yaparsaniz butun gelen baglantilari dinler.

 

[merakli_72]

Tekrar teşekkür ederim,
ilgili satırı buldum
değiştirdim

şimdi diğer bir bilgisayardan
http://xx.yy.x.aaa/phpmyadmin/
yazarak mysql ulaşabiliyorum

fakat
aşağıdaki fonksiyonda localhost yerine ne yazmam gerektiğini bulamadım,
bu konuda da yardımcı olabilirmisiniz



Function ConnectmySQL()

Dim oConn As ADODB.Connection
Dim rs As ADODB.Recordset



Set oConn = New ADODB.Connection
oConn.Open "DRIVER={MySQL ODBC 3.51 Driver}; " _
& "SERVER=localhost; Stmt=SET NAMES 'latin5';" _
& "Port=3306;DATABASE=krfhed; UID=root;PWD=;option=3"

Set rs = oConn.Execute("select * from iethem12")

Cells.Clear
Range("A1").CopyFromRecordset rs

End Function

 

[denemetor]

localhost dedigi yeri MySQL sunucuyu calistiran bilgisayarin IP adresi ile degistirirseniz olur saniyorum.