// DLG_User_Inport.cpp : implementation file // #include "stdafx.h" #include "corpsms.h" #include "DLG_User_Inport.h" #ifdef _DEBUG #define new DEBUG_NEW #undef THIS_FILE static char THIS_FILE[] = __FILE__; #endif ///////////////////////////////////////////////////////////////////////////// // DLG_User_Inport dialog #include "FGAddress.h" #include "FPAddress.h" #include "MainFrm.h" #include "DLG_AddWarning.h" DLG_User_Inport::DLG_User_Inport(CWnd* pParent /*=NULL*/) : CDialog(DLG_User_Inport::IDD, pParent) { //{{AFX_DATA_INIT(DLG_User_Inport) // NOTE: the ClassWizard will add member initialization here //}}AFX_DATA_INIT m_bInport = true; m_bPAddress = false; m_pList = NULL; m_bReMobile = false; } void DLG_User_Inport::DoDataExchange(CDataExchange* pDX) { CDialog::DoDataExchange(pDX); //{{AFX_DATA_MAP(DLG_User_Inport) DDX_Control(pDX, IDC_USER_INPORT_HEAD, m_B_Head); DDX_Control(pDX, IDC_USER_INPORT_REMOBILE, m_B_ReMobile); DDX_Control(pDX, IDC_USER_INPORT_RECORD_SPLIT, m_C_RecordSplit); DDX_Control(pDX, IDC_USER_INPORT_FIELD_SPLIT, m_C_FieldSplit); DDX_Control(pDX, IDC_USER_INPORT_S1, m_B_Tips); DDX_Control(pDX, IDC_USER_INPORT_FILENAME, m_E_FileName); DDX_Control(pDX, IDC_USER_INPORT_LIST, m_L_List); //}}AFX_DATA_MAP } BEGIN_MESSAGE_MAP(DLG_User_Inport, CDialog) //{{AFX_MSG_MAP(DLG_User_Inport) ON_BN_CLICKED(IDC_USER_INPORT_SELALL, OnUserInportSelall) ON_BN_CLICKED(IDC_USER_INPORT_CLEAR, OnUserInportClear) ON_BN_CLICKED(IDC_USER_INPORT_GETFILE, OnUserInportGetfile) //}}AFX_MSG_MAP END_MESSAGE_MAP() ///////////////////////////////////////////////////////////////////////////// // DLG_User_Inport message handlers BOOL DLG_User_Inport::OnInitDialog() { CDialog::OnInitDialog(); if ( !m_bInport ) { this->SetWindowText(_T("导出地址本(*.txt , *.csv)")); CWnd * pWnd = (CWnd*)GetDlgItem(IDOK); pWnd->SetWindowText(_T("导 出")); pWnd = (CWnd*)GetDlgItem(IDC_USER_INPORT_S2); pWnd->SetWindowText(_T("导出字段与顺序(拖动选择,打勾为导出字段)")); pWnd = (CWnd*)GetDlgItem(IDC_USER_INPORT_S1); pWnd->SetWindowText(_T("导出txt/csv文件名")); m_C_FieldSplit.EnableWindow(false); m_C_RecordSplit.EnableWindow(false); } m_C_FieldSplit.SetCurSel(0); m_C_RecordSplit.SetCurSel(0); InitList(); if ( !m_bPAddress || !m_bInport) { m_B_ReMobile.ShowWindow(SW_HIDE); } return TRUE; // return TRUE unless you set the focus to a control // EXCEPTION: OCX Property Pages should return FALSE } void DLG_User_Inport::OnOK() { m_bReMobile = m_B_ReMobile.GetCheck(); BOOL b= false; if ( m_bInport ) { b=User_Inport(); } else { b=User_Export(); } if (b) CDialog::OnOK(); } void DLG_User_Inport::SetInport(CFPAddress *pFPAddress,CListCtrl * pList,BOOL bInport,BOOL bPAddress) { m_pList = pList; m_bInport = bInport; m_bPAddress= bPAddress; //是否私人电话本 if ( pFPAddress ) { m_pFPAddress = pFPAddress; m_AdoRS.SetAdoConnection( &m_pFPAddress->m_pMainFrame->m_adoConnection ); } } void DLG_User_Inport::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) ); if ( m_bPAddress ) { TCHAR * pItem[] = { _T("姓 名"), _T("昵 称"), _T("手机号码"), _T("电 话"), _T("生 日"), _T("公 司"), _T("职 务"), _T("Email"), }; TCHAR Buf[256]; for ( int i = 0 ; i<8 ; 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 ); //设置这个是为了顺序不至于打乱 } } else { TCHAR * pItem[] = { _T("姓 名"), _T("昵 称"), _T("手机号码"), _T("电 话"), _T("生 日"), _T("职 务"), _T("Email"), }; TCHAR Buf[256]; for ( int i = 0 ; i<7 ; 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_User_Inport::OnUserInportSelall() { m_L_List.CheckAll(); } void DLG_User_Inport::OnUserInportClear() { m_L_List.ClearAll(); } BOOL DLG_User_Inport::User_Export() { 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(); TCHAR Buf[1024]; TCHAR Buf2[256]; long lRecnCount= 0; //总记录数 long lFileSize = 0; //文件总字节数 long lBufLen = 0; for ( i = 0; iGetItemText( i , 1 , Buf2 , sizeof(Buf2) ); else m_pList->GetItemText( i , 3 , Buf2 , sizeof(Buf2) ); break; case 1: //昵称 if ( m_bPAddress ) m_pList->GetItemText( i , 2 , Buf2 , sizeof(Buf2) ); else m_pList->GetItemText( i , 4 , Buf2 , sizeof(Buf2) ); break; case 2: //手机 if ( m_bPAddress ) m_pList->GetItemText( i , 3 , Buf2 , sizeof(Buf2) ); else m_pList->GetItemText( i , 5 , Buf2 , sizeof(Buf2) ); break; case 3: //电话 if ( m_bPAddress ) m_pList->GetItemText( i , 4 , Buf2 , sizeof(Buf2) ); else m_pList->GetItemText( i , 6 , Buf2 , sizeof(Buf2) ); break; case 4: //生日 if ( m_bPAddress ) m_pList->GetItemText( i , 5 , Buf2 , sizeof(Buf2) ); else m_pList->GetItemText( i , 7 , Buf2 , sizeof(Buf2) ); break; case 5: //职务 ,公司 if ( m_bPAddress ) m_pList->GetItemText( i , 6 , Buf2 , sizeof(Buf2) ); else m_pList->GetItemText( i , 8 , Buf2 , sizeof(Buf2) ); break; case 6: //Email ,职务 if ( m_bPAddress ) m_pList->GetItemText( i , 7 , Buf2 , sizeof(Buf2) ); else m_pList->GetItemText( i , 9 , Buf2 , sizeof(Buf2) ); break; case 7: //Email paddress if ( m_bPAddress ) m_pList->GetItemText( i , 8 , Buf2 , sizeof(Buf2) ); break; } _tcscat(Buf , Buf2 ); if ( j < lCheckCount-1 ) //最后一条不用加","号 _tcscat(Buf , _T(",") ); } _tcscat(Buf , _T("\r\n") ); //换行 lBufLen = _tcslen(Buf); #ifdef _UNICODE CStringA strMsgA = CW2A(Buf); fTalk.Write( strMsgA , strMsgA.GetLength() ); #else 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 ); return true; } BOOL DLG_User_Inport::User_Inport() { 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 ; i0 || _tcslen(user.szTel) >0 || _tcslen(user.szMobile) >0) { if ( _tcslen(user.szName) <= 0 ) _stprintf( user.szName , _T("IP%d") , lNameCount ); //添加用户 lNameCount ++; _stprintf( szName , _T("现正处理->%d") , lNameCount ); m_B_Tips.SetWindowText( szName ); if ( m_bPAddress ) //私人电话本 { //先检测号码是否存在此组时,如果存在,提示 BOOL bAdd = true; if ( m_bReMobile && _tcslen( user.szMobile ) > 0 ) { if ( _tcslen(m_pFPAddress->m_szGroupID)<=0) str.Format( _T("select * from paddress where Mobile='%s' and (GroupID is null or len(GroupID)=0)") , user.szMobile ); else str.Format( _T("select * from paddress where Mobile='%s' and GroupID='%s'") , user.szMobile,m_pFPAddress->m_szGroupID ); if ( m_AdoRS.Open(str) && m_AdoRS.GetRecordCount()>0 ) { //找到记录,证明有重复的号码 m_AdoRS.Close(); if ( bShowReMobile ) { str.Format( _T("%s,%s") , user.szName , user.szMobile ); DLG_AddWarning dlg(str,this); //提示重复号码 dlg.DoModal(); bShowReMobile = dlg.m_bShowReMobile; lReMobileType = dlg.m_lReMobileType; } if ( lReMobileType == 0 ) //跳过 { bAdd = false; } } } #ifdef MOBSET_OEM_SNLD if ( _tcslen(user.szMobile)<=0 ) //仙妮雷德专版,自动从根目录读取用户手机号 { str.Format( _T("select * from paddress where Name='%s' and (GroupID is null or len(GroupID)=0)") , user.szName ); if ( m_AdoRS.Open(str) && m_AdoRS.GetRecordCount()>0 ) { m_AdoRS.MoveFirst(); m_AdoRS.GetCollect( _T("Mobile") , user.szMobile ); m_AdoRS.Close(); } } #endif if ( bAdd ) { _tcscpy( user.szUserType,_T("1") ); //用户类型 _tcscpy( user.szGroupID , m_pFPAddress->m_szGroupID); //用户组 m_pFPAddress->AddUser(user,false); } } else { PAddress * pUser = new PAddress; *pUser = user; m_User.AddTail( pUser ); } } lLineCount ++; } else { break; } } fTalk.Close(); /* _stprintf(szName , _T("导入发送列表成功,具体如下:\n导入文件类型:TXT\n导入记录数:%d\n文件总行数:%d\n导入文件名:%s") , lNameCount , lLineCount, szFileName); MessageBox( szName , _T("导入成功"),MB_OK|MB_ICONINFORMATION ); */ return true; } void DLG_User_Inport::Close() { //清除队列中的内容 while (!m_User.IsEmpty()) { PAddress * pData = m_User.GetHead(); m_User.RemoveHead(); delete pData; } } long DLG_User_Inport::ReadLine(CFile *file, char * pSplit,char *szBuf, long lLen) { int i,j; int lLineCount = 0; int lSplitLen = strlen(pSplit); char c; i = 0; while ( true ) { j = file->Read( &c , 1 ); if ( j < 1 ) { szBuf[i]=0; return i; } if ( i >= lLen-1 ) { szBuf[i] = 0; return i; } szBuf[i] = c; i++; if ( !memcmp( szBuf+i-lSplitLen , pSplit , lSplitLen ) ) //换行标志 { szBuf[i] = 0; return i; } } return 0; } void DLG_User_Inport::OnUserInportGetfile() { #define FILE_FILTER_TEXT \ TEXT("txt文本文件 (*.txt)\0*.txt\0")\ TEXT("Excel csv 文件 (*.csv)\0*.csv\0")\ TEXT("所有文件 (*.*)\0*.*;\0\0") if ( m_bInport ) { TCHAR szFile[ 256 ]; TCHAR szFileB[ 256 ]; *szFileB = NULL; _stprintf( szFile , _T("*.txt") ); 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 ( ::GetOpenFileName( &sOpen ) ) { m_E_FileName.SetWindowText(sOpen.lpstrFile); return ; } } else { TCHAR szFile[ 256 ]; TCHAR szFileB[ 256 ]; *szFileB = NULL; _stprintf( szFile , _T("Address") ); 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); } } }