نحوه دسترسی به بانک داده اکسسی که رمز داره! [بایگانی]

p30graph3

سه شنبه 19 بهمن 1389, 20:14 عصر

سلام

من برنامه ای ساختم با بانک داده اکسس

همه چیز خوبه ولی الان که برای دیتابیس پسورد گذاشتم از طریق خود اکسس، برنامه با مشکل مواجه شده

من با کد زیر با بانک داده ارتباط برقرار کردم

Dim DBPath As String
DBPath = App.Path & "\db\testdb.mdb"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath
Adodc1.CommandType = adCmdTable
Adodc1.RecordSource = "Table1"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1

فرض کنید پسورد دیتابیس 123 هست چطور باید کدو تغیر بدم که برنامه دیتابیس رو باز کنه و مشکلی پیش نیاد؟:اشتباه:

p30graph3

سه شنبه 19 بهمن 1389, 20:54 عصر

حودم حلش کردم باید خط سوم اینطوری بشه:

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath & "; Persist Security Info=False;Jet OLEDB:Database Password = 123"

فرض اینه که پسورد 123 هست