0sk1 Posted November 26, 2008 Share Posted November 26, 2008 şimdi arkadaşlar dim conn As New ADODB.Connectiondim rst As New ADODB.RecordsetPublic Sub baglan()On Error Resume NextWith conn.CursorLocation = adUseClient.ConnectionString = "Provider=SQLOLEDB;Data Source='127.0.0.1,1433';Network Library=DBMSSOCN;Initial Catalog='server';User ID='server';Password='server';".OpenEnd WithExit Subhata:MsgBox "Bağlantı sağlanılamadı!..", vbCriticalEndEnd SubPrivate Sub Form_Load()baglanEnd Sub[/CODE]Bu kod ile bağlanıyorum normal kendi localden ama arkadas ta baglanıcak onun için Data Source='127.0.0.1,1433'kısmındaki 127.0.0.1 yerine ip adresimi yazıyorum bağlanmıyor 1433 UDP açık.. Bu bana lazım okul projesi için bu sorun çözülmeden bir yere gidemiyorum..ADODC nesnesi ekli ... Link to comment Share on other sites More sharing options...
Administrator sk8er_boi Posted November 26, 2008 Administrator Share Posted November 26, 2008 Windows firewall açık mı? Link to comment Share on other sites More sharing options...
esmer1881 Posted November 26, 2008 Share Posted November 26, 2008 arkadaşım sanırım asp ile ugraşıyorsun veya VB c# bir örnek veriyorum.Kullanıcı adı ve şifreyi bir veya bir kaç kişi kullanmak istiyorsa bu şekilde yap. static string constr = "data source=localhost;initial catalog=deneme;integrated security=sspi"; Projene yardım etmek isterim.Ama inan ki şu sıralar kendimde değillim. Link to comment Share on other sites More sharing options...
0sk1 Posted November 26, 2008 Author Share Posted November 26, 2008 Firewall açık ama özel izinler kısmına 1433 Sql Server UDP olarak ekledim.. Link to comment Share on other sites More sharing options...
Administrator sk8er_boi Posted November 26, 2008 Administrator Share Posted November 26, 2008 TCP olarak ta ekle Link to comment Share on other sites More sharing options...
Recommended Posts
Archived
This topic is now archived and is closed to further replies.