مشكلة في سكيورتي لداتا بيس ؟؟؟

سلام عليكم

أنا واضع باسوورد في داتا بيس

ولما أدخل عليها أعمل بحث فيها

بطلعلي invalid password

شو حل ؟؟

هاي كود

  Try

Dim currfolder As String = CurDir.ToString

Dim conn As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & currfolder & "\sewr.mdb")

Dim ds As New DataSet

Dim comm As New OleDbCommand

Dim da As New OleDbDataAdapter

comm.CommandText = "select * from [f17] where [Field9] like '%" & TextBox3.Text & "%' "

comm.Connection = conn

comm.CommandType = CommandType.Text

da.SelectCommand = comm

conn.Open()

da.Fill(ds)

conn.Close()

F17DataGridView.DataSource = ds

F17DataGridView.DataMember = ds.Tables(0).TableName

Catch ex As Exception

MessageBox.Show(ex.Message)

End Try