⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dcliect.cpp

📁 商品销售管理系统:随着信息技术的快速进步
💻 CPP
字号:
// DCliect.cpp : implementation file
//

#include "stdafx.h"
#include "商品销售管理系统.h"
#include "DCliect.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
#include "ExternDllHeader.h"
/////////////////////////////////////////////////////////////////////////////
// CDCliect dialog


CDCliect::CDCliect(CWnd* pParent /*=NULL*/)
	: CDialog(CDCliect::IDD, pParent)
{
	//{{AFX_DATA_INIT(CDCliect)
	//}}AFX_DATA_INIT
	this->AddOrChange=0;
}


void CDCliect::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDCliect)
	DDX_Control(pDX, IDC_CLIECT_LINKMAN, m_EdtLinkMan);
	DDX_Control(pDX, IDC_CLIECT_EDTLINKMANTEL, m_EdtLinkManTel);
	DDX_Control(pDX, IDC_WARE_BUTUNDO, m_ButUndo);
	DDX_Control(pDX, IDC_WARE_BUTSAVE, m_ButSave);
	DDX_Control(pDX, IDC_WARE_BUTEXIT, m_ButExit);
	DDX_Control(pDX, IDC_WARE_BUTDELE, m_ButDelete);
	DDX_Control(pDX, IDC_WARE_BUTCHANGE, m_ButChange);
	DDX_Control(pDX, IDC_WARE_BUTADD, m_ButAdd);
	DDX_Control(pDX, IDC_CLIECT_EDTTEL, m_EdtTel);
	DDX_Control(pDX, IDC_CLIECT_EDTTAXPAYPER, m_EdtTaxPayer);
	DDX_Control(pDX, IDC_CLIECT_EDTSNAME, m_EdtSName);
	DDX_Control(pDX, IDC_CLIECT_EDTNAME, m_EdtName);
	DDX_Control(pDX, IDC_CLIECT_EDTID, m_EdtID);
	DDX_Control(pDX, IDC_CLIECT_EDTFAX, m_EdtFax);
	DDX_Control(pDX, IDC_CLIECT_EDTEMAIL, m_EdtEmail);
	DDX_Control(pDX, IDC_CLIECT_EDTBANKID, m_EdtBankID);
	DDX_Control(pDX, IDC_CLIECT_EDTBANK, m_EdtBank);
	DDX_Control(pDX, IDC_CLIECT_EDTADDR, m_EdtAddr);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDCliect, CDialog)
	//{{AFX_MSG_MAP(CDCliect)
	ON_EN_CHANGE(IDC_CLIECT_EDTNAME, OnChangeCliectEdtname)
	ON_BN_CLICKED(IDC_WARE_BUTADD, OnWareButadd)
	ON_BN_CLICKED(IDC_WARE_BUTCHANGE, OnWareButchange)
	ON_BN_CLICKED(IDC_WARE_BUTDELE, OnWareButdele)
	ON_BN_CLICKED(IDC_WARE_BUTSAVE, OnWareButsave)
	ON_BN_CLICKED(IDC_WARE_BUTUNDO, OnWareButundo)
	ON_BN_CLICKED(IDC_WARE_BUTEXIT, OnWareButexit)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDCliect message handlers

void CDCliect::OnOK() 
{
	// TODO: Add extra validation here
	
	//CDialog::OnOK();
}

void CDCliect::Display(CString sField,CString sValue)
{
	RxRecordset disRst;
	CString sSQL;
	sSQL.Format("SELECT * FROM 客户信息表 WHERE %s='%s'",sField,sValue);
	disRst.Open(sSQL,adCmdText);
	disRst.MoveFirst();
	CString EdtLinkManTel,EdtTel,EdtTaxPayer,EdtSName,EdtName,EdtLinkMan,EdtID,EdtFax,EdtEmail,EdtBankID,EdtBank,EdtAddr;	
	EdtID=disRst.GetFieldValue("编号");
	EdtName=disRst.GetFieldValue("名称");
	EdtSName=disRst.GetFieldValue("简称");
	EdtAddr=disRst.GetFieldValue("地址");
	EdtTel=disRst.GetFieldValue("电话");
	EdtFax=disRst.GetFieldValue("传真");
	EdtLinkMan=disRst.GetFieldValue("联系人");
	EdtLinkManTel=disRst.GetFieldValue("联系人电话");
	EdtBank=disRst.GetFieldValue("银行");
	EdtBankID=disRst.GetFieldValue("账户");
	EdtTaxPayer=disRst.GetFieldValue("纳税人");
	EdtEmail=disRst.GetFieldValue("Email");
	m_EdtID.SetWindowText(EdtID);
	m_EdtName.SetWindowText(EdtName);
	m_EdtSName.SetWindowText(EdtSName);
	m_EdtAddr.SetWindowText(EdtAddr);
	m_EdtTel.SetWindowText(EdtTel);
	m_EdtFax.SetWindowText(EdtFax);
	m_EdtLinkMan.SetWindowText(EdtLinkMan);
	m_EdtLinkManTel.SetWindowText(EdtLinkManTel);
	m_EdtBank.SetWindowText(EdtBank);
	m_EdtBankID.SetWindowText(EdtBankID);
	m_EdtTaxPayer.SetWindowText(EdtTaxPayer);
	m_EdtEmail.SetWindowText(EdtEmail);
	disRst.Close();
}

void CDCliect::Clear()
{
	m_EdtName.SetWindowText("");
	m_EdtSName.SetWindowText("");
	m_EdtAddr.SetWindowText("");
	m_EdtTel.SetWindowText("");
	m_EdtFax.SetWindowText("");
	m_EdtLinkMan.SetWindowText("");
	m_EdtLinkManTel.SetWindowText("");
	m_EdtBank.SetWindowText("");
	m_EdtBankID.SetWindowText("");
	m_EdtTaxPayer.SetWindowText("");
	m_EdtEmail.SetWindowText("");
}

void CDCliect::Enabled(bool bEnabled)
{
	m_EdtName.EnableWindow(bEnabled);
	m_EdtSName.EnableWindow(bEnabled);
	m_EdtAddr.EnableWindow(bEnabled);
	m_EdtTel.EnableWindow(bEnabled);
	m_EdtFax.EnableWindow(bEnabled);
	m_EdtLinkMan.EnableWindow(bEnabled);
	m_EdtLinkManTel.EnableWindow(bEnabled);
	m_EdtBank.EnableWindow(bEnabled);
	m_EdtBankID.EnableWindow(bEnabled);
	m_EdtTaxPayer.EnableWindow(bEnabled);
	m_EdtEmail.EnableWindow(bEnabled);
	m_ButUndo.EnableWindow(bEnabled);
	m_ButSave.EnableWindow(bEnabled);
	m_ButExit.EnableWindow(!bEnabled);
	m_ButDelete.EnableWindow(!bEnabled);
	m_ButChange.EnableWindow(!bEnabled);
	m_ButAdd.EnableWindow(!bEnabled);
}

void CDCliect::OnChangeCliectEdtname() 
{
	CString sName,sSName;
	this->m_EdtName.GetWindowText(sName);
	sSName=CharToLetterCode(sName);
	this->m_EdtSName.SetWindowText(sSName);
	
}

BOOL CDCliect::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	Cliectrst.Open("客户信息表");	
	Cliectrst.MoveFirst();
	if(m_sID!="0")
		Display("编号",m_sID);
	this->Enabled(false);	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CDCliect::SetID(CString sID)
{
	m_sID=sID;
}

void CDCliect::OnWareButadd() 
{
	CString cID;
	this->Enabled(true);
	m_EdtID.GetWindowText(cID);
	if(cID.IsEmpty())
		cID="KH00000001";
	else
		cID=ado.AutoNumber("客户信息表","编号","KH",2);
	this->m_EdtID.SetWindowText(cID);
	this->Clear();
	m_EdtName.SetFocus();
	this->AddOrChange=1;	
}

void CDCliect::OnWareButchange() 
{
	CString cID;
	this->Enabled(true);
	m_EdtName.SetFocus();
	this->AddOrChange=2;	
}

void CDCliect::OnWareButdele() 
{
	if(MessageBox("删除后无法恢复 ,确定删除此条记录吗?","系统提示",MB_OKCANCEL|MB_ICONQUESTION)==1)	
	{
		CString sSQL,sID;
		this->m_EdtID.GetWindowText(sID);
		sSQL.Format("DELETE FROM 客户信息表 WHERE 编号='%s'",sID);
		RxRecordset DeleRst;
		DeleRst.Open(sSQL,adCmdText);
		this->OnCancel();
	}
	
}

void CDCliect::OnWareButsave() 
{
	if(MessageBox("确定要保存记录吗?","系统提示",MB_OKCANCEL|MB_ICONQUESTION)==1)	
	{
		CString EdtID,EdtName,EdtSName,EdtAddr,EdtTel,EdtFax,EdtLinkMan,EdtLinkManTel,EdtBank,EdtBankID,EdtTaxPayer,EdtEmail;	
		m_EdtID.GetWindowText(EdtID);
		m_EdtName.GetWindowText(EdtName);
		m_EdtSName.GetWindowText(EdtSName);
		m_EdtAddr.GetWindowText(EdtAddr);
		m_EdtTel.GetWindowText(EdtTel);
		m_EdtFax.GetWindowText(EdtFax);
		m_EdtLinkMan.GetWindowText(EdtLinkMan);
		m_EdtLinkManTel.GetWindowText(EdtLinkManTel);
		m_EdtBank.GetWindowText(EdtBank);
		m_EdtBankID.GetWindowText(EdtBankID);
		m_EdtTaxPayer.GetWindowText(EdtTaxPayer);
		m_EdtEmail.GetWindowText(EdtEmail);
		
		RxRecordset AddRst;
		CString sSQL;
		if(this->AddOrChange==1)    //添加
			sSQL.Format("INSERT INTO 客户信息表 VALUES('%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s')",EdtID,EdtName,EdtSName,EdtAddr,EdtTel,EdtFax,EdtLinkMan,EdtLinkManTel,EdtBank,EdtBankID,EdtTaxPayer,EdtEmail);
		if(this->AddOrChange==2)    //修改
			sSQL.Format("UPDATE 客户信息表 SET 名称='%s',简称='%s',地址='%s',电话='%s',传真='%s',联系人='%s',联系人电话='%s',银行='%s',账户='%s',纳税人='%s',Email='%s' WHERE 编号='%s'",EdtName,EdtSName,EdtAddr,EdtTel,EdtFax,EdtLinkMan,EdtLinkManTel,EdtBank,EdtBankID,EdtTaxPayer,EdtEmail,EdtID);
		AddRst.Open(sSQL,adCmdText);
		this->AddOrChange=0;
		this->Enabled(false);
		this->m_ButAdd.SetFocus();

	}	
}

void CDCliect::OnWareButundo() 
{
	if(MessageBox("确定要撤消操作吗?","系统提示",MB_OKCANCEL|MB_ICONQUESTION)==1)	
	{
		Enabled(false);
		Display("编号",m_sID);
		this->AddOrChange=0;
		this->m_ButAdd.SetFocus();
	}	
}

void CDCliect::OnWareButexit() 
{
	if(this->AddOrChange!=0)
		OnWareButsave();
	this->OnCancel();	
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -