datagrid的datasourse错在哪里？？？

Question

rscourse.Open "select * from 名片表 where ...", cnn1, adOpenDynamic, adLockOptimistic, adCmdTable

Answer 1

try 
rscourse.Open "名片表", cnn1, adOpenDynamic, adLockOptimistic

Answer 2

Dim cnn1 As ADODB.Connection
Dim rscourse As ADODB.Recordset
Set cnn1 = New ADODB.Connection
cnn1.Provider = "microsoft.jet.oledb.4.0"
con1.CursorLocation = adUseClient  '这一句容易忽略
cnn1.Open "D:\Documents and Settings\luyu\My Documents\vb\毕业设计\通讯录97.mdb"
Set rscourse = New ADODB.Recordset
rscourse.Open "名片表", cnn1, adOpenDynamic, adLockOptimistic, adCmdTable
Set DataGrid1.DataSource = rscourse

Answer 3

要加上一句：con1.CursorLocation = adUseClient'将游标设置为客户端