clienttype.cpp

基于VC+SQL SERVER环境开发的企业商品销售系统.完整的数据库和原代码

// ClientType.cpp : implementation file
//

#include "stdafx.h"
#include "Sale.h"
#include "ClientType.h"
#include "Affirm.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CClientType dialog


CClientType::CClientType(CWnd* pParent /*=NULL*/)
	: CDialog(CClientType::IDD, pParent)
{
	//{{AFX_DATA_INIT(CClientType)
	m_clientTypeID = _T("");
	m_clientTypeName = _T("");
	m_clientTypeRemark = _T("");
	//}}AFX_DATA_INIT
}


void CClientType::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CClientType)
	DDX_Control(pDX, IDC_LIST1, m_clientTypeList);
	DDX_Text(pDX, IDC_EDIT2, m_clientTypeID);
	DDX_Text(pDX, IDC_EDIT3, m_clientTypeName);
	DDX_Text(pDX, IDC_EDIT4, m_clientTypeRemark);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CClientType, CDialog)
	//{{AFX_MSG_MAP(CClientType)
	ON_BN_CLICKED(IDC_BUTTON2, OnAdd)
	ON_BN_CLICKED(IDC_BUTTON3, OnDelete)
	ON_BN_CLICKED(IDC_BUTTON4, OnModify)
	ON_BN_CLICKED(IDC_BUTTON5, OnSave)
	ON_BN_CLICKED(IDC_BUTTON6, OnExit)
	ON_NOTIFY(NM_CLICK, IDC_LIST1, OnClickClientTypeList)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CClientType message handlers

void CClientType::OnAdd() 
{
	UpdateData(true);
	int clientTypeID=((CSaleApp*)AfxGetApp())->m_pIDRecordset->GetCollect("clientTypeID").intVal;
	if(clientTypeID<10)
		m_clientTypeID.Format("clientType0000%d",clientTypeID);
	else if(clientTypeID<100&&clientTypeID>9)
		m_clientTypeID.Format("clientType000%d",clientTypeID);
	else if(clientTypeID<1000&&clientTypeID>99)
		m_clientTypeID.Format("clientType00%d",clientTypeID);

	CString str;
	str.Format("%d",clientTypeID+1);
	((CSaleApp*)AfxGetApp())->m_pIDRecordset->PutCollect("clientTypeID",_variant_t(str));
	((CSaleApp*)AfxGetApp())->m_pIDRecordset->Update();
//	m_clientTypeID="";
	m_clientTypeName="";
	m_clientTypeRemark="";
	tx_clientTypeID->EnableWindow(false);
	tx_clientTypeName->EnableWindow(true);
	tx_clientTypeRemark->EnableWindow(true);
	flag=1;
	bt_save->EnableWindow(true);
	bt_add->EnableWindow(false);
	bt_modify->EnableWindow(false);
	bt_delete->EnableWindow(false);
	UpdateData(false);		
	
}

void CClientType::OnDelete() 
{
	CAffirm dlg;
	if(dlg.DoModal()!=IDOK)
	{
		return;
	}
	_variant_t RecordsAffected;
	CString strSQL;
	strSQL="delete from clientType where clientTypeID='";
	strSQL=strSQL+m_clientTypeID+"'";
	(((CSaleApp*)AfxGetApp())->m_pConn)->Execute((_bstr_t)strSQL,&RecordsAffected,adCmdText);
	
	POSITION pos = m_clientTypeList.GetFirstSelectedItemPosition();
	if(pos)
	{
		int nFirstSelItem = m_clientTypeList.GetNextSelectedItem(pos);
		m_clientTypeList.DeleteItem(nFirstSelItem);
	}	
	bt_delete->EnableWindow(false);
	m_clientTypeID="";
	m_clientTypeName="";
	m_clientTypeRemark="";
	UpdateData(false);
	
}

void CClientType::OnModify() 
{
	tx_clientTypeName->EnableWindow(true);
	tx_clientTypeID->EnableWindow(false);
	tx_clientTypeRemark->EnableWindow(true);
	flag=2;
	bt_save->EnableWindow(true);
	
}

void CClientType::OnSave() 
{
	UpdateData(true);
	_RecordsetPtr m_pRecordset;    //用于创建一个查询记录集


	//----------------------------------------------
	CString strSQL;
	//	AfxMessageBox(TreeCurrent);
	if(flag==1)         //添加
	{
		strSQL="SELECT * FROM clientType" ;	

		try
		{
			HRESULT hTRes;
			hTRes = m_pRecordset.CreateInstance(_T("ADODB.Recordset"));
			if (SUCCEEDED(hTRes))
			{
				//----------------------------------------------------
				hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
					((CSaleApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
					adOpenDynamic,adLockPessimistic,adCmdText);
				if(SUCCEEDED(hTRes))
				{
					TRACE(_T("连接成功!\n"));
					//------------------------------------------
					m_pRecordset->AddNew();
					m_pRecordset->PutCollect("clientTypeID",_variant_t(m_clientTypeID));
					m_pRecordset->PutCollect("clientTypeName",_variant_t(m_clientTypeName));
					m_pRecordset->PutCollect("clientTypeRemark",_variant_t(m_clientTypeRemark));
					m_pRecordset->Update();
					int j;
					j=m_clientTypeList.GetItemCount();
					m_clientTypeList.InsertItem(j,m_clientTypeID);
					m_clientTypeList.SetItemText(j,1,m_clientTypeName);
					m_clientTypeList.SetItemText(j,2,m_clientTypeRemark);
					AfxMessageBox("插入成功！");
				}
			}
		}
		catch(_com_error e)///捕捉异常
		{
			CString errormessage;
			MessageBox("创建记录集失败!","错误");
		}
	}
	else if(flag==2)      //修改
	{
		strSQL="SELECT * FROM clientType where clientTypeID='" ;
		strSQL=strSQL+m_clientTypeID+"'";
		
		try
		{
			HRESULT hTRes;
			hTRes = m_pRecordset.CreateInstance(_T("ADODB.Recordset"));
			if (SUCCEEDED(hTRes))
			{
				//----------------------------------------------------
				hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
					((CSaleApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
					adOpenDynamic,adLockPessimistic,adCmdText);
				if(SUCCEEDED(hTRes))
				{
					TRACE(_T("连接成功!\n"));
					//------------------------------------------
			//		m_pRecordset->AddNew();
			//		m_pRecordset->PutCollect("transportTypeID",_variant_t(m_transportTypeID));
					m_pRecordset->PutCollect("clientTypeName",_variant_t(m_clientTypeName));
					m_pRecordset->PutCollect("clientTypeRemark",_variant_t(m_clientTypeRemark));
					m_pRecordset->Update();
					POSITION pos = m_clientTypeList.GetFirstSelectedItemPosition();
					if(pos)
					{
						int nFirstSelItem = m_clientTypeList.GetNextSelectedItem(pos);
						m_clientTypeList.SetItemText(nFirstSelItem,1,m_clientTypeName);
						m_clientTypeList.SetItemText(nFirstSelItem,2,m_clientTypeRemark);
					}
					
					AfxMessageBox("修改成功！");
				}
			}
		}
		catch(_com_error e)///捕捉异常
		{
			CString errormessage;
			MessageBox("创建记录集失败!","错误");
		}
	}
	bt_add->EnableWindow(true);
	bt_delete->EnableWindow(true);
	bt_modify->EnableWindow(true);
	bt_save->EnableWindow(true);
	tx_clientTypeID->EnableWindow(false);
	tx_clientTypeName->EnableWindow(false);
	tx_clientTypeRemark->EnableWindow(false);
	UpdateData(false);//
	
}

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

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

	DWORD style;
	style=m_clientTypeList.GetExStyle();
	style=(style|LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT)&(~LVS_EX_CHECKBOXES) ;
	m_clientTypeList.SetExtendedStyle(style);

	m_clientTypeList.InsertColumn(0,"客户类型编码",LVCFMT_LEFT,100);
	m_clientTypeList.InsertColumn(1,"客户类型名称",LVCFMT_LEFT,100);
	m_clientTypeList.InsertColumn(2,"备注",LVCFMT_LEFT,100);

	_RecordsetPtr m_pTreeRecordset;    //用于创建一个查询记录集
	CString strSQL;
	//-----------------------------------------------
	strSQL="SELECT * FROM clientType";
		try
		{
			HRESULT hTRes;
			hTRes = m_pTreeRecordset.CreateInstance(_T("ADODB.Recordset"));
			if (SUCCEEDED(hTRes))
			{
				//----------------------------------------------------
				hTRes = m_pTreeRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
					((CSaleApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
					adOpenDynamic,adLockPessimistic,adCmdText);
				if(SUCCEEDED(hTRes))
				{
					TRACE(_T("连接成功!\n"));
					//------------------------------------------
					m_pTreeRecordset->MoveFirst();
					if (!(m_pTreeRecordset->adoEOF))
					{
						int i=0;
						while(!m_pTreeRecordset->adoEOF)
						{
							//_variant_t vIndex=(long)0;
							m_clientTypeList.InsertItem(i,(LPCTSTR)(_bstr_t)(m_pTreeRecordset->GetCollect("clientTypeID")));
							m_clientTypeList.SetItemText(i,1,(LPCTSTR)(_bstr_t)(m_pTreeRecordset->GetCollect("clientTypeName")));				
							m_clientTypeList.SetItemText(i,2,(LPCTSTR)(_bstr_t)(m_pTreeRecordset->GetCollect("clientTypeRemark")));
							if (!(m_pTreeRecordset->adoEOF))
							{
								m_pTreeRecordset->MoveNext();
								i++;
							}
						}		
					}
					//---------------------------------------
				}
			}
		}
		catch(_com_error e)///捕捉异常
		{
			CString errormessage;
			MessageBox("创建销售类型记录集失败!","错误");
		}
//	}
	flag=0;
	
	tx_clientTypeName=GetDlgItem(IDC_EDIT3);
	tx_clientTypeID=GetDlgItem(IDC_EDIT2);
	tx_clientTypeRemark=GetDlgItem(IDC_EDIT4);
	bt_add=GetDlgItem(IDC_BUTTON2);
	bt_save=GetDlgItem(IDC_BUTTON5);
	bt_modify=GetDlgItem(IDC_BUTTON4);
	bt_delete=GetDlgItem(IDC_BUTTON3);

	tx_clientTypeName->EnableWindow(false);
	tx_clientTypeID->EnableWindow(false);
	tx_clientTypeRemark->EnableWindow(false);
//	bt_add=GetDlgItem(IDC_BUTTON2);
	bt_save->EnableWindow(false);
	bt_modify->EnableWindow(false);
	bt_delete->EnableWindow(false);
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CClientType::OnClickClientTypeList(NMHDR* pNMHDR, LRESULT* pResult) 
{
	UpdateData(true);
	POSITION pos = m_clientTypeList.GetFirstSelectedItemPosition();
	if(pos)
	{
		int nFirstSelItem = m_clientTypeList.GetNextSelectedItem(pos);
		m_clientTypeID=m_clientTypeList.GetItemText(nFirstSelItem,0);
		m_clientTypeName=m_clientTypeList.GetItemText(nFirstSelItem,1);
		m_clientTypeRemark=m_clientTypeList.GetItemText(nFirstSelItem,2);
	}
	//AfxMessageBox(str);
	bt_modify->EnableWindow(true);
	bt_delete->EnableWindow(true);
	UpdateData(false);
	
	*pResult = 0;
}