zpcdlg.cpp

这是我用VC编的一个银行管理系统

// zpcdlg.cpp : implementation file
//

#include "stdafx.h"
#include "bank.h"
#include "zpcdlg.h"
#include "R2set.h"
#include "R3set.h"
#include "qddlg.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// Czpcdlg dialog


Czpcdlg::Czpcdlg(CWnd* pParent /*=NULL*/)
	: CDialog(Czpcdlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(Czpcdlg)
	m_zpno1 = _T("");
	m_amount1 = 0.0;
	//}}AFX_DATA_INIT
}


void Czpcdlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(Czpcdlg)
	DDX_Text(pDX, IDC_EDIT3, m_zpno1);
	DDX_Text(pDX, IDC_EDIT1, m_amount1);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(Czpcdlg, CDialog)
	//{{AFX_MSG_MAP(Czpcdlg)
	ON_BN_CLICKED(ID_zpc, Onzpc)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// Czpcdlg message handlers

void Czpcdlg::Onzpc() 
{
   Cqddlg dlg;
   CR3set set3;
    CR2set set2;
 this->UpdateData(true);
 if(m_amount1<0)::MessageBox(NULL,"错误操作","登录错误",MB_ICONINFORMATION);
 else {if(!set2.IsOpen())
    set2.Open(CRecordset::dynaset,_T("select * from users where zipiaono='"+m_zpno1+"'"));
   if(set2.MyGetRecordCount()<=0)
  {::MessageBox(NULL,"无此支票号，请核对后重新输入！","登录错误",MB_ICONINFORMATION);}
else if(set2.m_amount<m_amount1)	
::MessageBox(NULL,"对不起，你帐号上钱不够","登录错误",MB_ICONINFORMATION);		
else{if(m_amount1<0)::MessageBox(NULL,"操作错误","登录错误",MB_ICONINFORMATION);
  else{this->UpdateData(true);
	 set3.Open();
	 set3.MoveLast();
	 set3.AddNew();
	 set3.m_cardno=dlg.m_card;
     set3.m_operation= "转入";
	 set3.m_trcardno = m_zpno1;
    set3.m_operamount=m_amount1;
	set3.Update();	
	set3.Close();
	double t1;double s1;
    t1=-m_amount1;
    s1=set2.m_amount; 
	CString	c1=set2.m_cardno;
	CString	p1=set2.m_password;
	CString z1=set2.m_zipiaono;
	CString u1=set2.m_userName;
    CString	i1=set2.m_identify;
    CString io1=set2.m_idenno;
	CString	a1=set2.m_address;
	CString	te1=set2.m_telephone;
	
	int	ac1=set2.m_accountType;
	BOOL h1=set2.AddConfigToTable(dlg.m_card,c1,p1,z1,u1,i1,io1,a1,te1,ac1,t1,s1) ;
	set2.Close();
set2.Open(CRecordset::dynaset,_T("select * from users where cardno='"+dlg.m_card+"'"));
    double t;double s;
    t=m_amount1;
    s=set2.m_amount; 
	CString	c=set2.m_cardno;
	CString	p=set2.m_password;
	CString z=set2.m_zipiaono;
	CString u=set2.m_userName;
    CString	i=set2.m_identify;
    CString io=set2.m_idenno;
	CString	a=set2.m_address;
	CString	te=set2.m_telephone;
	
	int		ac=set2.m_accountType;
	BOOL h=set2.AddConfigToTable(dlg.m_card,c,p,z,u,i,io,a,te,ac,t,s) ;

	if (h=true)	
	 ::MessageBox(NULL,"操作完成！","恭喜",MB_ICONINFORMATION);
	
}}
}
}