本帖最后由 ctp_119 于 2013-10-21 09:58 编辑
所谓的前期绑定是指手工勾选添加引用文件,具体操作步骤是选择VBE菜单中的工具->引用,勾选“MicrosoftActiveX Data Object 2.8 Library”。而后期绑定是指用CreateObject函数来创建对象实例,如:Set Cnn=CreateObject("adodb.connection"); Set rst=CreateObject("adodb.recordset") 优缺点: 前期绑定优点是绑定后,在编写代码时,自动列示该对象的方法和属性;能检查更多的代码语法错误和拼写错误;执行效率更快。缺点是不可更新COM类型库的版本。相反,后期绑定可以自动检测当前版本,自动创建。二者相互补充,选择哪种绑定,看各自需求。 ① 期绑定法(实例) Option Explicit Sub 前期绑定() Dim cnn As NewADODB.Connection Dim rst As NewADODB.Recordset Dim i As Integer Dim sql As String Columns("F:I").Clear cnn.Open"Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties='Excel12.0;Hdr=Yes';Data Source=" & ThisWorkbook.FullName sql = "select* from [Sheet1$] where 客户名称='韩正'" Set rst =cnn.Execute(sql) [F2].CopyFromRecordsetrst For i = 0 Torst.Fields.Count - 1 Cells(1, i + 6) = rst.Fields(i).Name Next i End Sub |