// DLG_SmsQueryLog_Export.cpp : implementation file // #include "stdafx.h" #include "corpsms.h" #include "DLG_SmsQueryLog_Export.h" #ifdef _DEBUG #define new DEBUG_NEW #undef THIS_FILE static char THIS_FILE[] = __FILE__; #endif ///////////////////////////////////////////////////////////////////////////// // DLG_SmsQueryLog_Export dialog #include "FSmsLog.h" DLG_SmsQueryLog_Export::DLG_SmsQueryLog_Export(CWnd* pParent /*=NULL*/) : CDialog(DLG_SmsQueryLog_Export::IDD, pParent) { //{{AFX_DATA_INIT(DLG_SmsQueryLog_Export) // NOTE: the ClassWizard will add member initialization here //}}AFX_DATA_INIT } void DLG_SmsQueryLog_Export::DoDataExchange(CDataExchange* pDX) { CDialog::DoDataExchange(pDX); //{{AFX_DATA_MAP(DLG_SmsQueryLog_Export) DDX_Control(pDX, IDD_SMSJS_EXPORT_LIST, m_L_List); DDX_Control(pDX, IDD_SMSJS_EXPORT_HEAD, m_B_AddHead); DDX_Control(pDX, IDD_SMSJS_EXPORT_FILENAME, m_E_FileName); //}}AFX_DATA_MAP } BEGIN_MESSAGE_MAP(DLG_SmsQueryLog_Export, CDialog) //{{AFX_MSG_MAP(DLG_SmsQueryLog_Export) ON_BN_CLICKED(IDD_SMSJS_EXPORT_SELALL, OnSmsjsExportSelall) ON_BN_CLICKED(IDD_SMSJS_EXPORT_CLEAR, OnSmsjsExportClear) ON_BN_CLICKED(IDD_SMSJS_EXPORT_GETFILE, OnSmsjsExportGetfile) //}}AFX_MSG_MAP END_MESSAGE_MAP() ///////////////////////////////////////////////////////////////////////////// // DLG_SmsQueryLog_Export message handlers BOOL DLG_SmsQueryLog_Export::OnInitDialog() { CDialog::OnInitDialog(); InitList(); return TRUE; // return TRUE unless you set the focus to a control // EXCEPTION: OCX Property Pages should return FALSE } void DLG_SmsQueryLog_Export::InitList() { m_L_List.Init(true,-1,-1,-1); m_L_List.InsertColumn( 0 , _T("顺序") , LVCFMT_LEFT , 40 , 0); m_L_List.InsertColumn( 1 , _T(" 字段名") , LVCFMT_LEFT , 120 , 1); m_L_List.SetTextColor( RGB(0,0,255) ); TCHAR * pItem[] = { _T("查询者"), _T("发送内容"), _T("回复内容"), _T("状态"), _T("发送时间"), }; TCHAR Buf[256]; for ( int i = 0 ; i<5 ; i++ ) { m_L_List.InsertItem( i , _itot(i+1,Buf,10) ); m_L_List.SetItemText(i , 1 , pItem[i] ); m_L_List.SetItemData(i , i ); //设置这个是为了顺序不至于打乱 } m_L_List.CheckAll(); m_L_List.NoverCheck(); m_L_List.ReShowSort(); } void DLG_SmsQueryLog_Export::OnSmsjsExportSelall() { m_L_List.CheckAll(); } void DLG_SmsQueryLog_Export::OnSmsjsExportClear() { m_L_List.ClearAll(); } void DLG_SmsQueryLog_Export::OnOK() { long lItemCount = m_L_List.GetItemCount(); long lExPortItem[50];memset(&lExPortItem,0,sizeof(lExPortItem)); for ( int j=0 ; j < 50 ; j++ ) lExPortItem[j] = -1; long lCheckCount = 0; for ( int i=0 ; iGetItemCount(); long lTemp; TCHAR Buf[1024]; TCHAR Buf2[256]; #ifdef UNICODE char szTempA[4096]; #endif long lRecnCount= 0; //总记录数 long lFileSize = 0; //文件总字节数 long lBufLen = 0; COleDateTime t; if ( m_B_AddHead.GetCheck() )//增加字段头 { _tcscpy(Buf,_T(";")); for ( int j = 0; jGetItemData(i); CString str; str.Format( _T("select * from QueryLog where SendID=%d") , lSendID ); if ( m_pAdo->Open(str) && m_pAdo->GetRecordCount()>0 ) { m_pAdo->MoveFirst(); for( int j = 0 ; j< lCheckCount ; j++ ) //按按所选中的字段,取通讯录内容进行保存。 { memset(Buf2 , 0 , sizeof(Buf2) ); switch( lExPortItem[j] ) { case 0: //查询者 m_pAdo->GetCollect( _T("SendNum") , Buf2 ); break; case 1: //发送内容 m_pAdo->GetCollect( _T("RecvMsg") , Buf2 ); break; case 2: //回复内容 m_pAdo->GetCollect( _T("RetMsg") , Buf2 ); break; case 3: //状态 m_pAdo->GetCollect( _T("Status") , lTemp ); #ifdef STATUS_ENABLE_RECV CFSmsLog::GetStatusText( lTemp , Buf2 ); #else CFSmsLog::GetStatusText2( lTemp , Buf2 ); #endif break; case 4: //发送时间 m_pAdo->GetCollect( _T("SendTime") , t ); _stprintf(Buf2,_T("%04d.%02d.%02d %02d:%02d") , t.GetYear(),t.GetMonth(),t.GetDay(),t.GetHour(),t.GetMinute()); break; } _tcscat(Buf , Buf2 ); if ( j < lCheckCount-1 ) //最后一条不用加","号 _tcscat(Buf , _T(",") ); } } _tcscat(Buf , _T("\r\n") ); //换行 #ifdef UNICODE CAdoRecordSet::Ado_W2A(Buf,szTempA); lBufLen = strlen(szTempA); fTalk.Write( szTempA , lBufLen ); #else lBufLen = _tcslen(Buf); fTalk.Write( Buf , lBufLen ); #endif lRecnCount++; //取得总记录数 lFileSize = lFileSize + lBufLen ; //取得总字节数 } fTalk.Close(); this->EndWaitCursor(); _stprintf(Buf , _T("导出查询日志成功,具体如下:\n导出文件类型:TXT\n导出记录数:%d\n导出字节数:%d\n导出文件名:%s") , lRecnCount , lFileSize , szFileName); MessageBox( Buf , _T("导出成功"),MB_OK|MB_ICONINFORMATION ); CDialog::OnOK(); } void DLG_SmsQueryLog_Export::SetParam(CAdoRecordSet *pAdo, CReportCtrl *pList) { m_pAdo = pAdo; m_pList = pList; } void DLG_SmsQueryLog_Export::OnSmsjsExportGetfile() { #define FILE_FILTER_TEXT \ TEXT("txt文本文件 (*.txt)\0*.txt\0")\ TEXT("Excel csv 文件 (*.csv)\0*.csv\0")\ TEXT("所有文件 (*.*)\0*.*;\0\0") TCHAR szFile[ 256 ]; TCHAR szFileB[ 256 ]; *szFileB = NULL; _stprintf( szFile , _T("SmsQuery") ); OPENFILENAME sOpen; sOpen.lStructSize = sizeof( sOpen ); sOpen.hwndOwner = this->m_hWnd ; sOpen.Flags = OFN_EXPLORER|OFN_OVERWRITEPROMPT|OFN_HIDEREADONLY; sOpen.lpstrFilter = FILE_FILTER_TEXT; sOpen.lpstrDefExt = _T("txt"); sOpen.lpstrCustomFilter = NULL; sOpen.nMaxCustFilter = 0; sOpen.lpstrFile = szFile; sOpen.nMaxFile = sizeof( szFile ); sOpen.lpstrFileTitle = szFileB; sOpen.nMaxFileTitle = sizeof( szFileB ); sOpen.lpstrInitialDir = NULL; sOpen.lpstrTitle = _T("选择导出列表的文件"); if ( ::GetSaveFileName( &sOpen ) ) { m_E_FileName.SetWindowText(sOpen.lpstrFile); } }