生产管理系统源代码


生产管理软件针对中小型制造企业的生产应用而开发,能够帮助企业建立一个规范准确即时的生产数据库,同时实现轻松、规范、细致的生产业务、库存业务一体化管理工作。提高管理效率、掌握及时、准确、全面的生产动态,有效控制生产过程。适用于所有从事产品制造及有库存管理的企业。
资源截图
代码片段和文件信息
//Download by http://www.NewXing.com
//
//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;
}

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

    .......         0  2002-10-29 01:51  www.NewXing.comERPSourceCode第三方控件DOCKMAGICDemoInstall.bat.bak

    .......         0  2002-10-29 01:51  www.NewXing.comERPSourceCode所需组件DOCKMAGICDemoInstall.bat.bak

    .......        23  2002-10-29 01:52  www.NewXing.comERPSourceCode第三方控件DOCKMAGICDemoUnInstall.bat.bak

    .......        23  2002-10-29 01:52  www.NewXing.comERPSourceCode所需组件DOCKMAGICDemoUnInstall.bat.bak

     文件        126  2011-07-06 20:16  www.NewXing.comERPSourceCodeSaleBillase.bas

     文件        143  2011-07-06 20:16  www.NewXing.comERPSourceCodeBePrintase.bas

     文件        166  2011-07-06 20:16  www.NewXing.comERPSourceCodeDataCreatease.bas

     文件        256  2011-07-06 20:16  www.NewXing.comERPSourceCodeCommonListSelectListase.bas

     文件        256  2011-07-06 20:16  www.NewXing.comERPSourceCodeDBAaseDataToolsase.bas

     文件        830  2011-07-06 20:16  www.NewXing.comERPSourceCodePersistentConnectionlayerase.bas

     文件        863  2011-07-06 20:16  www.NewXing.comERPSourceCodeColumnase.bas

     文件        865  2011-07-06 20:16  www.NewXing.comERPSourceCodeFilterase.bas

     文件        974  2011-07-06 20:16  www.NewXing.comERPSourceCodeCommonBillListSelectListase.bas

     文件        974  2011-07-06 20:16  www.NewXing.comERPSourceCodeListase.bas

     文件        986  2011-07-06 20:16  www.NewXing.comERPSourceCodeCommonAccountbasease.bas

     文件       3233  2011-07-06 20:16  www.NewXing.comERPSourceCodePurchaseBillase.bas

     文件       3233  2011-07-06 20:16  www.NewXing.comERPSourceCodeStockBillase.bas

     文件       4023  2011-07-06 20:16  www.NewXing.comERPSourceCodeProductionBillase.bas

     文件       4740  2011-07-06 20:16  www.NewXing.comERPSourceCodeBeBillTemplatease.bas

     文件      14031  2011-07-06 20:16  www.NewXing.comERPSourceCodeaseCardase.bas

     文件      13431  2011-07-06 20:16  www.NewXing.comERPSourceCode所需组件mdiactivex107svb6Definitionen.bas

     文件      14149  2011-07-06 20:16  www.NewXing.comERPSourceCode第三方控件mdiactivex107svb6Definitionen.bas

    .......     28897  2001-08-28 18:57  www.NewXing.comERPSourceCode所需组件mdiactivex107svb6Funktionen.bas

    .......     29615  2011-04-07 10:47  www.NewXing.comERPSourceCode第三方控件mdiactivex107svb6Funktionen.bas

     文件        400  2011-07-06 20:16  www.NewXing.comERPSourceCodeDatabaseInputOutputmdlMain.bas

     文件       9370  2011-07-06 20:16  www.NewXing.comERPSourceCodeMainmdlMain.bas

     文件       4302  2011-07-06 20:16  www.NewXing.comERPSourceCode第三方控件jcMDITabs13jcMDITabsmodSystem.bas

     文件        177  2011-07-06 20:16  www.NewXing.comERPSourceCode第三方控件DOCKMAGICDemoModule1.bas

     文件        177  2011-07-06 20:16  www.NewXing.comERPSourceCode所需组件DOCKMAGICDemoModule1.bas

     文件       1327  2011-07-06 20:16  www.NewXing.comERPSourceCode第三方控件jcMDITabs13TESTmodUniCaption.bas

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

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送邮件举报,一经查实,本站将立刻删除。

发表评论

评论列表(条)