导出CListCtrl控件到Excel文件

核心提示：CListCtrl获得列的属性可以使用BOOL CListCtrl::GetColumn( int nCol, LVCOLUMN* pColumn )，nCol为需要获得获得属性值的列序号，导出CListCtrl控件到Excel文件，pColumn 为 LVCOLUMN 结构体的指针，LVCOLUMN结构体中的 UIN

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

使用这个函数的主要问题是主要问题期望返回 LVCF_TEXT ，设置了 pszText 却没有设置 cchTextMax 变量，并且通常都在分配 LVCOLUMN 结构体空间时将所分配的内存清0，因此总是不能返回列名。反而是没有清0所分配空间，直接设置 mask 为 LVCF_TEXT ，那么可能可以获得列名的值。当然只要正确设置 pszText 和 cchTextMax 就不会有这些问题。

还有一个问题是列的数量。没有直接的函数可以获得列的数量，只能从0开始不断自增 nCol 的值，判断 GetColumn( nCol,pColumn ) 的返回值是否为 False 以计算列的数量。

一封装好的导出CListCtrl数据函数如下：///////////////////////////////////////////////////////////////////////////////
//　　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!
请先安装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);
　　}
}

欢迎到 来讨论VC 、.net、.net moblie、图形图像等的编程与开发。

本文配套源码