弱弱的问句 VB6.0跟ACCESS 2003怎么连接？

第一次用VB6+ACCESS2003做个小东西，但以ADO方式连接的时候总提示  实时错误‘3704’ 对象关闭时 不允许操作
我打了SP6的补丁还是不行 这个问题憋两天了还没解决了，希望大大给个解决方法 最好带代码 小弟拜谢了

//这是public module里面的东西
Option Explicit
Public dbConn As New ADODB.Connection
Public loginOK As Boolean
Sub Main()
    If ConnectToDatabase = False Then
        MsgBox "连接数据库出错！"       
        End
    End If
    loginOK = False
    If loginOK Then
        formDesign.Show
    End If
End Sub

' 连接到数据库
Function ConnectToDatabase() As Boolean
    On Error GoTo ERR_CONN
    ' 设置服务器名称，数据库名称，登录名(此时假设密码为空)
  dbConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= D:\我的文档\db1.mdb ;Persist Security Info=False"
    dbConn.Open
    ConnectToDatabase = True
    Exit Function
ERR_CONN:
    ConnectToDatabase = False
End Function

Dim strSql As String
//...

strSql = "Insert into design (型号，日期，客户,..)" //该句太长 就没打出来了
dbConn.Execute strSql //这句这