searchclient.cpp

关于客户关系管理系统的源码

		m_list.SetItemText(i,7, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("postcode")));//邮编
		m_list.SetItemText(i,8, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("telephone")));//电话
		m_list.SetItemText(i,9, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("fax")));//传真
		m_list.SetItemText(i,10, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("webSite")));//网址
		m_list.SetItemText(i,11, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("eMail")));//eMail
		m_list.SetItemText(i,12, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("remark")));//备注
		m_list.SetItemText(i,13, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("manageRange")));//经营范围
		m_list.SetItemText(i,14,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("manageProduct")));//经营产品
		m_list.SetItemText(i,15, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("accountBank")));//开户银行
		m_list.SetItemText(i,16, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("account")));//帐号
		m_list.SetItemText(i,17, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("taxNO")));//税号
		COleDateTime registerDate=m_pRecordset->GetCollect("registerDate");//注册日期
		str.Format("%d-%d-%d",registerDate.GetYear(),registerDate.GetMonth(),registerDate.GetDay());//将注册日期转换成字符串
		m_list.SetItemText(i,18, str);
		m_list.SetItemText(i,19, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("registerFund")));//注册资金
		m_list.SetItemText(i,20, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("scale")));//规模
		m_list.SetItemText(i,21, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("industryCharacter")));//行业性质
		m_list.SetItemText(i,22, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("allFunds")));//总资产
		m_list.SetItemText(i,23, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("clientCharacter")));//性质	
		
		m_pRecordset->MoveNext();//记录集指针向后移动
		i++;
	}
	m_pRecordset->Close();//关闭记录集	
}

void CSearchClient::OnClickList1(NMHDR* pNMHDR, LRESULT* pResult) 
{
	// TODO: Add your control notification handler code here
	
	*pResult = 0;
}

BOOL CSearchClient::OnInitDialog() 
{
	CDialog::OnInitDialog();

	DWORD style;
	style=m_list.GetExStyle();
	style=(style|LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT)&(~LVS_EX_CHECKBOXES) ;
	m_list.SetExtendedStyle(style);
	
	m_list.InsertColumn(0,"客户编码",LVCFMT_LEFT,100);
	m_list.InsertColumn(1,"单位名称",LVCFMT_LEFT,100);
	m_list.InsertColumn(2,"联系人",LVCFMT_LEFT,100);
	m_list.InsertColumn(3,"登记日期",LVCFMT_LEFT,100);
	m_list.InsertColumn(4,"客户级别",LVCFMT_LEFT,100);
	m_list.InsertColumn(5,"地区",LVCFMT_LEFT,100);
	m_list.InsertColumn(6,"地址",LVCFMT_LEFT,100);
	m_list.InsertColumn(7,"邮编",LVCFMT_LEFT,100);
	m_list.InsertColumn(8,"电话",LVCFMT_LEFT,100);
	m_list.InsertColumn(9,"传真",LVCFMT_LEFT,100);
	m_list.InsertColumn(10,"网站",LVCFMT_LEFT,100);
	m_list.InsertColumn(11,"EMail",LVCFMT_LEFT,100);
	m_list.InsertColumn(12,"备注",LVCFMT_LEFT,100);
	m_list.InsertColumn(13,"经营范围",LVCFMT_LEFT,100);
	m_list.InsertColumn(14,"经营产品",LVCFMT_LEFT,100);
	m_list.InsertColumn(15,"开户行",LVCFMT_LEFT,100);
	m_list.InsertColumn(16,"帐号",LVCFMT_LEFT,100);
	m_list.InsertColumn(17,"税号",LVCFMT_LEFT,100);
	m_list.InsertColumn(18,"注册日期",LVCFMT_LEFT,100);
	m_list.InsertColumn(19,"注册资金",LVCFMT_LEFT,100);
	m_list.InsertColumn(20,"规模",LVCFMT_LEFT,100);
	m_list.InsertColumn(21,"行业性质",LVCFMT_LEFT,100);
	m_list.InsertColumn(22,"总资产",LVCFMT_LEFT,100);
	m_list.InsertColumn(23,"性质",LVCFMT_LEFT,100);
	
	CString strSQL;
	_RecordsetPtr m_pRecordset;
	HRESULT hTRes;
	hTRes = m_pRecordset.CreateInstance(_T("ADODB.Recordset"));	
	//为客户编号组合框添加可选项
	strSQL="select distinct clientID from client"; //构造查询的sql语句				
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);//打开查询记录集
	int i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_clientIDCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("clientID")));//插入
		m_pRecordset->MoveNext();//记录集指针向后移动
		i++;
	}
	m_pRecordset->Close();
	//为联系人组合框添加可选项
	strSQL="select distinct contactPerson from client";	
				
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_contactPersonCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("contactPerson")));//插入
		m_pRecordset->MoveNext();//记录集指针向后移动
		i++;
	}
	m_pRecordset->Close();
	//为单位名称组合框添加可选项
	strSQL="select distinct clientName from client";//构造查询语句
				
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);//打开查询结果记录集
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_clientNameCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("clientName")));//插入
		m_pRecordset->MoveNext();//记录集指针向后移动
		i++;
	}
	m_pRecordset->Close();
	//为地址组合框添加可选项
	strSQL="select distinct address from client";				
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_addressCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("address")));
		m_pRecordset->MoveNext();
		i++;
	}
	m_pRecordset->Close();
	//为经营范围组合框添加可选项
	strSQL="select distinct manageRange from client";					
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_manageRangeCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("manageRange")));
		m_pRecordset->MoveNext();
		i++;
	}
	m_pRecordset->Close();
	//为经营产品组合框添加可选项
	strSQL="select distinct manageProduct from client";					
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_manageProductCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("manageProduct")));
		m_pRecordset->MoveNext();
		i++;
	}
	m_pRecordset->Close();
	//为行业性质组合框添加可选项
	strSQL="select distinct industryCharacter from client";					
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_industryCharacterCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("industryCharacter")));
		m_pRecordset->MoveNext();
		i++;
	}
	m_pRecordset->Close();

	//为规模组合框添加可选项
	strSQL="select distinct scale from client";					
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_scaleCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("scale")));
		m_pRecordset->MoveNext();
		i++;
	}
	m_pRecordset->Close();
	//为客户级别组合框添加可选项
	strSQL="select distinct clientLevel from client";	
				
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);
	i=0;
	while(!(m_pRecordset->adoEOF))
	{
		m_clientLevelCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("clientLevel")));
		m_pRecordset->MoveNext();
		i++;
	}
	m_pRecordset->Close();
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CSearchClient::OnDblclkList1(NMHDR* pNMHDR, LRESULT* pResult) 
{
	CString str;
	int flag=0;
	POSITION pos = m_list.GetFirstSelectedItemPosition();//获取双击的位置
	if(pos)
	{
		int nFirstSelItem = m_list.GetNextSelectedItem(pos);//获取双击的条目		
		str=m_list.GetItemText(nFirstSelItem,0); //获取条目的客户编号
	}
	CClientInforForm dlg; //构造客户信息对话框
	dlg.m_clientID=str;  //初始化客户编号
	dlg.is_search=1;     //设定调用标识
	dlg.DoModal();	  //显示对话框
}