星科吧 关注:19贴子:135
  • 3回复贴,共1

导出CListCtrl控件到Excel文件

只看楼主收藏回复

CListCtrl获得列的属性可以使用BOOL CListCtrl::GetColumn( int nCol, LVCOLUMN* pColumn ),nCol为需要获得获得属性值的列序号,pColumn 为 LVCOLUMN 结构体的指针。LVCOLUMN结构体中的 UINT mask 作为输入,决定返回哪些属性的值,如果 mask 的值包含 LVCF_TEXT ,则需要将字符串缓存的首地址指针置入结构体中的 LPTSTR pszText; 变量,缓存大小置入 int cchTextMax; 变量。


1楼2013-03-07 08:48回复

    使用这个函数的主要问题是主要问题期望返回 LVCF_TEXT ,设置了 pszText 却没有设置 cchTextMax 变量,并且通常都在分配 LVCOLUMN 结构体空间时将所分配的内存清0,因此总是不能返回列名。反而是没有清0所分配空间,直接设置 mask 为 LVCF_TEXT ,那么可能可以获得列名的值。当然只要正确设置 pszText 和 cchTextMax 就不会有这些问题。
    还有一个问题是列的数量。没有直接的函数可以获得列的数量,只能从0开始不断自增 nCol 的值,判断 GetColumn( nCol,pColumn ) 的返回值是否为 False 以计算列的数量。
    一封装好的导出CListCtrl数据函数如下:


    2楼2013-03-07 08:49
    回复
      /////////////////////////////////////////////////////////////////
      //void GetExcelDriver(CListCtrl* pList, CString strTitle)
      //参数:
      //pList需要导出的List控件指针
      //strTitle导出的数据表标题
      //说明:
      //导出CListCtrl控件的全部数据到Excel文件。Excel文件名由用户通过“另存为”
      //对话框输入指定。创建名为strTitle的工作表,将List控件内的所有数据(包括
      //列名和数据项)以文本的形式保存到Excel工作表中。保持行列关系。
      //
      //edit by [r]@dotlive.cnblogs.com
      ////////////////////////////////////////////////////////////////
      void ExportListToExcel(CListCtrl* pList, CString strTitle)
      {
      CString warningStr;
      if (pList->GetItemCount ()>0) {
      CDatabase database;
      CString sDriver;
      CString sExcelFile;
      CString sSql;
      CString tableName = strTitle;
      // 检索是否安装有Excel驱动 "Microsoft Excel Driver (*.xls)"
      sDriver = GetExcelDriver();
      if (sDriver.IsEmpty())
      {
      // 没有发现Excel驱动
      AfxMessageBox("没有安装Excel!\n请先安装Excel软件才能使用导出功能!");
      return;
      }
      ///默认文件名
      if (!GetDefaultXlsFileName(sExcelFile))
      return;
      // 创建进行存取的字符串
      sSql.Format("DRIVER={%s};DSN='''';FIRSTROWHASNAMES=1;
      READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s",sDriver,
      sExcelFile, sExcelFile);
      // 创建数据库 (既Excel表格文件)
      if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
      {
      // 创建表结构
      int i;
      LVCOLUMN columnData;
      CString columnName;
      int columnNum = 0;
      CString strH;
      CString strV;
      sSql = "";
      strH = "";
      columnData.mask = LVCF_TEXT;
      columnData.cchTextMax =100;
      columnData.pszText = columnName.GetBuffer (100);
      for(i=0;pList->GetColumn(i,&columnData);i++)
      {
      if (i!=0)
      {
      sSql = sSql + ", " ;
      strH = strH + ", " ;
      }
      sSql = sSql + " " + columnData.pszText +" TEXT";
      strH = strH + " " + columnData.pszText +" ";
      }
      columnName.ReleaseBuffer ();
      columnNum = i;
      sSql = "CREATE TABLE " + tableName + " ( " + sSql + " ) ";
      database.ExecuteSQL(sSql);
      // 插入数据项
      int nItemIndex;
      for (nItemIndex=0;nItemIndexGetItemCount ();nItemIndex++){
      strV = "";
      for(i=0;iGetItemText(nItemIndex,i) +"'' ";
      }
      sSql = "INSERT INTO "+ tableName
      +" ("+ strH + ")"
      +" VALUES("+ strV + ")";
      database.ExecuteSQL(sSql);
      }
      }
      // 关闭数据库
      database.Close();
      warningStr.Format("导出文件保存于%s!",sExcelFile);
      AfxMessageBox(warningStr);
      }
      }


      3楼2013-03-07 08:50
      回复
        文章出处为:
        http://www.vckbase.com/index.php/wv/1395


        4楼2013-03-07 08:50
        回复