【请教】如何将CListCtrl中的数据导出至excel中? 请教高手,如何将CListCtrl中的数据导出至excel中?能否给点文章参考一下,谢谢了~ 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在网上看到一篇帖子如下:///////////////////////////////////////////////////////////////////////////////// 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); }}其中可能有一些错误,我在后面标出来了,请高手帮忙解释一下,谢谢~ Commbox控件消息问题 CTreeCtrl有什么办法获得这个节点是否点击过呢? windows vista 下的开发方法有没有大的改变,能不能和sdk vc6 mfc兼容? Microsoft Visual Studio 6.0 开发环境有没有这样的功能 问一个简单的问题:无法链接的外部符号 有关多文档,视... 如何给一个CEdit设置10号的宋体?谢谢 我有问题要请问各位好朋友? 新手上路:如何给按钮和title上加图标? 在线等待,视图中心定位的问题 请教tab控件嵌套问题 ACSII十六进制字符与字符转换问题
// 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);
}
}其中可能有一些错误,我在后面标出来了,请高手帮忙解释一下,谢谢~