admin/geomative
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
main
geomative/GeomativeStudio/cpp/ProblemZone/SP2DTd.cpp
T
coco df489d5640 a
2026-07-03 16:05:30 +08:00

3469 lines
118 KiB
C++
Raw Permalink Blame History

// SP2DTd.cpp: implementation of the CSP2DTd class.
//
//////////////////////////////////////////////////////////////////////
#include "geomative.h"
#include "SP2DTd.h"
#include "TdChannel.h"
#include "Markup.h"
#include "optgddlg.h"
#include "SaveInRes.h"
#include "opexec2drsptestsetdlg.h"
#include "RSP2DTdRecord.h"
#include "excel.h"
#include "Disp2DRSPGrapDlg.h"
#include "disptdrecsplinesgrapdlg.h"
#include "OperTxtFile.h"
#include "OperMediumPt.h"
#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif
using namespace excel9;
extern int g_iLanguage;
extern BOOL GetSubStringInHeadAndTail(const CString& szSource, CString& szSub, const CString& szHead, const CString& szTail);
extern CString GetGrCodeText(int iCode);
extern int g_UIOffset;
extern int g_iUILanguage;
extern CGeoMativeApp theApp;
//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////
extern HHOOK hHook;
extern LRESULT __stdcall CBTHookProc(long nCode, WPARAM wParam, LPARAM lParam);
CSP2DTd::CSP2DTd(DWORD dwID, _ConnectionPtr& pConnection):CTestingData(dwID, pConnection)
{
}
CSP2DTd::~CSP2DTd()
{
ClearTdChaList();
}
/*
bool CSP2DTd::ShowDetailInfo(CListCtrl &tdDetailList)
{
_RecordsetPtr pRecTd = NULL;
_RecordsetPtr pRecTdHead = NULL;
_RecordsetPtr pRecDev = NULL;
_RecordsetPtr pRecPara = NULL;
_RecordsetPtr pRecCm = NULL;
CString szSql;
CString szLabel;
int iRowIndex = (int)VAL_ZERO;
while (tdDetailList.GetItemCount() != iRowIndex)
{
tdDetailList.SetItemText(iRowIndex, 1, _T(""));
iRowIndex++;
}
pRecTd.CreateInstance(_uuidof(Recordset));
pRecTdHead.CreateInstance(_uuidof(Recordset));
pRecDev.CreateInstance(_uuidof(Recordset));
pRecPara.CreateInstance(_uuidof(Recordset));
pRecCm.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select ID,TDname,Tlocation,DESN,SCCN,Sname,Stype,Ttype,Tmode,Eamount,TPamount,CHamount,N,TRwave,TRfrequency,Ifrequency,SAfrequency,Clayout,Espace,Edistance,weather,WDIR,"
"temperature,height,humidity,Format(Cdate,'YYYY-MM-DD') as Cdate,Format(Ctime,'HH:MM:SS') as Ctime,Format(Tdate,'YYYY-MM-DD') as Tdate,Format(Ttime,'HH:MM:SS') as Ttime,"
"Rdirection,CRtime,IIf(IsNull(PM),'',PM) as PM,IIf(IsNull(OP),'',OP) as OP,IIf(IsNull(QA),'',QA) as QA from td where ID = %u"), m_dwID);
pRecTd->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecTd->GetRecordCount())
{
tdDetailList.SetItemText(0, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TDname")));
// tdDetailList.SetItemText(1, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tlocation")));
tdDetailList.SetItemText(1, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("DESN")));
// tdDetailList.SetItemText(2, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("SCCN")));
tdDetailList.SetItemText(2, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Sname")));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Stype' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Stype")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Stype")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(3, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Ttype' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Ttype")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ttype")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(4, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Tmode' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Tmode")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tmode")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
// tdDetailList.SetItemText(6, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
tdDetailList.SetItemText(5, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Eamount")));
tdDetailList.SetItemText(6, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TPamount")));
tdDetailList.SetItemText(7, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("CHamount")));
tdDetailList.SetItemText(8, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("N")));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'TRwave' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("TRwave")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TRwave")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(9, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
if ((0 == pRecTd->GetCollect(_T("Ttype")).iVal) || (1 == pRecTd->GetCollect(_T("Ttype")).iVal))
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Trfrequency' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Trfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Trfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(10, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
}
else if (2 == pRecTd->GetCollect(_T("Ttype")).iVal)
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Trfrequencyself' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Trfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Trfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(10, 1, pRecCm->GetCollect(_T("Clabel")).vt == VT_NULL ? _T("") : (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
}
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Ifrequency' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Ifrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ifrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(11, 1, pRecCm->GetCollect(_T("Clabel")).vt == VT_NULL ? _T("") : (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
if (0 == pRecTd->GetCollect(_T("Ifrequency")).iVal)
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'SAfrequency50' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("SAfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("SAfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(12, 1, pRecCm->GetCollect(_T("Clabel")).vt == VT_NULL ? _T("") : (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
}
else if (1 == pRecTd->GetCollect(_T("Ifrequency")).iVal)
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'SAfrequency60' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("SAfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("SAfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(12, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
}
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Clayout' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Clayout")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Clayout")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(13, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
// tdDetailList.SetItemText(16, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Espace")));
tdDetailList.SetItemText(14, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Edistance")));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'weather' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("weather")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("weather")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(15, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'WDIR' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("WDIR")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("WDIR")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
tdDetailList.SetItemText(16, 1, (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
CString szDefault = _T("");
szDefault = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("temperature"));
if (szDefault == "-9999")//若为该值则不显示东西
{
szDefault = "";
}
tdDetailList.SetItemText(17, 1, szDefault);
tdDetailList.SetItemText(18, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("height")));
szDefault = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("humidity"));
if (szDefault == "-9999")//若为该值则不显示东西
{
szDefault = "";
}
tdDetailList.SetItemText(19, 1, szDefault);
tdDetailList.SetItemText(20, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Cdate")));
tdDetailList.SetItemText(21, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ctime")));
tdDetailList.SetItemText(22, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tdate")));
tdDetailList.SetItemText(23, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ttime")));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Rdirection' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Rdirection")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Rdirection")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
// tdDetailList.SetItemText(27, 1, pRecCm->GetCollect(_T("Clabel")).vt == VT_NULL ? _T("") : (LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel")));
}
pRecCm->Close();
// tdDetailList.SetItemText(28, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("CRtime")));
tdDetailList.SetItemText(24, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("PM")));
tdDetailList.SetItemText(25, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("OP")));
tdDetailList.SetItemText(26, 1, (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("QA")));
}
pRecTd->Close();
return true;
}*/
bool CSP2DTd::ShowConList(CListCtrl &tdConList)
{
_RecordsetPtr pRecConList = NULL;
CString szSql;
int iIndex = (int)VAL_ZERO;
pRecConList.CreateInstance(_uuidof(Recordset));
if (VAL_ZERO != tdConList.GetItemCount())
{
tdConList.DeleteAllItems();
}
szSql.Empty();
szSql.Format(_T("select TSN,C1,C2,P1,P2,N,K,I,V,R0,SP,bUse from td2dcon where TCHID in (select ID from tdchannel where TDID = %u order by TCHID) order by TSN"), m_dwID);
try
{
pRecConList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
}
catch (_com_error e)
{
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
AfxMessageBox((LPCTSTR)e.Description());
}
CString strDBVal = _T("");
while ((short)VAL_ZERO == pRecConList->adoEOF)
{
if (pRecConList->GetCollect(_T("bUse")).boolVal != 0)//0为access数据库中的false
{
tdConList.InsertItem(iIndex, (LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C1")));
tdConList.SetItemText(iIndex, 1, (LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C2")));
tdConList.SetItemText(iIndex, 2, (LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P1")));
tdConList.SetItemText(iIndex, 3, (LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P2")));
tdConList.SetItemText(iIndex, 4, (LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("N")));
strDBVal.Empty();
strDBVal.Format(_T("%f"),(float)pRecConList->GetCollect(_T("K")).fltVal);
tdConList.SetItemText(iIndex, 5, strDBVal);
strDBVal.Empty();
strDBVal.Format(_T("%f"),(float)pRecConList->GetCollect(_T("I")).fltVal);
tdConList.SetItemText(iIndex, 6, strDBVal);
strDBVal.Empty();
strDBVal.Format(_T("%f"),(float)pRecConList->GetCollect(_T("V")).fltVal);
tdConList.SetItemText(iIndex, 7, strDBVal);
strDBVal.Empty();
strDBVal.Format(_T("%f"),(float)pRecConList->GetCollect(_T("R0")).fltVal);
tdConList.SetItemText(iIndex, 8, strDBVal);
strDBVal.Empty();
strDBVal.Format(_T("%f"),(float)pRecConList->GetCollect(_T("SP")).fltVal);
tdConList.SetItemText(iIndex, 9, strDBVal);
tdConList.SetItemData(iIndex, (int)pRecConList->GetCollect(_T("TSN")).lVal);
iIndex++;
}
pRecConList->MoveNext();
}
pRecConList->Close();
return true;
}
bool CSP2DTd::ShowGrList(CListCtrl &tdGrList)
{
_RecordsetPtr pRecGrList = NULL;
CString szSql = _T("");
CString szLabel = _T("");
int iIndex = (int)VAL_ZERO;
pRecGrList.CreateInstance(_uuidof(Recordset));
if ((int)VAL_ZERO != tdGrList.GetItemCount())
{
tdGrList.DeleteAllItems();
}
szSql.Empty();
szSql.Format(_T("select Ecode,Format(Mdate,'YYYY-MM-DD') as Mdate,Format(Mtime,'HH:MM:SS') as Mtime,OMvalue, OM1value,")
_T(" StatusCode, StatusCode1 from gr where TDID = %u order by Val(Ecode)"), m_dwID);
pRecGrList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
int iOMVal = -1, iOMVal1 = -1;
CString strOMVal, strOMVal1;
CString strMdate, strMtime;
CString strStatus, strStatus1;
while ((short)VAL_ZERO == pRecGrList->adoEOF)
{
tdGrList.InsertItem(iIndex, (LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Ecode")));
strOMVal.Empty();
strOMVal1.Empty();
strMdate.Empty();
strMtime.Empty();
strStatus.Empty();
strStatus1.Empty();
iOMVal = (int)pRecGrList->GetCollect(_T("OMvalue")).lVal;
iOMVal1 = (int)pRecGrList->GetCollect(_T("OM1value")).lVal;
if (-1 != iOMVal)
{
strOMVal.Format(_T("%d"),iOMVal);
strMdate = (LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Mdate"));
strMtime = (LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Mtime"));
strStatus = GetGrCodeText((int)pRecGrList->GetCollect(_T("StatusCode")).lVal);
}
if (-1 != iOMVal1)
{
strOMVal1.Format(_T("%d"),iOMVal1);
strStatus1 = GetGrCodeText((int)pRecGrList->GetCollect(_T("StatusCode1")).lVal);
}
tdGrList.SetItemText(iIndex, 1, strOMVal);
tdGrList.SetItemText(iIndex, 2, strStatus);
tdGrList.SetItemText(iIndex, 3, strOMVal1);
tdGrList.SetItemText(iIndex, 4, strStatus1);
tdGrList.SetItemText(iIndex, 5, strMdate);
tdGrList.SetItemText(iIndex, 6, strMtime);
iIndex++;
pRecGrList->MoveNext();
}
pRecGrList->Close();
return true;
}
BOOL CSP2DTd::Save2DSPSetInfo(COpExec2DRSPTestSetDlg* const pOpExec2DRSPTestSetDlg, CLinkList<CMedium*>& m_medLinkList)
{
_RecordsetPtr pRecTdChaList = NULL;
CString szSql = _T("");
CString szLbText = _T("");
CString szPro = _T("");
CString szPrCN = _T("");
CString szTzName = _T("");
CString szTzCN = _T("");
DWORD dwMedHandle = (DWORD)VAL_ZERO;
int iChNum = (int)VAL_ZERO;
int iSptIndex = (int)VAL_ZERO;
POSITION posSpt;
CTime tCT;
CString szEdCon = _T("");
DWORD dwSptHandle = (DWORD)VAL_ZERO;
DWORD dwSptID = (DWORD)VAL_ZERO;
tCT = CTime::GetCurrentTime();
this->m_szTdName = pOpExec2DRSPTestSetDlg->m_szName;
this->m_szTdCN = _T("ERIR")+tCT.FormatGmt(_T("%Y%m%d"))+tCT.FormatGmt(_T("%H%M%S"));
this->m_szTLocation = pOpExec2DRSPTestSetDlg->m_szLocation;
// this->m_bIsGr = pOpExec2DRSPTestSetDlg->m_ckIsGr.GetCheck();
this->m_dwID = (DWORD)VAL_ZERO;
this->m_pDevice = (CDevice*)pOpExec2DRSPTestSetDlg->m_cbDESN.GetItemData(pOpExec2DRSPTestSetDlg->m_cbDESN.GetCurSel());
posSpt = pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetFirstSelectedItemPosition();
iSptIndex = pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetNextSelectedItem(posSpt);
dwSptHandle = pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetItemData(iSptIndex);
dwSptID = this->m_handleProcessor.GetIDFromHandle(dwSptHandle);
this->m_dwSCID = dwSptID;
this->m_szSCCN = pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetItemText(iSptIndex, 0);
this->m_szSName = pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetItemText(iSptIndex, 1);
this->m_iSType = (int)VAL_ONE;
this->m_iTType = (int)VAL_ZERO;
this->m_iEAmount = atoi(pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetItemText(iSptIndex, 2));
this->m_iCHAmount = atoi(pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetItemText(iSptIndex, 3));
this->m_iTPAmount = atoi(pOpExec2DRSPTestSetDlg->m_op2DSptSelDlg.m_sptList.GetItemText(iSptIndex, 4));
szPro.Empty();
pOpExec2DRSPTestSetDlg->m_cbPrName.GetLBText(pOpExec2DRSPTestSetDlg->m_cbPrName.GetCurSel(), szPro);
szPrCN.Empty();
GetSubStringInHeadAndTail(szPro, szPrCN, _T("("), _T(")"));
this->m_szPrCN = szPrCN;
szTzName.Empty();
pOpExec2DRSPTestSetDlg->m_cbTzName.GetLBText(pOpExec2DRSPTestSetDlg->m_cbTzName.GetCurSel(), szTzName);
this->m_szTzName = szTzName;
szTzCN.Empty();
GetSubStringInHeadAndTail(szTzName, szTzCN, _T("("), _T(")"));
this->m_szTzCN = szTzCN;
this->m_dwTzID = pOpExec2DRSPTestSetDlg->m_cbTzName.GetItemData(pOpExec2DRSPTestSetDlg->m_cbTzName.GetCurSel());
this->m_iCLayout = pOpExec2DRSPTestSetDlg->m_cbCLayout.GetCurSel();
szEdCon.Empty();
pOpExec2DRSPTestSetDlg->m_edESpace.GetWindowText(szEdCon);
this->m_fESpace = (float)atof(szEdCon.GetBuffer(0));
this->m_szEDistance = pOpExec2DRSPTestSetDlg->m_szEDistance;
this->m_iCRtime = (int)VAL_ZERO;
this->m_iRDirection = (int)VAL_ZERO;
this->m_iIFrequency = pOpExec2DRSPTestSetDlg->m_iIFrequency;
this->m_iSAFrequency = pOpExec2DRSPTestSetDlg->m_iSAFrequency;
this->m_iTRFrequency = pOpExec2DRSPTestSetDlg->m_iTRFrenquency;
this->m_fTRPeriod = pOpExec2DRSPTestSetDlg->m_fTRPeriod;
this->m_iTMode = pOpExec2DRSPTestSetDlg->m_iTestMode;
this->m_iTRWave = m_iTRWave;
szEdCon.Empty();
pOpExec2DRSPTestSetDlg->m_edHeight.GetWindowText(szEdCon);
this->m_fHeight = (float)atof(szEdCon.GetBuffer(0));
szEdCon.Empty();
pOpExec2DRSPTestSetDlg->m_edHumidity.GetWindowText(szEdCon);
this->m_fHumidity = (float)atof(szEdCon.GetBuffer(0));
szEdCon.Empty();
pOpExec2DRSPTestSetDlg->m_edTemperature.GetWindowText(szEdCon);
this->m_fTemperature = (float)atof(szEdCon.GetBuffer(0));
this->m_iWDIR = pOpExec2DRSPTestSetDlg->m_cbWDIR.GetCurSel();
this->m_iWeather = pOpExec2DRSPTestSetDlg->m_cbWeather.GetCurSel();
this->m_iN = (int)VAL_ONE;
this->m_szCDate = tCT.FormatGmt(_T("%Y-%m-%d"));
this->m_szCTime = tCT.FormatGmt(_T("%H:%M:%S"));
this->m_szTDate = tCT.FormatGmt(_T("%Y-%m-%d"));
this->m_szTTime = tCT.FormatGmt(_T("%H:%M:%S"));
this->m_iRCamount = (int)VAL_ZERO;
this->m_iRDirection = (int)VAL_ZERO;
this->m_iCRtime = (int)VAL_ZERO;
this->m_szOP = pOpExec2DRSPTestSetDlg->m_szOP;
this->m_szPM = pOpExec2DRSPTestSetDlg->m_szPM;
this->m_szQA = pOpExec2DRSPTestSetDlg->m_szQA;
this->m_tdChaList.RemoveAll();
pRecTdChaList.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select CHnumber,AR from channel where SCID = %u order by CHnumber"), this->m_dwSCID);
pRecTdChaList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
while ((short)VAL_ZERO == pRecTdChaList->adoEOF)
{
iChNum = pRecTdChaList->GetCollect(_T("CHnumber")).iVal;
CTdChannel* pTdChannel = new CTdChannel(this->m_dwSCID, iChNum, m_pConnection);
dwMedHandle = m_handleProcessor.GenerateHandle(pRecTdChaList->GetCollect(_T("AR")).iVal, PZ_STYLE_MED_DEF);
pTdChannel->m_pMedium = m_medLinkList.Find(dwMedHandle);
pTdChannel->m_iEAmount = this->m_iEAmount;
this->m_tdChaList.AddTail((void*)pTdChannel);
pRecTdChaList->MoveNext();
}
pRecTdChaList->Close();
return TRUE;
}
BOOL CSP2DTd::SaveHeadInfoToFile(CString& szFilePath, CString& szFileName)
{
CMarkup xml;
CTdChannel* pTdChannel = NULL;
POSITION pos;
CString szCon = _T("");
CString szFile = _T("");
xml.SetDoc("<?xml version=\"1.0\" encoding=\"ansi\"?>\r\n");
xml.AddElem("measure");
xml.AddChildElem(_T("measure_name"), this->m_szTdName);
xml.AddChildElem(_T("measure_location"), this->m_szTLocation);
xml.AddChildElem(_T("measure_script_id"), this->m_szSCCN);
xml.AddChildElem(_T("measure_script_name"), this->m_szSName);
xml.AddChildElem(_T("measure_script_type"), 1);
xml.AddChildElem(_T("measure_type"), 0);
xml.AddChildElem(_T("measure_mode"), this->m_iTMode);
xml.AddChildElem(_T("medium_set"));
xml.IntoElem();
pos = this->m_tdChaList.GetHeadPosition();
while (pos != NULL)
{
pTdChannel = (CTdChannel*)m_tdChaList.GetNext(pos);
if(pTdChannel != NULL)
{
szCon.Empty();
szCon.Format(_T("%d:%d"), pTdChannel->m_iChNum, pTdChannel->m_pMedium->m_iAR);
xml.AddChildElem(_T("medium"), szCon);
}
}
xml.OutOfElem();
xml.AddChildElem(_T("pole_count"), this->m_iEAmount);
xml.AddChildElem(_T("pole_distance"), this->m_szEDistance);
szCon.Empty();
szCon.Format(_T("%.2f"), this->m_fESpace);
xml.AddChildElem(_T("pole_gap"), szCon);
xml.AddChildElem(_T("rect"), _T(""));
xml.AddChildElem(_T("rect_loc"), _T(""));
xml.AddChildElem(_T("wires_layout"), this->m_iCLayout);
xml.AddChildElem(_T("point_count"), this->m_iTPAmount);
xml.AddChildElem(_T("rolling_times"), 0);
xml.AddChildElem(_T("rolling_direction"), 0);
xml.AddChildElem(_T("rolling_step"), _T(""));
xml.AddChildElem(_T("channel_count"), this->m_iCHAmount);
xml.AddChildElem(_T("iterations"), 1);
xml.AddChildElem(_T("emit_source"), _T(""));
xml.AddChildElem(_T("wave_shape"), this->m_iTRWave);
xml.AddChildElem(_T("period"), this->m_iTRFrequency);
xml.AddChildElem(_T("industrial_frequency"), this->m_iIFrequency);
xml.AddChildElem(_T("sample_rate"), this->m_iSAFrequency);
xml.AddChildElem(_T("sample_interval"), _T(""));
xml.AddChildElem(_T("v_gain"), _T(""));
xml.AddChildElem(_T("i_gain"), _T(""));
szCon.Empty();
szCon.Format(_T("%.2f"), this->m_fTemperature);
xml.AddChildElem(_T("temperature"), szCon);
szCon.Empty();
szCon.Format(_T("%.2f"), this->m_fHeight);
xml.AddChildElem(_T("height"), szCon);
szCon.Empty();
szCon.Format(_T("%.2f"), this->m_fHumidity);
xml.AddChildElem(_T("humidity"), szCon);
xml.AddChildElem(_T("weather"), this->m_iWeather);
xml.AddChildElem(_T("wind_direction"), this->m_iWDIR);
xml.AddChildElem(_T("create_date"), this->m_szCDate);
xml.AddChildElem(_T("create_time"), this->m_szCTime);
xml.AddChildElem(_T("test_date"), this->m_szTDate);
xml.AddChildElem(_T("test_time"), this->m_szTTime);
xml.AddChildElem(_T("PM"), this->m_szPM);
xml.AddChildElem(_T("OP"), this->m_szOP);
xml.AddChildElem(_T("QA"), this->m_szQA);
xml.AddChildElem(_T("apparent_chargeability"));
//m0
xml.IntoElem();
xml.AddChildElem(_T("m0"));
xml.AddChildElem(_T("m1"));
xml.AddChildElem(_T("m2"));
xml.AddChildElem(_T("m3"));
xml.AddChildElem(_T("m4"));
xml.AddChildElem(_T("m5"));
xml.AddChildElem(_T("m6"));
xml.AddChildElem(_T("m7"));
xml.AddChildElem(_T("m8"));
xml.AddChildElem(_T("m9"));
xml.OutOfElem();
//m9
szFilePath.Empty();
szFilePath.GetBufferSetLength(2048);
::GetCurrentDirectory(2048, szFilePath.GetBuffer(szFilePath.GetLength()));
szFilePath.ReleaseBuffer();
szFilePath = szFilePath + "\\CACHE\\projects\\";
szFilePath += this->m_szPrCN + "\\" + this->m_szTzCN + "\\";
szFileName.Empty();
szFileName = this->m_szTdCN + _T(".xml");
szFile.Empty();
szFile = szFilePath + szFileName;
DeleteFile(szFile);
xml.Save(szFile);
return TRUE;
}
BOOL CSP2DTd::SaveTdHeadToExcelFile(_Worksheet* const pComSheet)
{
Range comRange;
excel9::Font comFont;
Range comCols;
_RecordsetPtr pRecTd = NULL;
_RecordsetPtr pRecTdHead = NULL;
_RecordsetPtr pRecDev = NULL;
_RecordsetPtr pRecPara = NULL;
_RecordsetPtr pRecCm = NULL;
CString szSql;
CString szLabel;
int iRowIndex = (int)0;
pRecTd.CreateInstance(_uuidof(Recordset));
pRecTdHead.CreateInstance(_uuidof(Recordset));
pRecDev.CreateInstance(_uuidof(Recordset));
pRecPara.CreateInstance(_uuidof(Recordset));
pRecCm.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select ID,TDname,Tlocation,DESN,SCCN,Sname,Stype,Ttype,Tmode,Eamount,TPamount,CHamount,N,TRwave,TRfrequency,Ifrequency,SAfrequency,Clayout,Espace,Edistance,weather,WDIR,"
"temperature,height,humidity,Format(Cdate,'YYYY-MM-DD') as Cdate,Format(Ctime,'HH:MM:SS') as Ctime,Format(Tdate,'YYYY-MM-DD') as Tdate,Format(Ttime,'HH:MM:SS') as Ttime,"
"Rdirection,CRtime,IIf(IsNull(PM),'',PM) as PM,IIf(IsNull(OP),'',OP) as OP,IIf(IsNull(QA),'',QA) as QA from td where ID = %u"), m_dwID);
pRecTd->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
CString strRowTitle;
if ((long)0 != pRecTd->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("A1")),COleVariant(_T("A1")));
if (LANG_ZHCN == g_iUILanguage)
comRange.SetValue2(COleVariant(_T("测试任务名称")));
else
comRange.SetValue2(COleVariant(_T("Test data name")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A2")),COleVariant(_T("A2")));
// comRange.SetValue2(COleVariant(_T("Zone location")));
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_DESN+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A2")),COleVariant(_T("A2")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A4")),COleVariant(_T("A4")));
// comRange.SetValue2(COleVariant(_T("Script ID")));
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_SNAME+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A3")),COleVariant(_T("A3")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_STYPE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A4")),COleVariant(_T("A4")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TTYPE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A5")),COleVariant(_T("A5")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_ARRAY_TYPE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A6")),COleVariant(_T("A6")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A8")),COleVariant(_T("A8")));
// comRange.SetValue2(COleVariant(_T("Test mode")));
//
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_EAMOUNT+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A7")),COleVariant(_T("A7")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TPAMOUNT+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A8")),COleVariant(_T("A8")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CHAMOUNT+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A9")),COleVariant(_T("A9")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_N+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A10")),COleVariant(_T("A10")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TRWAVE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A11")),COleVariant(_T("A11")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TRFREQUENCY+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A12")),COleVariant(_T("A12")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_IFREQUENCY+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A13")),COleVariant(_T("A13")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A14")),COleVariant(_T("A14")));
// comRange.SetValue2(COleVariant(_T("Sample rate")));
//
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CLAYOUT+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A14")),COleVariant(_T("A14")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A18")),COleVariant(_T("A18")));
// comRange.SetValue2(COleVariant(_T("Electrode step")));
//
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_EDISTANCE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A15")),COleVariant(_T("A15")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_WEATHER+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A16")),COleVariant(_T("A16")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_WDIR+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A17")),COleVariant(_T("A17")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TEMPERATURE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A18")),COleVariant(_T("A18")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_HEIGHT+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A19")),COleVariant(_T("A19")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_HUMIDITY+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A20")),COleVariant(_T("A20")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CDATE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A21")),COleVariant(_T("A21")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CTIME+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A22")),COleVariant(_T("A22")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TDATE+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A23")),COleVariant(_T("A23")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TTIME+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A24")),COleVariant(_T("A24")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A29")),COleVariant(_T("A29")));
// comRange.SetValue2(COleVariant(_T("Rolling direction")));
//
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A30")),COleVariant(_T("A30")));
// comRange.SetValue2(COleVariant(_T("Rolling times")));
//
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
// comRange = pComSheet->GetRange(COleVariant(_T("A26")),COleVariant(_T("A26")));
// comRange.SetValue2(COleVariant(_T("Project manager")));
// comFont = comRange.GetFont();
// comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_OP+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A25")),COleVariant(_T("A25")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_QA+g_UIOffset);
comRange = pComSheet->GetRange(COleVariant(_T("A26")),COleVariant(_T("A26")));
comRange.SetValue2(COleVariant(strRowTitle));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
comRange = pComSheet->GetRange(COleVariant(_T("B1")),COleVariant(_T("B1")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TDname"))));
// comRange = pComSheet->GetRange(COleVariant(_T("B2")),COleVariant(_T("B2")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tlocation"))));
comRange = pComSheet->GetRange(COleVariant(_T("B2")),COleVariant(_T("B2")));
comRange.SetValue2(COleVariant((pRecTd->GetCollect(_T("DESN")).vt==VT_NULL)?_T(""):(LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("DESN"))));
// comRange = pComSheet->GetRange(COleVariant(_T("B4")),COleVariant(_T("B4")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("SCCN"))));
comRange = pComSheet->GetRange(COleVariant(_T("B3")),COleVariant(_T("B3")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Sname"))));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Stype' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Stype")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Stype")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B4")),COleVariant(_T("B4")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Ttype' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Ttype")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ttype")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B5")),COleVariant(_T("B5")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Tmode' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Tmode")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tmode")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
// comRange = pComSheet->GetRange(COleVariant(_T("B8")),COleVariant(_T("B8")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
///////////////////////////////////加入装置类型////////////////////////////
szSql.Empty();
szSql.Format(_T("select MEname from medium where LANG = %d and AR in (select AR from tdchannel where TDID = %d)"),
g_iLanguage, m_dwID);
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B6")),COleVariant(_T("B6")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("MEname"))));
}
pRecCm->Close();
//////////////////////////////////////////////////////////////////////////
comRange = pComSheet->GetRange(COleVariant(_T("B7")),COleVariant(_T("B7")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Eamount"))));
comRange = pComSheet->GetRange(COleVariant(_T("B8")),COleVariant(_T("B8")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TPamount"))));
comRange = pComSheet->GetRange(COleVariant(_T("B9")),COleVariant(_T("B9")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("CHamount"))));
comRange = pComSheet->GetRange(COleVariant(_T("B10")),COleVariant(_T("B10")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("N"))));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'TRwave' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("TRwave")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TRwave")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B11")),COleVariant(_T("B11")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
if ((0 == pRecTd->GetCollect(_T("Ttype")).iVal) || (1 == pRecTd->GetCollect(_T("Ttype")).iVal))
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Trfrequency' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Trfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Trfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B12")),COleVariant(_T("B12")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
}
else if (2 == pRecTd->GetCollect(_T("Ttype")).iVal)
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Trfrequencyself' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Trfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Trfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B12")),COleVariant(_T("B12")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
}
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Ifrequency' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Ifrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ifrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B13")),COleVariant(_T("B13")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
// if (0 == pRecTd->GetCollect(_T("Ifrequency")).iVal)
// {
// szSql.Empty();
// szSql.Format(_T("select Clabel from cm where Cname = 'SAfrequency50' and Lang = %d and Cvalue = %s"),
// g_iLanguage, pRecTd->GetCollect(_T("SAfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("SAfrequency")));
// pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
// if ((long)0 != pRecCm->GetRecordCount())
// {
// comRange = pComSheet->GetRange(COleVariant(_T("B14")),COleVariant(_T("B14")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
// }
// pRecCm->Close();
// }
// else if (1 == pRecTd->GetCollect(_T("Ifrequency")).iVal)
// {
// szSql.Empty();
// szSql.Format(_T("select Clabel from cm where Cname = 'SAfrequency60' and Lang = %d and Cvalue = %s"),
// g_iLanguage, pRecTd->GetCollect(_T("SAfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("SAfrequency")));
// pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
// if ((long)0 != pRecCm->GetRecordCount())
// {
// comRange = pComSheet->GetRange(COleVariant(_T("B14")),COleVariant(_T("B14")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
// }
// pRecCm->Close();
// }
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Clayout' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Clayout")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Clayout")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B14")),COleVariant(_T("B14")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
// comRange = pComSheet->GetRange(COleVariant(_T("B18")),COleVariant(_T("B18")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Espace"))));
comRange = pComSheet->GetRange(COleVariant(_T("B15")),COleVariant(_T("B15")));
comRange.SetValue2(COleVariant((pRecTd->GetCollect(_T("Edistance")).vt==VT_NULL)?_T(""):(LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Edistance"))));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'weather' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("weather")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("weather")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B16")),COleVariant(_T("B16")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'WDIR' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("WDIR")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("WDIR")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
comRange = pComSheet->GetRange(COleVariant(_T("B17")),COleVariant(_T("B17")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
CString strTmp = _T("");
float fTmp = (pRecTd->GetCollect(_T("temperature")).vt==VT_NULL)?-9999:(float)pRecTd->GetCollect(_T("temperature")).fltVal;
if (fTmp > -9000)
{
strTmp.Format(_T("%f"),fTmp);
}
comRange = pComSheet->GetRange(COleVariant(_T("B18")),COleVariant(_T("B18")));
comRange.SetValue2(COleVariant(strTmp));
comRange = pComSheet->GetRange(COleVariant(_T("B19")),COleVariant(_T("B19")));
comRange.SetValue2(COleVariant((pRecTd->GetCollect(_T("height")).vt==VT_NULL)?_T(""):(LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("height"))));
strTmp.Empty();
fTmp = (pRecTd->GetCollect(_T("humidity")).vt==VT_NULL)?-9999:(float)pRecTd->GetCollect(_T("humidity")).fltVal;
if (fTmp > -9000)
{
strTmp.Format(_T("%f"),fTmp);
}
comRange = pComSheet->GetRange(COleVariant(_T("B20")),COleVariant(_T("B20")));
comRange.SetValue2(COleVariant(strTmp));
comRange = pComSheet->GetRange(COleVariant(_T("B21")),COleVariant(_T("B21")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Cdate"))));
comRange = pComSheet->GetRange(COleVariant(_T("B22")),COleVariant(_T("B22")));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ctime"))));
comRange = pComSheet->GetRange(COleVariant(_T("B23")),COleVariant(_T("B23")));
comRange.SetValue2(COleVariant((pRecTd->GetCollect(_T("Tdate")).vt==VT_NULL)?_T(""):(LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tdate"))));
comRange = pComSheet->GetRange(COleVariant(_T("B24")),COleVariant(_T("B24")));
comRange.SetValue2(COleVariant((pRecTd->GetCollect(_T("Ttime")).vt==VT_NULL)?_T(""):(LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ttime"))));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Rdirection' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Rdirection")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Rdirection")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
// comRange = pComSheet->GetRange(COleVariant(_T("B29")),COleVariant(_T("B29")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
// comRange = pComSheet->GetRange(COleVariant(_T("B30")),COleVariant(_T("B30")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("CRtime"))));
// comRange = pComSheet->GetRange(COleVariant(_T("B26")),COleVariant(_T("B26")));
// comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("PM"))));
comRange = pComSheet->GetRange(COleVariant(_T("B25")),COleVariant(_T("B25")));
comRange.SetValue2(COleVariant((pRecTd->GetCollect(_T("OP")).vt==VT_NULL)?_T(""):(LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("OP"))));
comRange = pComSheet->GetRange(COleVariant(_T("B26")),COleVariant(_T("B26")));
comRange.SetValue2(COleVariant((pRecTd->GetCollect(_T("QA")).vt==VT_NULL)?_T(""):(LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("QA"))));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
}
pRecTd->Close();
return TRUE;
}
BOOL CSP2DTd::SaveTdConToExcelFileBySort(_Worksheet* const pComSheet, int iMethod)
{
Range comRange;
excel9::Font comFont;
Range comCols;
_RecordsetPtr pRecConList = NULL;
CString szSql = _T("");
CString szRow = _T("");
int iIndex = (int)0;
iIndex = 1;
szRow.Empty();
szRow.Format(_T("A%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("A(C1)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("B%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("B(C2)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("C%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("M(P1)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("D%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("N(P2)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("E%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("Stacking")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("F%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("K")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("G%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("I(mA)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("H%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("V(mV)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("I%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("R0")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("J%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("SP")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
pRecConList.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select C1,C2,P1,P2,N,K,I,V,R0,SP,Layer,AR from td2dcon a, tdchannel b where a.bUse <> 0 and a.TCHID = b.ID and b.TDID = %u order by a.TSN"), m_dwID);
try
{
pRecConList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
}
catch (_com_error e)
{
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
AfxMessageBox((LPCTSTR)e.Description());
}
if (pRecConList->GetRecordCount() < 1)
{
pRecConList->Close();
return TRUE;
}
int iAR = pRecConList->GetCollect(_T("AR")).iVal;
COperMediumPt operMedium(iAR);
if (!operMedium.InitiSortInfo(iMethod))
{
if (LANG_ZHCN == g_iUILanguage)
AfxMessageBox(_T("初始化排序信息错误"));
else
MessageBoxEx(NULL, _T("Initial sort information failed"), STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
pRecConList->Close();
return FALSE;
}
std::vector<StTdTaskComDataInfo> vtStTdTaskData;
vtStTdTaskData.clear();
int iSortIndex = 0;
while ((short)0 == pRecConList->adoEOF)
{
StTdTaskComDataInfo stTdTaskData;
stTdTaskData.iC1 = pRecConList->GetCollect(_T("C1")).iVal;
stTdTaskData.iC2 = pRecConList->GetCollect(_T("C2")).iVal;
stTdTaskData.iP1 = pRecConList->GetCollect(_T("P1")).iVal;
stTdTaskData.iP2 = pRecConList->GetCollect(_T("P2")).iVal;
stTdTaskData.iN = pRecConList->GetCollect(_T("N")).iVal;
stTdTaskData.fK = pRecConList->GetCollect(_T("K")).fltVal;
stTdTaskData.fV = pRecConList->GetCollect(_T("V")).fltVal;
stTdTaskData.fI = pRecConList->GetCollect(_T("I")).fltVal;
stTdTaskData.fR0 = pRecConList->GetCollect(_T("R0")).fltVal;
stTdTaskData.fSP = pRecConList->GetCollect(_T("SP")).fltVal;
vtStTdTaskData.push_back(stTdTaskData);
operMedium.AddSortPtInfo(stTdTaskData.iC1, stTdTaskData.iC2, stTdTaskData.iP1, stTdTaskData.iP2,
pRecConList->GetCollect(_T("Layer")).iVal, iSortIndex++);
pRecConList->MoveNext();
}
iSortIndex = operMedium.GetFirstSortID(iMethod);
BOOL bRes = TRUE;
CString strErr = _T(""),strText;
float fPtXPos = 0;
while(iSortIndex>=0)
{
if (iSortIndex >= vtStTdTaskData.size())
{
strErr.Empty();
if (LANG_ZHCN == g_iUILanguage)
{
strErr.Format(_T("导出excel数据索引混乱,data_index = %d,total_size=%d"), iSortIndex + 1, vtStTdTaskData.size());
AfxMessageBox(strErr);
}
else
{
strErr.Format(_T("Data index disorder in exprot excel,data_index = %d,total_size=%d"), iSortIndex + 1, vtStTdTaskData.size());
MessageBoxEx(NULL, strErr, STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
}
bRes = FALSE;
break;
}
iIndex++;
if ((fPtXPos > EPSINON) && (operMedium.GetCurPtXPos() - fPtXPos > EPSINON))
{
//这里由于需要明确区分一次排序后的的点，以空一行来表示分开
iIndex++;
}
fPtXPos = operMedium.GetCurPtXPos();
szRow.Empty();
szRow.Format(_T("A%d"), iIndex);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iC1);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("B%d"), iIndex);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iC2);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("C%d"), iIndex);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iP1);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("D%d"), iIndex);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iP2);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("E%d"), iIndex);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iN);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("F%d"), iIndex);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fK);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("G%d"), iIndex);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fI);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("H%d"), iIndex);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fV);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("I%d"), iIndex);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fR0);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
szRow.Empty();
szRow.Format(_T("J%d"), iIndex);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fSP);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strText));
iSortIndex = operMedium.GetNextSortID();
}
pRecConList->Close();
return bRes;
}
BOOL CSP2DTd::SaveTdConToExcelFile(_Worksheet* const pComSheet)
{
CString szSql = _T("");
if (EXP_2D_DATA_BY_DEPTH == theApp.Get2dDataExpStyle())
{
_RecordsetPtr pRecAR = NULL;
pRecAR.CreateInstance(_uuidof(Recordset));
szSql.Format(_T("select AR from tdchannel where TDID = %u"), m_dwID);
pRecAR->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if (pRecAR->GetRecordCount() < 1)
{
if (LANG_ZHCN == g_iUILanguage)
AfxMessageBox(_T("保存excel获取AR信息失败"));
else
MessageBoxEx(NULL, _T("Get AR information failed in save excel"), STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
pRecAR->Close();
return FALSE;
}
int iAR = pRecAR->GetCollect(_T("AR")).iVal;
if (AR_CROSS_HOLE_TYPE != iAR && AR_BIPOLE_HOLE_SPT != iAR)
{
pRecAR->Close();
return SaveTdConToExcelFileBySort(pComSheet,1);
}
}
Range comRange;
excel9::Font comFont;
Range comCols;
_RecordsetPtr pRecConList = NULL;
CString szRow = _T("");
int iIndex = (int)0;
iIndex = 1;
szRow.Empty();
szRow.Format(_T("A%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("A(C1)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("B%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("B(C2)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("C%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("M(P1)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("D%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("N(P2)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("E%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("Stacking")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("F%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("K")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("G%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("I(mA)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("H%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("V(mV)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("I%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("R0")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
szRow.Empty();
szRow.Format(_T("J%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("SP")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
pRecConList.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select C1,C2,P1,P2,N,K,I,V,R0,SP,bUse from td2dcon where TCHID in (select ID from tdchannel where TDID = %u order by TCHID) order by TSN"), m_dwID);
try
{
pRecConList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
}
catch (_com_error e)
{
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
AfxMessageBox((LPCTSTR)e.Description());
}
CString strText = _T("");
while ((short)0 == pRecConList->adoEOF)
{
if (pRecConList->GetCollect(_T("bUse")).boolVal != 0)//0为access数据库中的false
{
iIndex++;
szRow.Empty();
szRow.Format(_T("A%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C1"))));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("B%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C2"))));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("C%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P1"))));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("D%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P2"))));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("E%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("N"))));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("F%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("K")).fltVal);
comRange.SetValue2(COleVariant(strText));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("G%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("I")).fltVal);
comRange.SetValue2(COleVariant(strText));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("H%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("V")).fltVal);
comRange.SetValue2(COleVariant(strText));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("I%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("R0")).fltVal);
comRange.SetValue2(COleVariant(strText));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("J%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("SP")).fltVal);
comRange.SetValue2(COleVariant(strText));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
}
pRecConList->MoveNext();
}
pRecConList->Close();
return TRUE;
}
BOOL CSP2DTd::SaveTdHeadToCsvFile(FILE* pFile)
{
_RecordsetPtr pRecTd = NULL;
_RecordsetPtr pRecTdHead = NULL;
_RecordsetPtr pRecDev = NULL;
_RecordsetPtr pRecPara = NULL;
_RecordsetPtr pRecCm = NULL;
CString szSql;
CString szLabel;
int iRowIndex = (int)0;
pRecTd.CreateInstance(_uuidof(Recordset));
pRecTdHead.CreateInstance(_uuidof(Recordset));
pRecDev.CreateInstance(_uuidof(Recordset));
pRecPara.CreateInstance(_uuidof(Recordset));
pRecCm.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select ID,TDname,Tlocation,DESN,SCCN,Sname,Stype,Ttype,Tmode,Eamount,TPamount,CHamount,N,TRwave,TRfrequency,Ifrequency,SAfrequency,Clayout,Espace,Edistance,weather,WDIR,"
"temperature,height,humidity,Format(Cdate,'YYYY-MM-DD') as Cdate,Format(Ctime,'HH:MM:SS') as Ctime,Format(Tdate,'YYYY-MM-DD') as Tdate,Format(Ttime,'HH:MM:SS') as Ttime,"
"Rdirection,CRtime,IIf(IsNull(PM),'',PM) as PM,IIf(IsNull(OP),'',OP) as OP,IIf(IsNull(QA),'',QA) as QA from td where ID = %u"), m_dwID);
pRecTd->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
CString strRowTitle;
CStringArray arrHead;
if ((long)0 != pRecTd->GetRecordCount())
{
strRowTitle.Empty();
if (LANG_ZHCN == g_iUILanguage)
strRowTitle = _T("测试任务名称");
else
strRowTitle = _T("Test data name");
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_DESN + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_SNAME + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_STYPE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TTYPE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_ARRAY_TYPE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_EAMOUNT + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TPAMOUNT + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CHAMOUNT + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_N + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TRWAVE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TRFREQUENCY + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_IFREQUENCY + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CLAYOUT + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_EDISTANCE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_WEATHER + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_WDIR + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TEMPERATURE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_HEIGHT + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_HUMIDITY + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CDATE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_CTIME + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TDATE + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_TTIME + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_OP + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
strRowTitle.Empty();
strRowTitle.LoadString(IDS_DB_TD_QA + g_UIOffset);
arrHead.Add(strRowTitle + _T(','));
/////////////////////////////////////////////////////
int i = 0;
arrHead[i++] += ((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TDname")));
arrHead[i++] += (((pRecTd->GetCollect(_T("DESN")).vt == VT_NULL) ? _T("") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("DESN"))));
arrHead[i++] += ((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Sname")));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Stype' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Stype")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Stype")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Ttype' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Ttype")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ttype")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Tmode' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Tmode")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tmode")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
}
pRecCm->Close();
///////////////////////////////////加入装置类型////////////////////////////
szSql.Empty();
szSql.Format(_T("select MEname from medium where LANG = %d and AR in (select AR from tdchannel where TDID = %d)"),
g_iLanguage, m_dwID);
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("MEname"))));
}
pRecCm->Close();
//////////////////////////////////////////////////////////////////////////
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Eamount"))));
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TPamount"))));
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("CHamount"))));
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("N"))));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'TRwave' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("TRwave")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TRwave")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
if ((0 == pRecTd->GetCollect(_T("Ttype")).iVal) || (1 == pRecTd->GetCollect(_T("Ttype")).iVal))
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Trfrequency' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Trfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Trfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
}
else if (2 == pRecTd->GetCollect(_T("Ttype")).iVal)
{
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Trfrequencyself' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Trfrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Trfrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
}
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Ifrequency' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Ifrequency")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ifrequency")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Clayout' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Clayout")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Clayout")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
arrHead[i++] += (((pRecTd->GetCollect(_T("Edistance")).vt == VT_NULL) ? _T("") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Edistance"))));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'weather' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("weather")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("weather")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'WDIR' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("WDIR")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("WDIR")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecCm->GetCollect(_T("Clabel"))));
}
pRecCm->Close();
CString strTmp = _T("");
float fTmp = (pRecTd->GetCollect(_T("temperature")).vt == VT_NULL) ? -9999 : (float)pRecTd->GetCollect(_T("temperature")).fltVal;
if (fTmp > -9000)
{
strTmp.Format(_T("%f"), fTmp);
}
arrHead[i++] += ((strTmp));
arrHead[i++] += (((pRecTd->GetCollect(_T("height")).vt == VT_NULL) ? _T("") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("height"))));
strTmp.Empty();
fTmp = (pRecTd->GetCollect(_T("humidity")).vt == VT_NULL) ? -9999 : (float)pRecTd->GetCollect(_T("humidity")).fltVal;
if (fTmp > -9000)
{
strTmp.Format(_T("%f"), fTmp);
}
arrHead[i++] += ((strTmp));
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Cdate"))));
arrHead[i++] += (((LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ctime"))));
arrHead[i++] += (((pRecTd->GetCollect(_T("Tdate")).vt == VT_NULL) ? _T("") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Tdate"))));
arrHead[i++] += (((pRecTd->GetCollect(_T("Ttime")).vt == VT_NULL) ? _T("") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ttime"))));
szSql.Empty();
szSql.Format(_T("select Clabel from cm where Cname = 'Rdirection' and Lang = %d and Cvalue = %s"),
g_iLanguage, pRecTd->GetCollect(_T("Rdirection")).vt == VT_NULL ? _T("-1") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Rdirection")));
pRecCm->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)0 != pRecCm->GetRecordCount())
{
}
pRecCm->Close();
arrHead[i++] += (((pRecTd->GetCollect(_T("OP")).vt == VT_NULL) ? _T("") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("OP"))));
arrHead[i++] += (((pRecTd->GetCollect(_T("QA")).vt == VT_NULL) ? _T("") : (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("QA"))));
}
for (int j = 0; j < arrHead.GetCount(); j++)
{
arrHead[j] += "\n";
fwrite(arrHead[j], 1, arrHead[j].GetLength(), pFile);
}
fflush(pFile);
pRecTd->Close();
return TRUE;
}
BOOL CSP2DTd::SaveTdConToCsvFileBySort(FILE* pFile, int iMethod)
{
_RecordsetPtr pRecConList = NULL;
CString szSql = _T("");
CString szRow = _T("");
int iIndex = (int)0;
iIndex = 1;
szRow.Empty();
szRow += ((_T("A(C1)"))); szRow += ',';
szRow += ((_T("B(C2)"))); szRow += ',';
szRow += ((_T("M(P1)"))); szRow += ',';
szRow += ((_T("N(P2)"))); szRow += ',';
szRow += ((_T("Stacking"))); szRow += ',';
szRow += ((_T("K"))); szRow += ',';
szRow += ((_T("I(mA)"))); szRow += ',';
szRow += ((_T("V(mV)"))); szRow += ',';
szRow += ((_T("R0"))); szRow += ',';
szRow += ((_T("SP")));
szRow += "\n";
fwrite(szRow, 1, szRow.GetLength(), pFile);
pRecConList.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select C1,C2,P1,P2,N,K,I,V,R0,SP,Layer,AR from td2dcon a, tdchannel b where a.bUse <> 0 and a.TCHID = b.ID and b.TDID = %u order by a.TSN"), m_dwID);
try
{
pRecConList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
}
catch (_com_error e)
{
hHook = SetWindowsHookEx(WH_CBT, (HOOKPROC)CBTHookProc, AfxGetInstanceHandle(), NULL);
AfxMessageBox((LPCTSTR)e.Description());
}
if (pRecConList->GetRecordCount() < 1)
{
pRecConList->Close();
return TRUE;
}
int iAR = pRecConList->GetCollect(_T("AR")).iVal;
COperMediumPt operMedium(iAR);
if (!operMedium.InitiSortInfo(iMethod))
{
if (LANG_ZHCN == g_iUILanguage)
AfxMessageBox(_T("初始化排序信息错误"));
else
MessageBoxEx(NULL, _T("Initial sort information failed"), STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
pRecConList->Close();
return FALSE;
}
std::vector<StTdTaskComDataInfo> vtStTdTaskData;
vtStTdTaskData.clear();
int iSortIndex = 0;
while ((short)0 == pRecConList->adoEOF)
{
StTdTaskComDataInfo stTdTaskData;
stTdTaskData.iC1 = pRecConList->GetCollect(_T("C1")).iVal;
stTdTaskData.iC2 = pRecConList->GetCollect(_T("C2")).iVal;
stTdTaskData.iP1 = pRecConList->GetCollect(_T("P1")).iVal;
stTdTaskData.iP2 = pRecConList->GetCollect(_T("P2")).iVal;
stTdTaskData.iN = pRecConList->GetCollect(_T("N")).iVal;
stTdTaskData.fK = pRecConList->GetCollect(_T("K")).fltVal;
stTdTaskData.fV = pRecConList->GetCollect(_T("V")).fltVal;
stTdTaskData.fI = pRecConList->GetCollect(_T("I")).fltVal;
stTdTaskData.fR0 = pRecConList->GetCollect(_T("R0")).fltVal;
stTdTaskData.fSP = pRecConList->GetCollect(_T("SP")).fltVal;
vtStTdTaskData.push_back(stTdTaskData);
operMedium.AddSortPtInfo(stTdTaskData.iC1, stTdTaskData.iC2, stTdTaskData.iP1, stTdTaskData.iP2,
pRecConList->GetCollect(_T("Layer")).iVal, iSortIndex++);
pRecConList->MoveNext();
}
iSortIndex = operMedium.GetFirstSortID(iMethod);
BOOL bRes = TRUE;
CString strErr = _T(""), strText;
float fPtXPos = 0;
while (iSortIndex >= 0)
{
if (iSortIndex >= vtStTdTaskData.size())
{
strErr.Empty();
if (LANG_ZHCN == g_iUILanguage)
{
strErr.Format(_T("导出excel数据索引混乱,data_index = %d,total_size=%d"), iSortIndex + 1, vtStTdTaskData.size());
AfxMessageBox(strErr);
}
else
{
strErr.Format(_T("Data index disorder in exprot excel,data_index = %d,total_size=%d"), iSortIndex + 1, vtStTdTaskData.size());
MessageBoxEx(NULL, strErr, STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
}
bRes = FALSE;
break;
}
iIndex++;
if ((fPtXPos > EPSINON) && (operMedium.GetCurPtXPos() - fPtXPos > EPSINON))
{
//这里由于需要明确区分一次排序后的的点，以空一行来表示分开
iIndex++;
}
fPtXPos = operMedium.GetCurPtXPos();
szRow.Empty();
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iC1);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iC2);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iP1);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iP2);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iN);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fK);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fI);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fV);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fR0);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fSP);
szRow += ((strText));
szRow += "\n";
fwrite(szRow, 1, szRow.GetLength(), pFile);
iSortIndex = operMedium.GetNextSortID();
}
pRecConList->Close();
fflush(pFile);
return bRes;
}
BOOL CSP2DTd::SaveTdConToCsvFile(FILE* pFile)
{
CString szSql = _T("");
if (EXP_2D_DATA_BY_DEPTH == theApp.Get2dDataExpStyle())
{
_RecordsetPtr pRecAR = NULL;
pRecAR.CreateInstance(_uuidof(Recordset));
szSql.Format(_T("select AR from tdchannel where TDID = %u"), m_dwID);
pRecAR->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if (pRecAR->GetRecordCount() < 1)
{
if (LANG_ZHCN == g_iUILanguage)
AfxMessageBox(_T("保存excel获取AR信息失败"));
else
MessageBoxEx(NULL, _T("Get AR information failed in save excel"), STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
pRecAR->Close();
return FALSE;
}
int iAR = pRecAR->GetCollect(_T("AR")).iVal;
if (AR_CROSS_HOLE_TYPE != iAR && AR_BIPOLE_HOLE_SPT != iAR)
{
pRecAR->Close();
return SaveTdConToCsvFileBySort(pFile, 1);
}
}
_RecordsetPtr pRecConList = NULL;
CString szRow = _T("");
int iIndex = (int)0;
iIndex = 1;
szRow.Empty();
szRow += ((_T("A(C1)"))); szRow += ',';
szRow += ((_T("B(C2)"))); szRow += ',';
szRow += ((_T("M(P1)"))); szRow += ',';
szRow += ((_T("N(P2)"))); szRow += ',';
szRow += ((_T("Stacking"))); szRow += ',';
szRow += ((_T("K"))); szRow += ',';
szRow += ((_T("I(mA)"))); szRow += ',';
szRow += ((_T("V(mV)"))); szRow += ',';
szRow += ((_T("R0"))); szRow += ',';
szRow += ((_T("SP")));
szRow += "\n";
fwrite(szRow, 1, szRow.GetLength(), pFile);
fflush(pFile);
pRecConList.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select C1,C2,P1,P2,N,K,I,V,R0,SP,bUse from td2dcon where TCHID in (select ID from tdchannel where TDID = %u order by TCHID) order by TSN"), m_dwID);
try
{
pRecConList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
}
catch (_com_error e)
{
hHook = SetWindowsHookEx(WH_CBT, (HOOKPROC)CBTHookProc, AfxGetInstanceHandle(), NULL);
AfxMessageBox((LPCTSTR)e.Description());
}
CString strText = _T("");
while ((short)0 == pRecConList->adoEOF)
{
if (pRecConList->GetCollect(_T("bUse")).boolVal != 0)//0为access数据库中的false
{
iIndex++;
szRow.Empty();
szRow += (((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C1")))); szRow += ',';
szRow += (((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C2")))); szRow += ',';
szRow += (((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P1")))); szRow += ',';
szRow += (((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P2")))); szRow += ',';
szRow += (((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("N")))); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("K")).fltVal);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("I")).fltVal);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("V")).fltVal);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("R0")).fltVal);
szRow += ((strText)); szRow += ',';
strText.Empty();
strText.Format(_T("%f"), pRecConList->GetCollect(_T("SP")).fltVal);
szRow += ((strText));
szRow += "\n";
fwrite(szRow, 1, szRow.GetLength(), pFile);
}
pRecConList->MoveNext();
}
fflush(pFile);
pRecConList->Close();
return TRUE;
}
BOOL CSP2DTd::Export2dDataToTxtBySort(CString strFileName, int iSortMethod)
{
COperTxtFile operTxtFile;
if (!operTxtFile.OpenFileforWrite(strFileName))
{
return FALSE;
}
_RecordsetPtr pRecConList = NULL;
pRecConList.CreateInstance(_uuidof(Recordset));
CString szSql = _T("");
CStringArray strArrTxt;
strArrTxt.RemoveAll();
strArrTxt.Add(_T("A(C1)"));
strArrTxt.Add(_T("B(C2)"));
strArrTxt.Add(_T("M(P1)"));
strArrTxt.Add(_T("N(P2)"));
strArrTxt.Add(_T("Stacking"));
strArrTxt.Add(_T("K"));
strArrTxt.Add(_T("V(mV)"));
strArrTxt.Add(_T("I(mA)"));
strArrTxt.Add(_T("R0"));
strArrTxt.Add(_T("SP"));
szSql.Empty();
szSql.Format(_T("select C1,C2,P1,P2,N,K,V,I,R0,SP,Layer,AR from td2dcon a, tdchannel b where a.TCHID = b.ID and b.TDID = %u and a.bUse <> 0 order by a.TSN"), m_dwID);
try
{
pRecConList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
}
catch (_com_error e)
{
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
AfxMessageBox((LPCTSTR)e.Description());
operTxtFile.CloseFile();
return FALSE;
}
if (!operTxtFile.WriteFileContent(strArrTxt))
{
operTxtFile.CloseFile();
return FALSE;
}
if (pRecConList->GetRecordCount() <= 0)
{
operTxtFile.CloseFile();
return TRUE;
}
CString strText = _T("");
float fV = 0, fI = 0, fR = 0;
int iDataIndex = 0;
int iAR = pRecConList->GetCollect(_T("AR")).iVal;
COperMediumPt operMedium(iAR);
if (!operMedium.InitiSortInfo(1))
{
operTxtFile.CloseFile();
return FALSE;
}
std::vector<StTdTaskComDataInfo> vtStTdTaskData;
vtStTdTaskData.clear();
int iSortIndex = 0;
while ((short)0 == pRecConList->adoEOF)
{
StTdTaskComDataInfo stTdTaskData;
stTdTaskData.iC1 = pRecConList->GetCollect(_T("C1")).iVal;
stTdTaskData.iC2 = pRecConList->GetCollect(_T("C2")).iVal;
stTdTaskData.iP1 = pRecConList->GetCollect(_T("P1")).iVal;
stTdTaskData.iP2 = pRecConList->GetCollect(_T("P2")).iVal;
stTdTaskData.iN = pRecConList->GetCollect(_T("N")).iVal;
stTdTaskData.fK = pRecConList->GetCollect(_T("K")).fltVal;
stTdTaskData.fV = pRecConList->GetCollect(_T("V")).fltVal;
stTdTaskData.fI = pRecConList->GetCollect(_T("I")).fltVal;
stTdTaskData.fR0 = pRecConList->GetCollect(_T("R0")).fltVal;
stTdTaskData.fSP = pRecConList->GetCollect(_T("SP")).fltVal;
vtStTdTaskData.push_back(stTdTaskData);
operMedium.AddSortPtInfo(stTdTaskData.iC1, stTdTaskData.iC2, stTdTaskData.iP1, stTdTaskData.iP2,
pRecConList->GetCollect(_T("Layer")).iVal, iSortIndex++);
pRecConList->MoveNext();
}
iSortIndex = operMedium.GetFirstSortID(1);
BOOL bRes = TRUE;
float fPtXPos = 0;
while(iSortIndex >= 0)
{
if (iSortIndex >= vtStTdTaskData.size())
{
CString strErr = _T("");
if (LANG_ZHCN == g_iUILanguage)
{
strErr.Format(_T("数据索引混乱,data_index = %d,total_size=%d"), iSortIndex + 1, vtStTdTaskData.size());
AfxMessageBox(strErr);
}
else
{
strErr.Format(_T("Data index disorder,data_index = %d,total_size=%d"), iSortIndex + 1, vtStTdTaskData.size());
MessageBoxEx(NULL,strErr, STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
}
bRes = FALSE;
break;
}
if ((fPtXPos > EPSINON) && (operMedium.GetCurPtXPos() - fPtXPos > EPSINON))
{
//这里由于需要明确区分一次排序后的的点，以空一行来表示分开
operTxtFile.WriteEmptyRow();
}
fPtXPos = operMedium.GetCurPtXPos();
strArrTxt.RemoveAll();
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iC1);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iC2);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iP1);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iP2);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%d"), vtStTdTaskData[iSortIndex].iN);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fK);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fV);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fI);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fR0);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"), vtStTdTaskData[iSortIndex].fSP);
strArrTxt.Add(strText);
if (!operTxtFile.WriteFileContent(strArrTxt))
{
operTxtFile.CloseFile();
return FALSE;
}
iSortIndex = operMedium.GetNextSortID();
}
pRecConList->Close();
operTxtFile.CloseFile();
return bRes;
}
BOOL CSP2DTd::ExportSpDataToTxt(CString strFileName)
{
CString szSql = _T("");
if (EXP_2D_DATA_BY_DEPTH == theApp.Get2dDataExpStyle())
{
_RecordsetPtr pRecAR = NULL;
pRecAR.CreateInstance(_uuidof(Recordset));
szSql.Format(_T("select AR from tdchannel where TDID = %u"), m_dwID);
pRecAR->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if (pRecAR->GetRecordCount() < 1)
{
if (LANG_ZHCN == g_iUILanguage)
AfxMessageBox(_T("获取AR信息失败"));
else
MessageBoxEx(NULL, _T("Get AR information failed"), STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
pRecAR->Close();
return FALSE;
}
int iAR = pRecAR->GetCollect(_T("AR")).iVal;
if (AR_CROSS_HOLE_TYPE != iAR && AR_BIPOLE_HOLE_SPT != iAR)
{
pRecAR->Close();
return Export2dDataToTxtBySort(strFileName,1);
}
}
COperTxtFile operTxtFile;
if (!operTxtFile.OpenFileforWrite(strFileName))
{
return FALSE;
}
_RecordsetPtr pRecConList = NULL;
pRecConList.CreateInstance(_uuidof(Recordset));
CStringArray strArrTxt;
strArrTxt.RemoveAll();
strArrTxt.Add(_T("A(C1)"));
strArrTxt.Add(_T("B(C2)"));
strArrTxt.Add(_T("M(P1)"));
strArrTxt.Add(_T("N(P2)"));
strArrTxt.Add(_T("Stacking"));
strArrTxt.Add(_T("K"));
strArrTxt.Add(_T("V(mV)"));
strArrTxt.Add(_T("I(mA)"));
strArrTxt.Add(_T("R0"));
strArrTxt.Add(_T("SP"));
szSql.Format(_T("select C1,C2,P1,P2,N,K,I,V,R0,SP,bUse from td2dcon where TCHID in (select ID from tdchannel where TDID = %u order by TCHID) order by TSN"), m_dwID);
try
{
pRecConList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
}
catch (_com_error e)
{
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
AfxMessageBox((LPCTSTR)e.Description());
operTxtFile.CloseFile();
return FALSE;
}
if (!operTxtFile.WriteFileContent(strArrTxt))
{
operTxtFile.CloseFile();
return FALSE;
}
CString strText = _T("");
while ((short)0 == pRecConList->adoEOF)
{
if (pRecConList->GetCollect(_T("bUse")).boolVal != 0)//0为access数据库中的false
{
strArrTxt.RemoveAll();
strArrTxt.Add((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C1")));
strArrTxt.Add((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("C2")));
strArrTxt.Add((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P1")));
strArrTxt.Add((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("P2")));
strArrTxt.Add((LPCTSTR)(_bstr_t)pRecConList->GetCollect(_T("N")));
strText.Empty();
strText.Format(_T("%f"),pRecConList->GetCollect(_T("K")).fltVal);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"),pRecConList->GetCollect(_T("V")).fltVal);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"),pRecConList->GetCollect(_T("I")).fltVal);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"),pRecConList->GetCollect(_T("R0")).fltVal);
strArrTxt.Add(strText);
strText.Empty();
strText.Format(_T("%f"),pRecConList->GetCollect(_T("SP")).fltVal);
strArrTxt.Add(strText);
if (!operTxtFile.WriteFileContent(strArrTxt))
{
operTxtFile.CloseFile();
return FALSE;
}
}
pRecConList->MoveNext();
}
pRecConList->Close();
operTxtFile.CloseFile();
return TRUE;
}
BOOL CSP2DTd::SaveTdGRToExcelFile(_Worksheet* const pComSheet)
{
Range comRange;
excel9::Font comFont;
Range comCols;
_RecordsetPtr pRecGrList = NULL;
CString szSql = _T("");
CString szRow = _T("");
int iIndex = (int)0;
iIndex = 1;
szRow.Empty();
szRow.Format(_T("A%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("Electrode ID")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("B%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("Test date")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("C%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("Test time")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("D%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("P1 Rg(Ω)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("E%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("Status")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("F%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("P2 Rg(Ω)")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("G%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(_T("Status")));
comFont = comRange.GetFont();
comFont.SetBold(COleVariant((short)TRUE));
comCols = comRange.GetEntireColumn();
comCols.AutoFit();
pRecGrList.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select Ecode,Format(Mdate,'YYYY-MM-DD') as Mdate,Format(Mtime,'HH:MM:SS') as Mtime,OMvalue,OM1value,")
_T(" StatusCode, StatusCode1 from gr where TDID = %u order by Val(Ecode)"), m_dwID);
pRecGrList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
int iOMVal = -1, iOMVal1 = -1;
CString strOMVal, strOMVal1;
CString strMdate, strMtime;
CString strStatus, strStatus1;
while ((short)0 == pRecGrList->adoEOF)
{
iIndex++;
szRow.Empty();
szRow.Format(_T("A%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant((LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Ecode"))));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
strOMVal.Empty();
strOMVal1.Empty();
strMdate.Empty();
strMtime.Empty();
strStatus.Empty();
strStatus1.Empty();
iOMVal = (int)pRecGrList->GetCollect(_T("OMvalue")).lVal;
iOMVal1 = (int)pRecGrList->GetCollect(_T("OM1value")).lVal;
if (-1 != iOMVal)
{
strOMVal.Format(_T("%d"),iOMVal);
strMdate = (LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Mdate"));
strMtime = (LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Mtime"));
strStatus = GetGrCodeText((int)pRecGrList->GetCollect(_T("StatusCode")).lVal);
}
if (-1 != iOMVal1)
{
strOMVal1.Format(_T("%d"),iOMVal1);
strStatus1 = GetGrCodeText((int)pRecGrList->GetCollect(_T("StatusCode1")).lVal);
}
szRow.Empty();
szRow.Format(_T("B%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strMdate));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("C%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strMtime));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("D%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strOMVal));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("E%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strStatus));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("F%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strOMVal1));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
szRow.Empty();
szRow.Format(_T("G%d"), iIndex);
comRange = pComSheet->GetRange(COleVariant(szRow),COleVariant(szRow));
comRange.SetValue2(COleVariant(strStatus1));
// comCols = comRange.GetEntireColumn();
// comCols.AutoFit();
pRecGrList->MoveNext();
}
pRecGrList->Close();
return TRUE;
}
BOOL CSP2DTd::SaveTdGRToCsvFile(FILE* pFile)
{
_RecordsetPtr pRecGrList = NULL;
CString szSql = _T("");
CString szRow = _T("");
int iIndex = (int)0;
iIndex = 1;
szRow.Empty();
szRow += ((_T("Electrode ID"))); szRow += ',';
szRow += ((_T("Test date"))); szRow += ',';
szRow += ((_T("Test time"))); szRow += ',';
szRow += ((_T("P1 Rg(Ω)"))); szRow += ',';
szRow += ((_T("Status"))); szRow += ',';
szRow += ((_T("P2 Rg(Ω)"))); szRow += ',';
szRow += ((_T("Status")));
szRow += "\n";
fwrite(szRow, 1, szRow.GetLength(), pFile);
fflush(pFile);
pRecGrList.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select Ecode,Format(Mdate,'YYYY-MM-DD') as Mdate,Format(Mtime,'HH:MM:SS') as Mtime,OMvalue,OM1value,")
_T(" StatusCode, StatusCode1 from gr where TDID = %u order by Val(Ecode)"), m_dwID);
pRecGrList->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
int iOMVal = -1, iOMVal1 = -1;
CString strOMVal, strOMVal1;
CString strMdate, strMtime;
CString strStatus, strStatus1;
while ((short)0 == pRecGrList->adoEOF)
{
iIndex++;
szRow.Empty();
szRow += (((LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Ecode")))); szRow += ',';
strOMVal.Empty();
strOMVal1.Empty();
strMdate.Empty();
strMtime.Empty();
strStatus.Empty();
strStatus1.Empty();
iOMVal = (int)pRecGrList->GetCollect(_T("OMvalue")).lVal;
iOMVal1 = (int)pRecGrList->GetCollect(_T("OM1value")).lVal;
if (-1 != iOMVal)
{
strOMVal.Format(_T("%d"), iOMVal);
strMdate = (LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Mdate"));
strMtime = (LPCTSTR)(_bstr_t)pRecGrList->GetCollect(_T("Mtime"));
strStatus = GetGrCodeText((int)pRecGrList->GetCollect(_T("StatusCode")).lVal);
}
if (-1 != iOMVal1)
{
strOMVal1.Format(_T("%d"), iOMVal1);
strStatus1 = GetGrCodeText((int)pRecGrList->GetCollect(_T("StatusCode1")).lVal);
}
szRow += ((strMdate)); szRow += ',';
szRow += ((strMtime)); szRow += ',';
szRow += ((strOMVal)); szRow += ',';
szRow += ((strStatus)); szRow += ',';
szRow += ((strOMVal1)); szRow += ',';
szRow += ((strStatus1));
szRow += "\n";
fwrite(szRow, 1, szRow.GetLength(), pFile);
pRecGrList->MoveNext();
}
fflush(pFile);
pRecGrList->Close();
return TRUE;
}
BOOL CSP2DTd::SaveTdToExcelFile(CString f_szFileName)
{
if (PathFileExists(f_szFileName))
{
if (0 == DeleteFile(f_szFileName))
return FALSE;
}
_Application* pComApp = new _Application;
Workbooks comBooks;
_Workbook comBook;
Sheets comSheets;
_Worksheet comSheet01;
_Worksheet comSheet02;
_Worksheet comSheet03;
COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
// CString szCurFilePath = _T("");
// CString szCurFile = _T("");
//
// CFileDialog dlgSaveFile(FALSE, "xlsx", "", OFN_OVERWRITEPROMPT|OFN_HIDEREADONLY|OFN_NOCHANGEDIR, "Excel file(*.xlsx)|*.xlsx||", NULL);
//
// szCurFilePath.Empty();
// szCurFilePath.GetBufferSetLength(256);
// ::GetCurrentDirectory(szCurFilePath.GetLength(), szCurFilePath.GetBuffer(szCurFilePath.GetLength()));
// szCurFilePath.ReleaseBuffer();
//
// dlgSaveFile.m_ofn.lpstrTitle = _T("Save");
// dlgSaveFile.m_ofn.lpstrInitialDir = szCurFilePath;
//
// if (dlgSaveFile.DoModal() == IDOK)
// {
// szCurFile.Empty();
// szCurFile = dlgSaveFile.GetPathName();
// DeleteFile(szCurFile);
if( !pComApp->CreateDispatch(_T("Excel.Application"), NULL) )
{
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
if (LANG_ZHCN == g_iUILanguage)
AfxMessageBox(_T("不能打开excel应用"));
else
MessageBoxEx(NULL, _T("Can't build excel application!"), STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
return FALSE;
}
comBooks = pComApp->GetWorkbooks();
comBook = comBooks.Add(covOptional);
comSheets = comBook.GetSheets();
int iSheetCnt = comSheets.GetCount();
int iNeedCreateCnt = 3 - iSheetCnt;
if (iNeedCreateCnt > 0)
{
/////////////////////VC插入sheet页到指定位置////////////////////////////////////////////////
/*
插入sheet的函数用 sheets.Add(Before, After,Count,Type)
Before Variant 类型，可选。指定工作表对象，新建的工作表将置于此工作表之前。
After Variant 类型，可选。指定工作表对象，新建的工作表将置于此工作表之后。
Count Variant 类型，可选。要创建的工作表的数目。默认值为一。
Type Variant 类型，可选。工作表类型。
如果我们默认参数都为vtMissing，则 插入sheet的位置时在当前激活sheet页之前，而且时只插入一个sheet页
sheets.Add(vtMissing, vtMissing,vtMissing,vtMissing)
假如我们要求插入到第二个sheet之后，第三个sheet之前，我们应该按照下面的方法写
sheets.Add(-variant_t(sheets.GetItem(COleVariant((short)2))), -variant_t(sheets.GetItem(COleVariant((short)3))),-variant_t((long)1),vtMissing)
*/
//在这里covOptional可以等同于vtMissing
comSheets.Add(covOptional, _variant_t(comSheets.GetItem(COleVariant((short)iSheetCnt))),_variant_t((long)iNeedCreateCnt), covOptional);
}
comSheet01 = comSheets.GetItem(COleVariant((short)1));
comSheet01.SetName(_T("Head"));
this->SaveTdHeadToExcelFile(&comSheet01);
comSheet02 = comSheets.GetItem(COleVariant((short)2));
comSheet02.SetName(_T("DAT"));
this->SaveTdConToExcelFile(&comSheet02);
comSheet03 = comSheets.GetItem(COleVariant((short)3));
comSheet03.SetName(_T("GR"));
this->SaveTdGRToExcelFile(&comSheet03);
// comApp.SetVisible(TRUE);
// comApp.SetUserControl(TRUE);
comBook.SaveAs(COleVariant(f_szFileName), covOptional, covOptional, covOptional, covOptional, covOptional, 0, covOptional, covOptional, covOptional, covOptional, covOptional);
comSheet01.ReleaseDispatch();
comSheet02.ReleaseDispatch();
comSheet03.ReleaseDispatch();
comSheets.ReleaseDispatch();
comBook.Close(covOptional, COleVariant(""), covOptional);
comBook.ReleaseDispatch();
comBooks.Close();
comBooks.ReleaseDispatch();
pComApp->Quit();
pComApp->ReleaseDispatch();
if (pComApp != NULL)
{
delete pComApp;
pComApp = NULL;
}
// }
// else
// {
// return FALSE;
// }
return TRUE;
}
BOOL CSP2DTd::SaveTdToCsvFile(CString f_szFileName)
{
if (PathFileExists(f_szFileName))
{
if (0 == DeleteFile(f_szFileName))
return FALSE;
}
FILE* pCsvFile;
pCsvFile = fopen(f_szFileName, "w+");
if (NULL == pCsvFile)
{
CString str = _T("");
if (LANG_ZHCN == g_iUILanguage)
{
str.Format(_T("无法构建csv应用程序!错误码 %d"), GetLastError());
AfxMessageBox(str);
}
else
{
str.Format(_T("Can't build csv application!,err = %d"), GetLastError());
MessageBoxEx(NULL, str, STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
}
return FALSE;
}
this->SaveTdHeadToCsvFile(pCsvFile);
this->SaveTdConToCsvFile(pCsvFile);
this->SaveTdGRToCsvFile(pCsvFile);
fclose(pCsvFile);
return TRUE;
}
BOOL CSP2DTd::SaveTdToRes2DFile(CString f_szFileName)
{
long lRet = VAL_ZERO;
int iListIndex = (int)VAL_ZERO;
CString szSql = _T("");
CString szCaption = _T("");
UINT uExecCode = (UINT)APP_SUCCESS;
CSaveInRes* pSaveInRes = NULL;
CString szFilePath = _T("");
CString szFileName = _T("");
CString szFile = _T("");
CStringArray saRecord;
CString szTdName = _T("");
CString szTdCN = _T("");
CString szDESN = _T("");
CString szEDistance = _T("");
CString szAr = _T("");
CString szTPAmount = _T("");
CString szTType = _T("");
CString szA = _T("");
CString szB = _T("");
CString szM = _T("");
CString szN = _T("");
CString szR0 = _T("");
CString szDistance = _T("");
CString szElevation = _T("");
DWORD dwChID = (DWORD)VAL_ZERO;
_RecordsetPtr pRecTd = NULL;
_RecordsetPtr pRecCh = NULL;
_RecordsetPtr pRecTdCon = NULL;
pRecTd.CreateInstance(_uuidof(Recordset));
pRecCh.CreateInstance(_uuidof(Recordset));
pRecTdCon.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select TDname,TdCN,DESN,Ttype,Edistance,TPamount from td where ID = %u"), this->m_dwID);
pRecTd->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecTd->GetRecordCount())
{
szTdName = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TDname"));
// szTdCN = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TdCN"));
szDESN = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("DESN"));
szTType = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Ttype"));
szEDistance = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("Edistance"));
szTPAmount = (LPCTSTR)(_bstr_t)pRecTd->GetCollect(_T("TPamount"));
}
pRecTd->Close();
szSql.Empty();
szSql.Format(_T("select ID,AR from tdchannel where TDID = %u and CHnumber = 1"), this->m_dwID);
pRecCh->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecCh->GetRecordCount())
{
dwChID = pRecCh->GetCollect(_T("ID")).ulVal;
szAr = (LPCTSTR)(_bstr_t)pRecCh->GetCollect(_T("AR"));
}
pRecCh->Close();
if(AR_BIPOLE_HOLE_SPT == atoi(szAr))
{
if (LANG_ZHCN == g_iUILanguage)
AfxMessageBox(_T("不支持将该装置装置数据导出dat"));
else
MessageBoxEx(NULL, _T("Not support export data to dat file"), STRING_MESSAGEBOXEX_TITLE, MB_OK, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US));
return FALSE;
}
pSaveInRes = new CSaveInRes;
szFilePath.Empty();
szFilePath.GetBufferSetLength(256);
::GetCurrentDirectory(szFilePath.GetLength(), szFilePath.GetBuffer(szFilePath.GetLength()));
szFilePath.ReleaseBuffer();
szFilePath = szFilePath + _T("\\DAT\\");
szFileName = szTdName + _T(".dat");
szFile = szFilePath + szFileName;
pSaveInRes->CreateResFile(f_szFileName);
saRecord.RemoveAll();
saRecord.Add(szTdName);
saRecord.Add(szEDistance);
saRecord.Add(szAr);
saRecord.Add(szTPAmount);
saRecord.Add(_T("0"));
saRecord.Add(szTType);
pSaveInRes->AddFileHeader(Res, atoi(szAr.GetBuffer(0)), &saRecord);
pSaveInRes->Init2DFileHeader(&saRecord);
//判断有没有层数信息
szSql.Empty();
szSql.Format(_T("select C1 from td2dcon where TCHID = %u and bUse <> 0 and Layer is null"),dwChID);
pRecTdCon->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
//如果存在着层数为空的数据，那么则认为是以前版本的数据，此时按照老规则直接取出数据进行生成DAT文件
if (((long)VAL_ZERO != pRecTdCon->GetRecordCount()) || (AR_CUSTOM_2D_TYPE == atoi(szAr)) || (AR_CROSS_HOLE_TYPE == atoi(szAr)))
{
szSql.Empty();
szSql.Format(_T("select C1,C2,P1,P2,R0,bUse from td2dcon where TCHID = %u and bUse <> 0"), dwChID);
}
//否则则按照层数和C1的逐渐增大进行排序
else
{
szSql.Empty();
szSql.Format(_T("select C1,C2,P1,P2,R0,bUse from td2dcon where TCHID = %u and bUse <> 0 order by Layer, C1"), dwChID);
}
pRecTdCon->Close();
pRecTdCon->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
while ((short)VAL_ZERO == pRecTdCon->adoEOF)
{
szR0.Empty();
float fR0 = (float)pRecTdCon->GetCollect(_T("R0")).fltVal;
szR0.Format(_T("%f"),fR0);
szA.Empty();
szA = (LPCTSTR)(_bstr_t)pRecTdCon->GetCollect(_T("C1"));
szB.Empty();
szB = (LPCTSTR)(_bstr_t)pRecTdCon->GetCollect(_T("C2"));
szM.Empty();
szM = (LPCTSTR)(_bstr_t)pRecTdCon->GetCollect(_T("P1"));
szN.Empty();
szN = (LPCTSTR)(_bstr_t)pRecTdCon->GetCollect(_T("P2"));
saRecord.RemoveAll();
saRecord.Add(szA);
saRecord.Add(szB);
saRecord.Add(szM);
saRecord.Add(szN);
saRecord.Add(szR0);
pSaveInRes->AddDateToFile(&saRecord);
pRecTdCon->MoveNext();
}
pRecTdCon->Close();
//////////////////////////deleted by lsq 20160713////////////////////////////////////////////
//地形文件的添加放到了工具栏中，所以这里就无需再加了
/*
szCaption.Empty();
szCaption.LoadString(IDS_CAPTION_0009);
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
if (AfxMessageBox( szCaption, MB_YESNO) == IDYES )
{
COpTGDDlg* pOpTGDDlg = new COpTGDDlg();
pOpTGDDlg->Create(IDD_OP_TGD_C, AfxGetMainWnd());
this->InitialTGDDlg(pOpTGDDlg);
pOpTGDDlg->ShowWindow(SW_SHOW);
lRet = pOpTGDDlg->RunModalLoop(MLF_SHOWONIDLE);
if (RET_OK == lRet)
{
pSaveInRes->m_nLandSign = (int)pOpTGDDlg->m_cbDisType.GetItemData(pOpTGDDlg->m_cbDisType.GetCurSel());
pSaveInRes->m_nFirstPole = pOpTGDDlg->m_cbTGDSN.GetCurSel() + 1;
iListIndex = (int)VAL_ZERO;
saRecord.RemoveAll();
while (iListIndex < pOpTGDDlg->m_tgdList.GetItemCount())
{
szDistance.Empty();
szDistance = pOpTGDDlg->m_tgdList.GetItemText(iListIndex, 1);
szElevation.Empty();
szElevation = pOpTGDDlg->m_tgdList.GetItemText(iListIndex, 2);
saRecord.Add(szDistance + _T(" ") + szElevation);
iListIndex ++;
}
pSaveInRes->WriteLandInform(&saRecord);
}
}
*/
pSaveInRes->CloseFile();
return TRUE;
}
void CSP2DTd::InitialTGDDlg(COpTGDDlg* pOpTGDDlg)
{
_RecordsetPtr pRecCM = NULL;
CString szSql = _T("");
int iIndex = (int)VAL_ZERO;
pRecCM.CreateInstance(_uuidof(Recordset));
pOpTGDDlg->m_cbDisType.ResetContent();
iIndex = (int)VAL_ZERO;
szSql.Empty();
szSql.Format(_T("select Clabel,Cvalue from cm where Cname = 'Distance type' and Lang = %d order by Cvalue"), g_iLanguage);
pRecCM->Open(szSql.AllocSysString(),_variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
while ((short)VAL_ZERO == pRecCM->adoEOF)
{
iIndex = pOpTGDDlg->m_cbDisType.AddString((LPCTSTR)(_bstr_t)pRecCM->GetCollect(_T("Clabel")));
pOpTGDDlg->m_cbDisType.SetItemData(iIndex, (DWORD)pRecCM->GetCollect(_T("Cvalue")).iVal);
pRecCM->MoveNext();
}
pRecCM->Close();
}
void CSP2DTd::ClearTdChaList()
{
CTdChannel* pTdChannel = NULL;
int iTdChannelIndex = (int)VAL_ZERO;
iTdChannelIndex = (int)VAL_ZERO;
while (iTdChannelIndex < this->m_tdChaList.GetCount())
{
pTdChannel = NULL;
pTdChannel = (CTdChannel *)this->m_tdChaList.GetAt(this->m_tdChaList.FindIndex(iTdChannelIndex));
pTdChannel->Clear2DSptRecList();
delete pTdChannel;
iTdChannelIndex++;
}
this->m_tdChaList.RemoveAll();
}
BOOL CSP2DTd::SaveData()
{
CTdChannel* pTdChannel = NULL;
_RecordsetPtr pRecTd;
_CommandPtr pCmdIns;
CString szSql = _T("");
int iChIndex = (int)VAL_ZERO;
pRecTd.CreateInstance(_uuidof(Recordset));
pCmdIns.CreateInstance(_uuidof(Command));
pCmdIns->ActiveConnection = m_pConnection;
try
{
m_pConnection->BeginTrans();
//int nPoleStep = atoi(this->m_szEDistance.GetBuffer(0));
float fPoleDistance = (float)atof(this->m_szEDistance.GetBuffer(0));
szSql.Empty();
szSql.Format(_T("insert into td(TDname,TDCN,Tlocation,DEID,DESN,TZID,SCID,SCCN,Sname,Stype,Ttype,Tmode,Eamount,TPamount,CHamount,N,TRwave,TRfrequency,Ifrequency,"
"SAfrequency,Clayout,Espace,Edistance,weather,WDIR,temperature,height,humidity,Cdate,Ctime,Tdate,Ttime,Rdirection,CRtime,PM,OP,QA) "
"values('%s','%s','%s',%u,'%s',%u,%u,'%s','%s',%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%.2f,%.2f,%d,%d,%.2f,%.2f,%.2f,#%s#,#%s#,#%s#,#%s#,%d,%d,'%s','%s','%s')"),
this->m_szTdName,
this->m_szTdCN,
this->m_szTLocation,
this->m_pDevice->m_dwID,
this->m_pDevice->m_szDevSN,
this->m_dwTzID,
this->m_dwSCID,
this->m_szSCCN,
this->m_szSName,
this->m_iSType,
this->m_iTType,
this->m_iTMode,
this->m_iEAmount,
this->m_iTPAmount,
this->m_iCHAmount,
this->m_iN,
this->m_iTRWave,
this->m_iTRFrequency,
this->m_iIFrequency,
this->m_iSAFrequency,
this->m_iCLayout,
this->m_fESpace,
fPoleDistance,
//this->m_szEDistance,
this->m_iWeather,
this->m_iWDIR,
this->m_fTemperature,
this->m_fHeight,
this->m_fHumidity,
this->m_szCDate,
this->m_szCTime,
this->m_szTDate,
this->m_szTTime,
this->m_iRDirection,
this->m_iCRtime,
this->m_szPM,
this->m_szOP,
this->m_szQA);
pCmdIns->CommandText = szSql.AllocSysString();
pCmdIns->Execute(NULL, NULL, adCmdText);
pRecTd->Open(_T("select max(ID) as ID from td"), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecTd->GetRecordCount())
{
this->m_dwID = (int)pRecTd->GetCollect(_T("ID")).ulVal;
}
pRecTd->Close();
iChIndex = (int)VAL_ZERO;
while (iChIndex < m_tdChaList.GetCount())
{
pTdChannel = NULL;
pTdChannel = (CTdChannel*)m_tdChaList.GetAt(m_tdChaList.FindIndex(iChIndex));
pTdChannel->SaveRsp2DTdData(m_dwID);
iChIndex++;
}
this->SaveGRDataToDB(m_dwID);
this->SaveOrgDataToDB(m_dwID);
m_pConnection->CommitTrans();
}
catch(_com_error e)
{
m_pConnection->RollbackTrans();
hHook = SetWindowsHookEx(WH_CBT,(HOOKPROC)CBTHookProc,AfxGetInstanceHandle(),NULL);
AfxMessageBox(e.Description());
return FALSE;
}
return TRUE;
}
BOOL CSP2DTd::LoadData(CLinkList<CMedium*>& m_medLinkList)
{
CTdChannel* pTdChannel = NULL;
DWORD dwSCID = (DWORD)VAL_ZERO;
DWORD dwMedHandle = (DWORD)VAL_ZERO;
int iEAmount = (int)VAL_ZERO;
_RecordsetPtr pRecTd;
_RecordsetPtr pRecCh;
_RecordsetPtr pRecTdCon;
CString szSql = _T("");
int iChIndex = (int)VAL_ZERO;
if ((int)VAL_ZERO == m_tdChaList.GetCount())
{
pRecTd.CreateInstance(_uuidof(Recordset));
pRecCh.CreateInstance(_uuidof(Recordset));
szSql.Empty();
szSql.Format(_T("select SCID,Eamount from td where ID = %u"), this->m_dwID);
pRecTd->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
if ((long)VAL_ZERO != pRecTd->GetRecordCount())
{
dwSCID = (DWORD)pRecTd->GetCollect(_T("SCID")).ulVal;
iEAmount = (int)pRecTd->GetCollect(_T("Eamount")).iVal;
}
pRecTd->Close();
szSql.Empty();
szSql.Format(_T("select ID,ChNumber,AR from tdchannel where TDID = %u"), this->m_dwID);
pRecCh->Open(szSql.AllocSysString(), _variant_t((IDispatch*)m_pConnection, true), adOpenStatic, adLockOptimistic, adCmdText);
while ((short)VAL_ZERO == pRecCh->adoEOF)
{
pTdChannel = new CTdChannel(dwSCID, (int)pRecCh->GetCollect(_T("ChNumber")).iVal, this->m_pConnection);
pTdChannel->m_dwID = (DWORD)pRecCh->GetCollect(_T("ID")).ulVal;
pTdChannel->m_iEAmount = iEAmount;
dwMedHandle = m_handleProcessor.GenerateHandle((int)pRecCh->GetCollect(_T("AR")).iVal, PZ_STYLE_MED_DEF);
pTdChannel->m_pMedium = m_medLinkList.Find(dwMedHandle);
if (TRUE == pTdChannel->LoadRsp2DTdData())
{
this->m_tdChaList.AddTail((void*)pTdChannel);
}
pRecCh->MoveNext();
}
pRecCh->Close();
}
return TRUE;
}
BOOL CSP2DTd::DisplayTPSplinesGraph(int iTSN)
{
((CTdChannel*)this->m_tdChaList.GetAt(this->m_tdChaList.FindIndex(0)))->GetTdRecord(iTSN)->DisplayRawDataSplines();
return TRUE;
}
BOOL CSP2DTd::DisplayGraph()
{
return TRUE;
}
Reference in New Issue View Git Blame Copy Permalink