(25/11/2008, 19:04)chopper07 yazdı: burada şifresi "123456" olan "Password" adındaki Access veri tabanımıza bağlanıyoruz.

Kod:

Option Explicit
Dim cn As New ADODB.Connection
Private Sub Form_Load( )
cn.Provider = "Microsoft Jet 4.0 OLE DB Provider"
cn.ConnectionString = "Data Source=" & App.path & "\Password.mdb"
cn.Properties("Jet OLEDBatabase Password" ) = "123456"
cn.Open
End Sub

Sayın Hocam sizlerin yardımı ile vb6 da ufak bir program hazırlamaya çalışıyorum.
vb6 da hazırlamaya çalıştığım Programda Veritabanı olarak Access 2003 (Mdb) Kullanacağım ve bu veri tabanı " C" de Oktay Klasörünün içinde Veribanı.Mdb olarak bağlanacak çok araştırdım fakat bir türlü bu konuda doyurucu bilgiye ulaşamadım ve bir türlü yapamadım. Ek'te gönderdiğim proje ye bir göz atar ve bilgi verirseniz sevinirim.
Değerli Hocam bir de özelden size değilde Vb6 bölümünde Konu olarak açmak isterdim ama bir türlü konu açma sekmesini (bölümünü) bulamadım.Hürmet ve Saygılarımla.Oktay