clientinforform.cpp

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

	bt_add->EnableWindow(true);  //添加按钮可用
	bt_cancelation->EnableWindow(false); //取消按钮不可用
	bt_delete->EnableWindow(false); //删除按钮不可用
	bt_save->EnableWindow(false); //保存按钮不可用

	Refresh();
	
	UpdateData(false);  //将数据更新到对话框
}

void CClientInforForm::OnModify() 
{
	flag=2;  //设定保存标志,修改
    //设定除了客户编号外的所有编辑框均可用
	tx_clientID->EnableWindow(false);
	tx_clientName->EnableWindow(true);
	tx_bookinDate->EnableWindow(true);
	tx_clientLevel->EnableWindow(true);
	tx_contactPerson->EnableWindow(true);
	tx_area->EnableWindow(true);
	tx_address->EnableWindow(true);
	tx_postcode->EnableWindow(true);
	tx_telephone->EnableWindow(true);
	tx_fax->EnableWindow(true);
	tx_webSite->EnableWindow(true);
	tx_eMail->EnableWindow(true);
	tx_remark->EnableWindow(true);
	tx_manageRange->EnableWindow(true);
	tx_manageProduct->EnableWindow(true);
	tx_accountBank->EnableWindow(true);
	tx_account->EnableWindow(true);
	tx_taxNO->EnableWindow(true);
	tx_registerDate->EnableWindow(true);
	tx_registerFund->EnableWindow(true);
	tx_scale->EnableWindow(true);
	tx_industryCharacter->EnableWindow(true);
	tx_allFunds->EnableWindow(true);
	tx_clientCharacter->EnableWindow(true);
    //设定按钮的可用性
	bt_add->EnableWindow(false);  //添加按钮不可用
	bt_cancelation->EnableWindow(false); //取消按钮不可用
	bt_delete->EnableWindow(false);  //删除按钮不可用
	bt_save->EnableWindow(true); //保存按钮不可用	
}

void CClientInforForm::OnSave() 
{
	UpdateData(true);
	CClientInfor client;  //构造CClientInfor对象
	//分别为client对象的数据成员赋值
	client.SetClientID(m_clientID);  //客户编号
	client.SetClientName(m_clientName); //单位名称
	client.SetBookinDate(m_bookinDate);  //登记日期
	client.SetClientLevel(m_clientLevel); //客户级别
	client.SetContactPerson(m_contactPerson); //联系人
	client.SetArea(m_area); //地区
	client.SetAddress(m_address); //地址
	client.SetPostcode(m_postcode); //邮编
	client.SetTelephone(m_telephone); //电话
	client.SetFax(m_fax); //传真
	client.SetWebSite(m_webSite); //网站
	client.SetEMail(m_eMail); //eMail
	client.SetRemark(m_remark); //备注
	client.SetManageRange(m_manageRange);//经营范围
	client.SetManageProduct(m_manageProduct); //经营产品
	client.SetAccountBank(m_accountBank);//开户银行
	client.SetAccount(m_account); //帐号
	client.SetTaxNO(m_taxNO); //税号
	client.SetRegisterDate(m_registerDate); //注册日期
	client.SetRegisterFund(m_registerFund); //注册资金
	client.SetScale(m_scale);  //规模
	client.SetIndustryCharacter(m_industryCharacter); //行业性质
	client.SetAllFunds(m_allFunds); //总资产
	client.SetClientCharacter(m_clientCharacter); //性质	

	if(flag==1)  //新增记录
	{
		client.sqlInsert();	//调用CClientInfor的sqlInsert()方法插入数据
		int i=m_list.GetItemCount(); //获取当前列表框中条目的数目
        //将插入数据库的数据插入列表框中
		CString str;
		m_list.InsertItem(i,m_clientID);//客户编号
		m_list.SetItemText(i,1,m_clientName);//单位名称
	
		//将登记日期转换成CString类型显示
		str.Format("%d-%d-%d",m_bookinDate.GetYear(),m_bookinDate.GetMonth(),m_bookinDate.GetDay());
		m_list.SetItemText(i,2,str); 
		m_list.SetItemText(i,3,m_clientLevel);//客户级别
		m_list.SetItemText(i,4,m_contactPerson);	//联系人	
		m_list.SetItemText(i,5,m_area); //地区
		m_list.SetItemText(i,6,m_address); //地址
		m_list.SetItemText(i,7,m_postcode); //邮编
		m_list.SetItemText(i,8,m_telephone); //电话
		m_list.SetItemText(i,9,m_fax); //传真
		m_list.SetItemText(i,10,m_webSite); //网址
		m_list.SetItemText(i,11,m_eMail); //eMail
		m_list.SetItemText(i,12,m_remark); //备注
		m_list.SetItemText(i,13,m_manageRange); //经营范围
		m_list.SetItemText(i,14,m_manageProduct); //经营产品
		m_list.SetItemText(i,15,m_accountBank); //开户银行
		m_list.SetItemText(i,16,m_account); //帐号
		m_list.SetItemText(i,17,m_taxNO); //税号
		////将注册日期转换成CString类型显示
		str.Format("%d-%d-%d",m_registerDate.GetYear(),m_registerDate.GetMonth(),m_registerDate.GetDay());
		m_list.SetItemText(i,18,str);
		str.Format("%f",m_registerFund);//注册资金
		m_list.SetItemText(i,19,str);
		m_list.SetItemText(i,20,m_scale);//规模
		m_list.SetItemText(i,21,m_industryCharacter);//行业性质
		str.Format("%f",m_allFunds);//总资产
		m_list.SetItemText(i,22,str);
		m_list.SetItemText(i,23,m_clientCharacter);//性质
	}
	else
	{
		client.sqlUpdate(m_clientID); //更新当前记录
		Refresh();
	}
	//保存完毕,编辑框均不可用
	tx_clientID->EnableWindow(false);
	tx_clientName->EnableWindow(false);
	tx_bookinDate->EnableWindow(false);
	tx_clientLevel->EnableWindow(false);
	tx_contactPerson->EnableWindow(false);
	tx_area->EnableWindow(false);
	tx_address->EnableWindow(false);
	tx_postcode->EnableWindow(false);
	tx_telephone->EnableWindow(false);
	tx_fax->EnableWindow(false);
	tx_webSite->EnableWindow(false);
	tx_eMail->EnableWindow(false);
	tx_remark->EnableWindow(false);
	tx_manageRange->EnableWindow(false);
	tx_manageProduct->EnableWindow(false);
	tx_accountBank->EnableWindow(false);
	tx_account->EnableWindow(false);
	tx_taxNO->EnableWindow(false);
	tx_registerDate->EnableWindow(false);
	tx_registerFund->EnableWindow(false);
	tx_scale->EnableWindow(false);
	tx_industryCharacter->EnableWindow(false);
	tx_allFunds->EnableWindow(false);
	tx_clientCharacter->EnableWindow(false);
   
	bt_add->EnableWindow(true);  //添加按钮可用
	bt_cancelation->EnableWindow(false); //取消按钮不可用
	bt_delete->EnableWindow(true); //删除按钮可用
	bt_save->EnableWindow(false); //保存按钮不可用
	bt_modify->EnableWindow(true); //修改按钮可用
}

void CClientInforForm::OnCancelation() 
{
	CString m_formID;
	int formID=((CClientRelationshipApp*)AfxGetApp())->m_pIDRecordset->GetCollect("clientID").intVal;

	CString str;
	str.Format("%d",formID-1);//将当前的客户编号减1
	((CClientRelationshipApp*)AfxGetApp())->m_pIDRecordset->PutCollect("clientID",_variant_t(str));
	((CClientRelationshipApp*)AfxGetApp())->m_pIDRecordset->Update();//更新编号表
}

void CClientInforForm::OnExit() 
{
	this->OnCancel();
}

BOOL CClientInforForm::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 areaName from area"; //构造查询语句,地区
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);//打开查询结果记录集对象
	int i=0;
	while(!(m_pRecordset->adoEOF))
	{
		//将数据插入组合框中
		m_areaCombo.InsertString(i,((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("areaName")));
		m_pRecordset->MoveNext();  //记录集指针向后移动
		i++;
	}
	m_pRecordset->Close();  //关闭记录集
	

	strSQL="select * from client "; //构造客户查询的SQL语句
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
			((CClientRelationshipApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
			adOpenDynamic,adLockPessimistic,adCmdText);//打开查询记录集对象
	i=0;
	//将查询结果记录集中的
	while(!(m_pRecordset->adoEOF))
	{  
		CString str;
		m_list.InsertItem(i, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("clientID")));//客户编号
		m_list.SetItemText(i,1, ((CClientRelationshipApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("clientName")));//单位名称
		COleDateTime bookinDate = m_pRecordset->GetCollect("bookinDate");  //登记日期
		str.Format("%d-%d-%d",bookinDate.GetYear(),bookinDate.GetMonth(),bookinDate.GetDay());  //将日期转换成字符串显示