欢迎来到天天文库
浏览记录
ID:38104979
大小:18.52 KB
页数:8页
时间:2019-06-06
《CListCtrl打印,导出到excel》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、/*****************************************************************************************// 参数:// pList 需要导出的List控件指针// strTitle 导出的数据表标题// 说明:// 导出CListCtrl控件的全部数据到Excel文件。Excel文件名由用户通过“另存为”// 对话框输入指定。创建名为strTitle的工作表,将List控件内的所有数据(包括// 列名和数据项)以文本的形式保存到Excel工作表中。保持行列关系。/**************
2、***************************************************************************/voidExportListToExcel(CListCtrl*pList,CStringstrTitle){ CStringwarningStr; if(pList->GetItemCount()>0){ CDatabasedatabase; CStringsDriver; CStringsExcelFile; CStringsSql; CStringtableName=strTitle; //检索是否安装有
3、Excel驱动"MicrosoftExcelDriver(*.xls)" sDriver=GetExcelDriver(); if(sDriver.IsEmpty()) { //没有发现Excel驱动 AfxMessageBox("没有安装Excel!/n请先安装Excel软件才能使用导出功能!"); return; } ///默认文件名 if(!GetDefaultXlsFileName(sExcelFile)) return; //创建进行存取的字符串 sSql.Format("DRIVER={%s};DSN='';FIRSTROWH
4、ASNAMES=1;READONLY=FALSE;CREATE_DB=/"%s/";DBQ=%s",sDriver,sExcelFile,sExcelFile); //创建数据库(既Excel表格文件) if(database.OpenEx(sSql,CDatabase::noOdbcDialog)) { //创建表结构 inti; LVCOLUMNcolumnData; CStringcolumnName; intcolumnNum=0; CStringstrH; CStringstrV; sSql=""; strH=""; c
5、olumnData.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+"
6、"; } columnName.ReleaseBuffer(); columnNum=i; sSql="CREATETABLE"+tableName+"("+sSql+ ")"; database.ExecuteSQL(sSql); //插入数据项 intnItemIndex; for(nItemIndex=0;nItemIndexGetItemCount();nItemIndex++){ strV=""; for(i=0;i7、strV=strV+","; } strV=strV+"'"+pList->GetItemText(nItemIndex,i)+"'"; } sSql="INSERTINTO"+tableName +"("+strH+")" +"VALUES("+strV+")"; database.ExecuteSQL(sSql); } } //关闭数据库 database.Close(); w
7、strV=strV+","; } strV=strV+"'"+pList->GetItemText(nItemIndex,i)+"'"; } sSql="INSERTINTO"+tableName +"("+strH+")" +"VALUES("+strV+")"; database.ExecuteSQL(sSql); } } //关闭数据库 database.Close(); w
此文档下载收益归作者所有