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

📄 report1dlg.cpp

📁 本网站是一个库存管理系统
💻 CPP
字号:
// Report1Dlg.cpp : implementation file

#include "stdafx.h"
#include "Stock.h"
#include "Report1Dlg.h"
#include "Excel9.h" 
#include "COMDEF.H"
#include "_recordset.h"
#include "columns.h"
#include "column.h"
#include "SysLog.h"
#include "Users.h"
#include "DialogResize.h"

extern CUsers curUser;

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

CReport1Dlg::CReport1Dlg(CWnd* pParent /*=NULL*/)
	: CDialogResize(CReport1Dlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CReport1Dlg)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
}


void CReport1Dlg::DoDataExchange(CDataExchange* pDX)
{
	CDialogResize::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CReport1Dlg)
	DDX_Control(pDX, IDC_ADODC1, m_adodc1);
	DDX_Control(pDX, IDC_ADODC2, m_adodc2);
	DDX_Control(pDX, IDC_ADODC3, m_adodc3);
	DDX_Control(pDX, IDC_DATACOMBO1, m_datacombo1);
	DDX_Control(pDX, IDC_DATACOMBO2, m_datacombo2);
	DDX_Control(pDX, IDC_DATAGRID1, m_datagrid);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CReport1Dlg, CDialogResize)
	//{{AFX_MSG_MAP(CReport1Dlg)
	ON_BN_CLICKED(IDC_TOEXCEL_BUTTON, OnToexcelButton)
	ON_BN_CLICKED(IDC_PRINT_BUTTON, OnPrintButton)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

BEGIN_DLGRESIZE_MAP(CReport1Dlg)
    DLGRESIZE_CONTROL(IDC_DATACOMBO1, DLSZ_REPAINT)
	DLGRESIZE_CONTROL(IDC_DATACOMBO2, DLSZ_REPAINT)
	DLGRESIZE_CONTROL(IDC_DATAGRID1, DLSZ_SIZE_X | DLSZ_SIZE_Y | DLSZ_REPAINT)
	DLGRESIZE_CONTROL(IDC_TOEXCEL_BUTTON, DLSZ_MOVE_Y)
	DLGRESIZE_CONTROL(IDC_PRINT_BUTTON, DLSZ_MOVE_Y)
	DLGRESIZE_CONTROL(IDCANCEL, DLSZ_MOVE_X | DLSZ_MOVE_Y)
END_DLGRESIZE_MAP()

// CReport1Dlg message handlers

void CReport1Dlg::Refresh_Data()
{
	CString cTypeId;
	if (m_datacombo2.GetBoundText() == "")
		cTypeId = "0";
	else
		cTypeId = m_datacombo2.GetBoundText();
	// 生成SELECT语句
	CString cSource;
	cSource = "SELECT p.Pname AS 产品名称,";
	cSource += " v1.SumNum AS 入库总量, v1.SumPrice AS 入库总金额,";
	cSource += " v2.SumNum AS 出库总量, v2.SumPrice AS 出库总金额,";
    cSource += " v3.SumNum AS 库存总量, p.Plow AS 库存下限, p.Phigh AS 库存上限";
    cSource += " FROM (((Product p LEFT JOIN v_StoreIn v1 ON p.Pid=v1.Pid)";
	cSource += " LEFT JOIN v_TakeOut v2 ON p.Pid=v2.Pid)";
    cSource += " LEFT JOIN v_ProInStore v3 ON p.Pid=v3.Pid)";
	cSource += " WHERE p.TypeId = " + cTypeId;
	// 设置数据源
	m_adodc3.SetRecordSource(cSource);
	m_adodc3.Refresh();
}

BEGIN_EVENTSINK_MAP(CReport1Dlg, CDialogResize)
    //{{AFX_EVENTSINK_MAP(CReport1Dlg)
	ON_EVENT(CReport1Dlg, IDC_DATACOMBO1, -600 /* Click */, OnClickDatacombo1, VTS_I2)
	ON_EVENT(CReport1Dlg, IDC_DATACOMBO2, -600 /* Click */, OnClickDatacombo2, VTS_I2)
	//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()

void CReport1Dlg::OnClickDatacombo1(short Area) 
{
	CString cUpper;
	cUpper = m_datacombo1.GetBoundText(); // 读取选择类别的编号
	if (cUpper == "")
		cUpper = "0";
	m_datacombo2.SetText("");
	// 设置二级类别的记录源
	m_adodc2.SetRecordSource("SELECT * FROM ProType WHERE UpperId=" + cUpper);
	m_adodc2.Refresh();	
	// 刷新表格
	Refresh_Data();
}

void CReport1Dlg::OnClickDatacombo2(short Area) 
{
	// 刷新表格
	Refresh_Data();	
}

BOOL CReport1Dlg::OnInitDialog() 
{
	CDialogResize::OnInitDialog();

	CDialogResize::InitResizing();
	
	// TODO: Add extra initialization here
	Refresh_Data();

	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CReport1Dlg::OnToexcelButton() 
{
	//定义操作Excel必要的对象
	COleVariant VOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    _Application objApp;
	Workbooks objBooks;
	_Workbook objBook;
	Worksheets objSheets;
	_Worksheet objSheet;
	Range objRange;	
	//创建Excel对象
	objApp.CreateDispatch("Excel.Application");
	objBooks=objApp.GetWorkbooks();	//返回工作簿对象
	// 打开指定Excel文件
	objBook.AttachDispatch(objBooks.Add(_variant_t("C:\\Report1.xls")));
	objSheets=objBook.GetSheets();
	// 定义第一个Sheet为对象
	objSheet=objSheets.GetItem((_variant_t)short(1));
	objRange.AttachDispatch(objSheet.GetCells(),true); 
	// 取得结果集中记录个数,列数
	int ss,nn;
	double dTotal;
	dTotal = 0;
	CString cc;
	// 得到结果集中记录个数
	nn = m_adodc3.GetRecordset().GetRecordCount();
	// 定义列对象并取得列的个数
	CColumns cls;
	cls = m_datagrid.GetColumns();
	ss = cls.GetCount();
	// 双层循环取得所有数据放入Excel表中
	for(int i=0;i<nn;i++)
	{
		// 设定数据所在行
		m_datagrid.SetRow(i);
		for(int j=0;j<ss;j++)
		{
			// 设定数据所在列
			m_datagrid.SetCol(j);
			// 取得指定列的值
			cc = m_datagrid.GetText();
			// 计算原值
			if(j==9)
				dTotal = dTotal + atoi(cc);
			// 把列值放入Excel指定单元格
			objRange.SetItem(_variant_t((long)(i+2)),_variant_t((long)(j+1)),_variant_t(cc)); 
		}
	}
	// 设置Excel为可见
	objApp.SetVisible(true);
	// 释放句柄
	objRange.ReleaseDispatch();
	objSheet.ReleaseDispatch();
	objSheets.ReleaseDispatch();
	objBook.ReleaseDispatch();
	objBooks.ReleaseDispatch();
	objApp.ReleaseDispatch();	

	// 保存日志
	CSysLog log;
	log.SetLogType(11);
	log.SetTitle("导出产品出入库统计报表到Excel");
	log.SetBody("用户名称:" + curUser.GetUserName());
	log.sql_insert();
}

void CReport1Dlg::OnPrintButton() 
{
	//定义操作Excel必要的对象
	COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
	COleVariant covTrue((short)TRUE), covFalse((short)FALSE);
    _Application objApp;
	Workbooks objBooks;
	_Workbook objBook;
	Worksheets objSheets;
	_Worksheet objSheet;
	Range objRange;	
	//创建Excel对象
	objApp.CreateDispatch("Excel.Application");
	objBooks=objApp.GetWorkbooks();	//返回工作簿对象
	// 打开指定Excel文件
	objBook.AttachDispatch(objBooks.Add(_variant_t("C:\\Report1.xls")));
	objSheets=objBook.GetSheets();
	// 定义第一个Sheet为对象
	objSheet=objSheets.GetItem((_variant_t)short(1));
	objRange.AttachDispatch(objSheet.GetCells(),true); 
	// 取得结果集中记录个数,列数
	int ss,nn;
	double dTotal;
	dTotal = 0;
	CString cc;
	// 得到结果集中记录个数
	nn = m_adodc3.GetRecordset().GetRecordCount();
	// 定义列对象并取得列的个数
	CColumns cls;
	cls = m_datagrid.GetColumns();
	ss = cls.GetCount();
	// 双层循环取得所有数据放入Excel表中
	for(int i=0;i<nn;i++)
	{
		// 设定数据所在行
		m_datagrid.SetRow(i);
		for(int j=0;j<ss;j++)
		{
			// 设定数据所在列
			m_datagrid.SetCol(j);
			// 取得指定列的值
			cc = m_datagrid.GetText();
			// 计算原值
			if(j==9)
				dTotal = dTotal + atoi(cc);
			// 把列值放入Excel指定单元格
			objRange.SetItem(_variant_t((long)(i+2)),_variant_t((long)(j+1)),_variant_t(cc)); 
		}
	}
	// 设置Excel为不可见
	objApp.SetVisible(false);
	objBook.PrintOut(covOptional,covOptional,COleVariant(long(1)), covFalse,covOptional,covOptional,covOptional,covOptional);
	// 释放句柄
	objRange.ReleaseDispatch();
	objSheet.ReleaseDispatch();
	objSheets.ReleaseDispatch();
	objBook.ReleaseDispatch();
	objBooks.ReleaseDispatch();
	objApp.ReleaseDispatch();
	
	// 保存日志
	CSysLog log;
	log.SetLogType(11);
	log.SetTitle("打印产品出入库统计报表");
	log.SetBody("用户名称:" + curUser.GetUserName());
	log.sql_insert();
}

void CReport1Dlg::OnSize(UINT nType, int cx, int cy)
{
	CDialogResize::OnSize(nType, cx, cy);
}

⌨️ 快捷键说明

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