DEVLOPER 1
DEVLOPER
noisiv 1
noisiv
Manwe Work 1
Manwe Work
mavzermete 1
mavzermete
darkbey42 1
darkbey42
xranzei 1
xranzei
Bvural41 1
Bvural41
PrimeAC 1
PrimeAC
Payidar2 1
Payidar2
Fethi Polat 1
Fethi Polat
Wizard' 1
Wizard'
shrpnl 1
shrpnl
Hikaye Ekle

Şifreli veritabanına baglanma

  • Konuyu başlatan Konuyu başlatan ßyMesMes
  • Başlangıç tarihi Başlangıç tarihi
  • Cevaplar Cevaplar 7
  • Görüntüleme Görüntüleme 1K

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

Şifreli Veritabanına Bağlanma

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
 

Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)

Geri
Üst