mydlgaddplant.cpp

从列表进行打印的源码,请大家下载参考对照,从中发表意见,加深修改.

// MyDlgAddPlant.cpp : implementation file
//

#include "stdafx.h"
#include "myprinter.h"
#include "MyDlgAddPlant.h"
#include "column.h"
#include "columns.h"

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

/////////////////////////////////////////////////////////////////////////////
// CMyDlgAddPlant property page

IMPLEMENT_DYNCREATE(CMyDlgAddPlant, CPropertyPage)

CMyDlgAddPlant::CMyDlgAddPlant() : CPropertyPage(CMyDlgAddPlant::IDD)
{
	EnableAutomation();
	//{{AFX_DATA_INIT(CMyDlgAddPlant)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT

HRESULT hr;
	//初始化连接指针
	CoInitialize(NULL);
	hr=p_connection.CreateInstance(_uuidof(Connection));
	if(FAILED(hr))
	{
		CWnd::MessageBox ("_ConnectionPtr初始化错误！");
	
	}
	
   //初始化recordset指针
	hr=p_recordset.CreateInstance(_uuidof(Recordset));
	if(FAILED(hr))
	{
		CWnd::MessageBox ("_RecordsetPtr初始化错误！");

	}
	
   //初始化recordset指针
	hr=p_rec.CreateInstance(_uuidof(Recordset));
	if(FAILED(hr))
	{
		CWnd::MessageBox ("_RecordsetPtr初始化错误！");

	}

}

CMyDlgAddPlant::~CMyDlgAddPlant()
{
}

void CMyDlgAddPlant::OnFinalRelease()
{
	// When the last reference for an automation object is released
	// OnFinalRelease is called.  The base class will automatically
	// deletes the object.  Add additional cleanup required for your
	// object before calling the base class.

	CPropertyPage::OnFinalRelease();
}

void CMyDlgAddPlant::DoDataExchange(CDataExchange* pDX)
{
	CPropertyPage::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CMyDlgAddPlant)
	DDX_Control(pDX, IDC_EDIT_PINYIN, m_Edit_PinYin);
	DDX_Control(pDX, IDC_EDIT_PLANT, m_Edit_Plant);
	DDX_Control(pDX, IDC_STATIC_TEXT, m_Static_Text);
	DDX_Control(pDX, IDC_DATAGRID, m_DataGrid);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CMyDlgAddPlant, CPropertyPage)
	//{{AFX_MSG_MAP(CMyDlgAddPlant)
	ON_BN_CLICKED(IDC_BUTTON_DELPLANT, OnButtonDelPlant)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

BEGIN_DISPATCH_MAP(CMyDlgAddPlant, CPropertyPage)
	//{{AFX_DISPATCH_MAP(CMyDlgAddPlant)
		// NOTE - the ClassWizard will add and remove mapping macros here.
	//}}AFX_DISPATCH_MAP
END_DISPATCH_MAP()

// Note: we add support for IID_IMyDlgAddPlant to support typesafe binding
//  from VBA.  This IID must match the GUID that is attached to the 
//  dispinterface in the .ODL file.

// {1A2A2A3A-1784-49CA-9CB6-E216B977AE2B}
static const IID IID_IMyDlgAddPlant =
{ 0x1a2a2a3a, 0x1784, 0x49ca, { 0x9c, 0xb6, 0xe2, 0x16, 0xb9, 0x77, 0xae, 0x2b } };

BEGIN_INTERFACE_MAP(CMyDlgAddPlant, CPropertyPage)
	INTERFACE_PART(CMyDlgAddPlant, IID_IMyDlgAddPlant, Dispatch)
END_INTERFACE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CMyDlgAddPlant message handlers

BOOL CMyDlgAddPlant::OnInitDialog() 
{
	CPropertyPage::OnInitDialog();
	
	// TODO: Add extra initialization here
	this->InitDataGrid();
//this->MessageBox ("1111111111111111");
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CMyDlgAddPlant::InitDataGrid()
{
	HRESULT hr;
	CString str;
	int i;

	try
	{
		if(this->p_rec ->GetState()==adStateOpen) p_rec->Close();
	}
	catch(_com_error &err)
	{
		CWnd::MessageBox (err.Description ());
	}

	str.Format ("select * from 生产厂家 ORDER BY 拼音 DESC");
	
	try
	{
		hr=p_rec->Open (_variant_t(str),
			_variant_t((IDispatch *)p_connection,true),
			adOpenKeyset,
			adLockOptimistic,
			adCmdText
			);
		if(FAILED(hr))
		{
			CWnd::MessageBox ("记录集打开失败");
		}
	}

	catch(_com_error &err)
	{
		CWnd::MessageBox (err.Description ());
	}

	//this->MessageBox ("OK    ^_^");

//更新表格
	
	this->m_DataGrid.SetRefDataSource(p_rec);
	i=p_rec->GetRecordCount ();
	if(i)
	{
		m_DataGrid.GetColumns().GetItem(_variant_t("拼音")).SetWidth(70.0);
		//m_DataGrid.GetColumns().GetItem(_variant_t("药品名称")).SetWidth(80.0);
		//m_DataGrid.GetColumns().GetItem(_variant_t("药品编号")).SetWidth(40.0);
		//m_DataGrid.GetColumns().GetItem(_variant_t("规格")).SetWidth(20.0);
		//m_DataGrid.GetColumns().GetItem(_variant_t("药品单位")).SetWidth(20.0);
		m_DataGrid.GetColumns().GetItem(_variant_t("生产厂家")).SetWidth(130.0);
		//m_DataGrid_Main.GetColumns().GetItem(_variant_t("生产厂家")).SetWidth(70.0);
		//m_DataGrid_Main.GetColumns().GetItem(_variant_t("单位")).SetWidth(30.0);
		
	}
	if(i<0)		i=0;
	str.Format ("数据库中共有 %d 条记录",i);
	this->m_Static_Text .SetWindowText (str);
}

void CMyDlgAddPlant::OnButtonDelPlant() 
{
	// TODO: Add your control notification handler code here
	try
	{
		if(p_rec->GetState()==adStateOpen &&p_rec->GetRecordCount ()>0) //p_MyRstDBNewBill->Close();
		{
			if(this->MessageBox ("您确定要删除这一条信息吗?\t删除后将不能恢复!","警告!",MB_YESNO)==7)//按确定等于6，按取消等于7
			{
				//this->MessageBox ("取消");
				return;
			}
		}
	}
	catch(_com_error &err)
	{
		CWnd::MessageBox (err.Description ());
	}
	try
	{
		if(p_rec->GetState()==adStateOpen) //p_MyRstDBNewBill->Close();
		p_rec->Delete(adAffectCurrent);
		p_rec->Update ();
	}
	catch(_com_error &err)
	{
		CWnd::MessageBox (err.Description ());
	}

	this->InitDataGrid ();
	//this->m_Combo_Unit .ResetContent ();
	//this->InitUnit ();
}

void CMyDlgAddPlant::OnOK() 
{
	// TODO: Add extra validation here
	CString str_con;
	HRESULT hr;

	this->m_Edit_Plant .GetWindowText (str_Plant);
	m_Edit_PinYin.GetWindowText (str_PinYin);

	if(str_Plant.GetLength ()==0)
	{
		this->MessageBox ("【生产厂家】不能为空!");
		return;
	}
	if(str_PinYin.GetLength ()==0)
	{
		this->MessageBox ("【拼音】不能为空!\n\n请输入生产厂家的首字母!\n\n");
		return;
	}

	str_con.Format ("select * from 生产厂家 where 生产厂家='%s'",str_Plant);

	try
	{		
		if(this->p_recordset ->GetState()==adStateOpen) 
			p_recordset->Close();

		hr=p_recordset->Open (_variant_t(str_con),
			_variant_t((IDispatch *)p_connection,true),
			adOpenKeyset,
			adLockOptimistic,
			adCmdText
		);
		if(FAILED(hr))
		{
			CWnd::MessageBox ("记录集打开失败");
		}
		if(p_recordset->GetRecordCount ()>0)
		{
			this->MessageBox ("【生产厂家】重复，请重新选择或重新输入!\n\n");
			return;
		}
		else
		{
			this->p_recordset ->AddNew ();
			p_recordset->PutCollect (_variant_t("生产厂家"),_variant_t(str_Plant));
			p_recordset->PutCollect (_variant_t("拼音"),_variant_t(str_PinYin));
			p_recordset->Update ();
		}

	}//end try
	catch(_com_error &err)
	{
		CWnd::MessageBox (err.Description ()+"\n你填写的信息有错误！(wklh12-1022)");
		return;
	}

	this->m_Edit_Plant .SetWindowText ("");
	this->m_Edit_PinYin .SetWindowText ("");
	this->InitDataGrid ();

	//CPropertyPage::OnOK();
}