mcgsrun.cpp

国家环保总局污染源在线通讯协议的简化版

// Machine generated IDispatch wrapper class(es) created with ClassWizard

#include "stdafx.h"
#include "mcgsrun.h"

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


CString IDataCentre::GetDataName(long ID)
{
	OLECHAR *pOleStr;
	pOleStr = L"GetDataName";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );

	CString result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_BSTR, (void*)&result, parms,
		ID);
	return result;
}


long IDataCentre::GetValueFromID(long ID, VARIANT* Value)
{
	OLECHAR *pOleStr;
	pOleStr = L"GetValueFromID";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );

	long result;
	static BYTE parms[] =
		VTS_I4 VTS_PVARIANT;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		ID, Value);
	return result;
}

long IDataCentre::GetValueFromName(LPCTSTR Name, VARIANT* Value)
{
	OLECHAR *pOleStr;
	pOleStr = L"GetValueFromName";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );

	long result;
	static BYTE parms[] =
		VTS_BSTR VTS_PVARIANT;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		Name, Value);
	return result;
}

long IDataCentre::SetValueFromID(long ID, const VARIANT& Value)
{

	OLECHAR *pOleStr;
	pOleStr = L"SetValueFromID";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );

	long result;
	static BYTE parms[] =
		VTS_I4 VTS_VARIANT;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		ID, &Value);
	return result;
}

long IDataCentre::SetValueFromName(LPCTSTR Name, const VARIANT& Value)
{
	OLECHAR *pOleStr;
	pOleStr = L"SetValueFromName";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );

	long result;
	static BYTE parms[] =
		VTS_BSTR VTS_VARIANT;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		Name, &Value);
	return result;
}

long IDataCentre::GetDataFromID(long ID, BSTR* Name, long* Type, float* InitV, BSTR* Unit, float* MaxV, float* MinV, long* PointN)
{
	OLECHAR *pOleStr;
	pOleStr = L"GetDataFromID";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );

	long result;
	static BYTE parms[] =
		VTS_I4 VTS_PBSTR VTS_PI4 VTS_PR4 VTS_PBSTR VTS_PR4 VTS_PR4 VTS_PI4;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		ID, Name, Type, InitV, Unit, MaxV, MinV, PointN);
	return result;
}

long IDataCentre::GetDataFromName(LPCTSTR Name, long* ID, long* Type, float* InitV, BSTR* Unit, float* MaxV, float* MinV, long* PointN)
{
	OLECHAR *pOleStr;
	pOleStr = L"GetDataFromName";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );

	long result;
	static BYTE parms[] =
		VTS_BSTR VTS_PI4 VTS_PI4 VTS_PR4 VTS_PBSTR VTS_PR4 VTS_PR4 VTS_PI4;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		Name, ID, Type, InitV, Unit, MaxV, MinV, PointN);
	return result;
}

long IDataCentre::GetDataType(LPCTSTR Name)
{
	OLECHAR *pOleStr;
	pOleStr = L"GetDataType";
	DISPID dispid;
	m_pDispatch -> GetIDsOfNames( IID_NULL,&pOleStr, 1, LOCALE_USER_DEFAULT, &dispid );
	
	long result;
	static BYTE parms[] =
		VTS_BSTR;
	InvokeHelper(dispid, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		Name);
	return result;
}


long IDataCentre::GetValueFromName(CString strName, long& lValue)
{
	COleVariant v(lValue);
	long result = GetValueFromName ( strName, v );
	lValue = v.lVal;
	return result;
}

long IDataCentre::GetValueFromName(CString strName, float& fValue)
{
	COleVariant v(fValue);
	long result = GetValueFromName ( strName, v );
	fValue = v.fltVal;
	return result;
}

long IDataCentre::GetValueFromName(CString strName, CString& sValue)
{
	COleVariant v(sValue );
	long result = GetValueFromName ( strName, v );
	sValue = v.bstrVal;
	return result;
}

long IDataCentre::SetValueFromName(CString strName, const long lValue)
{
	COleVariant v(lValue);
	long result = SetValueFromName ( strName, v );
	return result;
}

long IDataCentre::SetValueFromName(CString strName, const float fValue)
{
	COleVariant v(fValue);
	long result = SetValueFromName ( strName, v );
	return result;
}

long IDataCentre::SetValueFromName(CString strName, const CString sValue)
{
	COleVariant v(sValue );
	long result = SetValueFromName ( strName, v );
	return result;
}