📄 dcliect.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 + -