vb数据库的问题

Question

Dim conn As ADODB.Connection
Dim rs As ADODB.RecordsetPrivate Sub Form_Load()
Dim l As String
Dim sql As String
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.Open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =F:\scores.mdb; pwd=q1"
sql = "select * from 成绩"
conn.Execute sql
'DataGrid1.DataSource = conn
rs.CursorLocation = adUseClient
rs.Open sql, conn, adOpenDynamic, adLockBatchOptimistic
Set DataGrid1.DataSource = rs
End Sub
‘我的数据库的密码是q1
'可是出现“找不到可安装的ISAM”的错误
还有，我想请教一下各位高手，有没有学习vb数据库好的教材，或地址
也可发到 谢谢了 

Answer 1

with conn
    .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=f:\scores.mdb;Jet OLEDB:Database Password=q1"
    .Open
    .CommandTimeout = 0
End With

Answer 2

conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\scores.mdb;User Id=admin;Password=q1;"

Answer 3

或者数据库密码用 1 楼的 Jet OLEDB:Database Password= 方式。