用别的方法吧,用报表控件调用EXECEL

解决方案 »

  1.   

    欢迎访问 Http://microinfo.top263.net
    这里有 DataReport 全面解决方案!直 接 Requery 一 下 就 可 以 了 。 
        Private Sub DataReport_Initialize() 
         DataEnvironment1.rsCommand1.Requery 
        End Sub Requery方 法 ! 
        也 可 以 直 接 使 用 ADODB.Recordset!不 使 用 DataEnvironment!例 : 
        ... 
         public adoRecordsetX as ADODB.Recordset 
        ... 
         
         Private Sub DataReport_Initialize() 
         adoRecordsetX.Requery 
         Set DataReport1.DataSource = adoRecordsetX '设 置 DataReport 的 数 据 源 
         ... 
         '绑 定 某 字 段 
         Me.Sections.Item("Section1").Controls.Item("text1").DataField=adoRecordsetX.Fields.Item(0).Name 
         ... 
         End Sub