将Excel数据以数据集方式打开，怎么会出现这种问题啊！急死了，请大虾帮忙，解决就结贴，汗汗汗！急急急！问题如下

Private Sub cmdxz_Click()
Dialog.DialogTitle = "选择文件"
Dialog.ShowOpen
Dim Filename As String
If Dialog.Filename <> "" Then
    Filename = Dialog.Filename
    
    cnXsl.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Filename & ";Extended Properties=Excel 8.0;Persist Security Info=true"
    cnXsl.CursorLocation = adUseClient
    Dim rst As New ADODB.Recordset
    rst.Open "T1", cnXsl, adOpenKeyset, adLockOptimistic
    If Not (rst.EOF And rst.BOF) Then
        Set Grid.Recordset = rst
   End If
    rst.Close
    cnXsl.Close
End If
End Sub
然后在rst时出现无效的sql语句为什么啊，我引用的是excel 9.0