vc保存clistctrl的内容到excel文件

最近做了个保单系统，需要一些功能，比如查询的记录保存到制定的位置：

1、网上很多操作方式，很少可行，受不了于是乎，我自己研究了。

2、使用csv格式保存呗，使用windows自带的CFile和CStdioFile类，前者提供了write后者提供了writestring功能，简单的贴两个代码吧，但是这个使用的时候必须设置本地化：

void CDb_dialog::OnBnClickedButtonDbSave() { // TODO: Add your control notification handler code here int ItemCount = m_list_ctrl.GetItemCount(); int subnItemCount = m_list_ctrl.GetHeaderCtrl()->GetItemCount(); if(!ItemCount || !subnItemCount) { return; } if(!this->file_path.GetLength()) //如果文件名为空，弹出对话框 { static TCHAR BASED_CODE szFilter[] = _T("Datasheet Files (*.csv)|*.csv||"); CFileDialog file(false, _T("csv"), _T("保单保存"), 6, szFilter); file.DoModal(); this->file_path = file.GetPathName(); } if(!this->file_path.GetLength()) //如果文件名为空，弹出对话框 { return; } CStdioFile myFile; CFileException fileException; char* old_locale = _strdup( setlocale(LC_CTYPE,NULL) ); setlocale( LC_CTYPE, "chs" );//设定 if ( !myFile.Open( file_path.GetString(), CFile::modeCreate| CFile::modeReadWrite, &fileException ) ) { TCHAR szError[1024]; fileException.GetErrorMessage(szError, 1024); MessageBox(szError); return; } //遍历所有行 CString rowContent; CString subContent; for(int nItem = 0; nItem < ItemCount; nItem++) { for(int subnItem = 0; subnItem < subnItemCount - 1; subnItem++) { subContent = m_list_ctrl.GetItemText(nItem, subnItem); rowContent += subContent; rowContent += _T(","); } subContent = m_list_ctrl.GetItemText(nItem, subnItemCount - 1); rowContent += subContent; rowContent += _T("\n"); myFile.WriteString(rowContent.GetString()); myFile.Flush(); rowContent.Empty(); } setlocale( LC_CTYPE, old_locale ); free( old_locale );//还原区域设定 myFile.Close(); }

3、使用其他的库，我使用的是这个：http://www.codeproject.com/Articles/13852/BasicExcel-A-Class-to-Read-and-Write-to-Microsoft

这个上面提供了基本的使用例子，以及相应的类。

using namespace YExcel; void CDb_dialog::OnBnClickedButtonDbSave() { // TODO: Add your control notification handler code here int ItemCount = m_list_ctrl.GetItemCount(); int subnItemCount = m_list_ctrl.GetHeaderCtrl()->GetItemCount(); if(!ItemCount || !subnItemCount) { return; } if(!this->file_path.GetLength()) //如果文件名为空，弹出对话框 { static TCHAR BASED_CODE szFilter[] = _T("Datasheet Files (*.xls)|*.xls||"); CFileDialog file(false, _T("csv"), _T("保单保存"), 6, szFilter); file.DoModal(); this->file_path = file.GetPathName(); } if(!this->file_path.GetLength()) //如果文件名为空，弹出对话框 { return; } BasicExcel e; e.New(1); e.RenameWorksheet("Sheet1", "Test1"); BasicExcelWorksheet* sheet = e.GetWorksheet("Test1"); BasicExcelCell* cell; if(!sheet) { return; } //遍历所有行 CString rowContent; CString subContent; for(int nItem = 0; nItem < ItemCount; nItem++) { for(int subnItem = 0; subnItem < subnItemCount - 1; subnItem++) { subContent = m_list_ctrl.GetItemText(nItem, subnItem); if(subContent.GetLength()) { cell = sheet->Cell(nItem, subnItem); cell->SetWString(subContent.GetString()); } } } e.SaveAs("aa.xls"); CopyFile(_T("aa.xls"), file_path.GetString(), false); int error_no = GetLastError(); }

最后使用了一个saveas到本地，然后copy到指定的目录，貌似这个库不支持非本地保存，没有深究，且这样吧。

最后截图保存的文件：

这个文章先简单的描述一下了，还是推荐使用basicexcel这个库的。毕竟还是支持utf-16的操作。而且作者也给出了一个相应的实例，慢慢细心看，还是很简单的。

后续我在给出一些vc 2008通过odbc操作mysql的实例吧，具体就是使用CDatabase 和CRecordSet类做这个操作了。