全部资源
全部资源
C/C++
C#
PHP
Java
Python
VB
ASP
Html/CSS
Matlab
JavaScript
数据库
模板
其他

一套VB+SQL生产管理ERP系统

收藏(0)
高速下载

资源简介

内容索引:VB源码,数据库应用,生产管理,ERP 　　一套生产管理方面的ERP源代码，使用的第三方控件比较多，而且也附带控件的源代码，系统比较大，代码也比较多，以前的功能无比这些强大，现在重点把其修改成了ERP系统，里面还有一些测试数据，你可好好参考感觉一番。 　　注：控件路径什么的要对，要不然打开工程时候会提示错误，或找不到类库。

资源截图

小图 大图

代码片段和文件信息 

//
//Math.cpp
//

#include 
#include “math.h“

//
//Math class implementation
//
Math::Math（）
{
	m_lRef=0;
	//Increment the global object count
	InterlockedIncrement（&g_lObjs）;
}

//the destructor
Math::~Math（）
{
	//Decrement the global object count
	InterlockedDecrement（&g_lObjs）;
}
STDMETHODIMP Math::QueryInterface（REFIID riidvoid ** ppv）
{
	*ppv=0;
	if（riid==IID_IUnknown）
		*ppv=（IMath*）this;
	else if（riid==IID_IMath）
		*ppv=（IMath*）this;
	else if（riid==IDD_IAdvanecedMath）
		*ppv=（IAdvancedMath*）this;
	if（*ppv）
	{
		AddRef（）;
		return（S_OK）;
	}
	return （E_NOINTERFACE）;
}

STDMETHODIMP_（ULONG） Math::AddRef（）
{
	return InterlockedIncrement（&m_lRef）;
}
STDMETHODIMP_（ULONG） Math::Release（）
{
	if（InterlockedDecrement（&m_lRef）==0）
	{
		delete this;
		return 0;
	}
	return m_lRef;
}
STDMETHODIMP Math::Add（long lOp1long lOp2long* pResult）
{
	*pResult=lOp1+lOp2;
	return S_OK;
}

STDMETHODIMP Math::Subtract（long lOp1long lOp2long* pResult）
{
	*pResult=lOp1-lOp2;
	return S_OK;
}
STDMETHODIMP Math::Multiply（long lOp1long lOp2long* pResult）
{
	*pResult=lOp1*lOp2;
	return S_OK;
}
STDMETHODIMP Math::Divide（long lOp1long lOp2long* pResult）
{
	*pResult=lOp1/lOp2;
	return S_OK;
}
//IAdvancedMath interface
static long calcFactorial（short n）
{
	//The factorial of 0 is 1
	if（n<=1）
		return 1;
	return n*calcFactorial（n-1）;
}
STDMETHOD Math::Factorial（short sOplong* pResult）
{
	*pResult=calcFactorial（sOp）;
	return S_OK;
}
static long calcFibonacci（short n）
{
	if（n<=1）
		return 1;
	return calcFibonacci（n-1）+calcFibonacci （n-2）;
}
STDMETHOD Math::Fibonacci（short sOplong* pResult）
{
	*pResult=calcFibonacci（sOp）;
	return S_OK;
}


MathClassFactory::MathClassFactory（）
{
	m_lRef=0;
}
MathClassFactory::~MathClassFactory（）
{
}
STDMETHODIMP MathClassFactory::QueryInterface（REFIID riidvoid** ppv）
{
	*ppv=0;
	if（riid==IID_IUnknown||riid==IID_IClassFactory）
		*ppv=this;
	if（*ppv）
	{
		AddRef（）;
		return S_OK;
	}
	return （E_NOINTERFACE）;
}

STDMETHODIMP_（ULONG） MathClassFactory::AddRef（）
{
	return InterlockedIncrement（&m_lRef）;
}
STDMETHODIMP_（ULONG） MathClassFactory::Release（）
{
	if（InterlockedDecrement（&m_lRef）==0）
	{
		delete this;
		return 0;
	}
	return m_lRef;
}

STDMETHODIMP MathClassFactory::CreateInstance
	（LPUNKNOWN pUnkOuterREFIID riidvoid** ppvObj）
{
	Math* pMath;
	HRESULT hr;
	*ppvObj=0;

	pMath=new Math;
	if（pMath==0）
		return（E_OUTOFMEMORY）;
	hr=pMath->QueryInterface（riidppvObj）;
	if（FAILED（hr））
		delete pMath;
	return hr;
}

STDMETHODIMP MathClassFactory::LockServer（BOOL fLock）
{
	if（fLock）
		InterlockedIncrement（&g_lLocks）;
	else
		InterlockedDecrement（&g_lLocks）;
	return S_OK;
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件     156160  2008-04-02 08:49  Lelecode.com\碧海蓝天生产管理系统ERP源代码\3.31发货.doc

     文件     168448  2008-04-06 10:57  Lelecode.com\碧海蓝天生产管理系统ERP源代码\4.1发货.doc

     文件     115200  2008-04-21 17:13  Lelecode.com\碧海蓝天生产管理系统ERP源代码\4.21发货.doc

     文件     104448  2008-04-06 15:04  Lelecode.com\碧海蓝天生产管理系统ERP源代码\4.6发货.doc

     文件      59392  2008-04-08 14:17  Lelecode.com\碧海蓝天生产管理系统ERP源代码\4.8发货.doc

     文件     122368  2008-04-09 15:44  Lelecode.com\碧海蓝天生产管理系统ERP源代码\4.9发货.doc

     文件      13688  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\base.bas

     文件       2499  2011-04-11 07:34  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\baseCard.vbp

     文件        980  2011-04-11 07:28  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\baseCard.vbw

     文件       9250  2011-04-11 07:53  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\CardInterface.cls

     文件        246  2007-05-27 10:22  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\EMPTY.bmp

     文件      20936  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmBOMVersion.frm

     文件      41504  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmCustomer.frm

     文件         56  2011-04-07 10:42  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmCustomer.frx

     文件      11970  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmCustomerClass.frm

     文件      19882  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmDepartment.frm

     文件         56  2011-04-07 10:42  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmDepartment.frx

     文件      39716  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmDocument.frm

     文件        112  2011-04-07 10:42  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmDocument.frx

     文件      11970  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmDocumentClass.frm

     文件      39188  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmEmployee.frm

     文件         84  2011-04-07 10:42  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmEmployee.frx

     文件      36754  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmInventory.frm

     文件         56  2011-04-07 10:42  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmInventory.frx

     文件      76303  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmInventoryBOM.frm

     文件         56  2011-04-07 10:42  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmInventoryBOM.frx

     文件      12104  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmInventoryClass.frm

     文件      12611  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmInventoryNature.frm

     文件      18699  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmInventoryProcess.frm

     文件      43760  2011-04-11 07:32  Lelecode.com\碧海蓝天生产管理系统ERP源代码\baseCard\frmOperator.frm

............此处省略666个文件信息

评论

共有 条评论

相关资源