Skip to main content

AccessTr.neT


Şifreli Veritabanına Bağlanma

chopper07
chopper07
11
12528

Şifreli Veritabanına Bağlanma

#7
hocam, data nesnesi kullandıgımız şifreli veritabanına nasıl bağlanabiliriz.
<<< 10-HAGİ-10 >>>
Cevapla
#8
(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
.zip VB6.zip (Dosya Boyutu: 22,84 KB | İndirme Sayısı: 13)
Cevapla
#9
VB 6 Yok bende ancak vb Net te şu şekilde kendinize uyarlayın 

conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\user\Desktop\XXXX.mdb; Jet OLEDB: Database Password ='123456';")
Cevapla
#10
(22/05/2016, 15:35)C*e*l*o*y*c*e yazdı: VB 6 Yok bende ancak vb Net te şu şekilde kendinize uyarlayın 

conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\user\Desktop\XXXX.mdb; Jet OLEDB: Database Password ='123456';")

Option Explicit
Dim cn As New ADODB.Connection
Private Sub Form_Load()
conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\user\Oktay\Veritabanı.mdb; Jet OLEDB: Database Password ='p1a9r7k4er';")
End Sub

denedim olmadı.
Private Sub Form_Load()
conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\user\Oktay\Veritabanı.mdb; Jet OLEDB: Database Password ='p1a9r7k4er';") 
End Sub

denedim olmadı.
Private Sub Form_Load()

conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Oktay\Veritabanı.mdb; Jet OLEDB: Database Password ='p1a9r7k4er';") 

denedim gene olmadı hocam 
Compile Eror : Syntax eror hatası aldım.

genede ilgilendiniz ve bilgi sundunuz için teşekkür ederim.
Cevapla
#11
merhaba.

accdb bağlantısında aynı mı?
Cevapla
#12
(06/05/2020, 10:17)cozum yazdı: merhaba.

accdb bağlantısında aynı mı?
accdb .2007 ve daha sonrasında kullaniilir  
"Provider=Microsoft.Jet.OLEDB.4.0;Data  burası değişir  12:00 olur internetten arastirabilirsin
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task