MySQL LocalHost... İçeri Bak

[RevengeN]

Merhaba.

Visual Basic 6.0'da MySQL bağlı bir üyelik sistemi yaptım. Gayet sorunsuz çalışıyor. MySQL LocalHost olarak ayarladım. Ama bu programımı bir başka bilgisayarda çalıştırsam, adam orada üye olmak falan isterse MySQL localhost olduğu için hata verirmi? Vermemesi için ne yapmam gerekiyor? Port açtım modemde. Ama nerede kullanıcam bunu?

 

[RevengeN]

@Güncel.

 

[OxMaNiA]

Dostum sen olayı çok yanlış anlamışsın. İnternetten bir mysql sunucusu yada website açman gerek.Yada bedava bu hizmeti yapan sistemler var.Oralara üye ol.sana mysql bilgileri felan verirler.Onları girmen lazım.Sen localde çalıştığın için sadece senin bilgisayarında çalışır!

 

[RevengeN]

Dostum sen olayı çok yanlış anlamışsın. İnternetten bir mysql sunucusu yada website açman gerek.Yada bedava bu hizmeti yapan sistemler var.Oralara üye ol.sana mysql bilgileri felan verirler.Onları girmen lazım.Sen localde çalıştığın için sadece senin bilgisayarında çalışır!

Hm. Tamam sanırım bende o da vardı. Hostinger dan bir web site açmıştım. Orada MySQL bilgileri falanda vermişti. Onları VB6 entegre edersem çalışırmı dersin?

 

[OxMaNiA]

Hm. Tamam sanırım bende o da vardı. Hostinger dan bir web site açmıştım. Orada MySQL bilgileri falanda vermişti. Onları VB6 entegre edersem çalışırmı dersin?

Aynen öyle birde öyle denemelisin.

 

[RevengeN]

Ve bu işte için umarım port açmaya gerek yokktur? Port açmayı biliyorum fakat Modemi arayüz şifresini değiştirmişler. Binanın ortak modemi. Reset de atamıyorum

 

[RevengeN]

Kardeşim Hostiner'da hesabımda bir mysql veritabanı açtım. Fakat programı çalıştırdığımda şu hatayı veriyor;

[MYSQL][ODBC 3.51 Driver] Can't connect to MySQL server on 'mysql.hostinger.web.tr' (10060)

Sebebi ne olabilir? Bağlantı kodumda şöyle:

Public cn As ADODB.Connection
Public rs As ADODB.Recordset
Sub main()
Set cn = New ADODB.Connection
cn.ConnectionString = "Driver={Mysql ODBC 3.51 Driver}; Server=mysql.hostinger.web.tr;port=3306; database=DATABASE Adı; user=Kullanıcı ADI; password=Şifre; option=3;"
cn.Open
If cn.State = adStateOpen Then
MsgBox "Connected"
End If
Form1.Show
End Sub


Bunu bir modüle yazdım.

 

[OxMaNiA]

Database adini. Kullanici adini felan yazdn demi

 

[RevengeN]

Database adini. Kullanici adini felan yazdn demi

evet. Tabii kide yazdım. Ama işte. F5 basınca o hatayı veriyor. Lütfen çok lazım birşey.

 

[Manasdas]

hostinger ücretsiz versiyonunda veritabanına uzaktan erişime izin vermiyor.

 

[RevengeN]

hostinger ücretsiz versiyonunda veritabanına uzaktan erişime izin vermiyor.

Peki önerebileceğin Hosting varmı?