Dim MyConn As ObjectPrivate Sub ConnectDB()Set MyConn = CreateObject("ADODB.Connection") ----->创建连接对象Set 你的当前访问异常,请进行认证后继续阅读剩余内容。 提交