COM

[DllImport("SomeCOMDll", EntryPoint="aVB6Function")]
    public static extern Recordset AVb6Function([MarshalAs(UnmanagedType.BStr)]
                                            string globalIdentifier,
                                            [MarshalAs(UnmanagedType.BStr)]
                                            string webUser_ID,
                                            DateTime shipDate,
                                            [MarshalAs(UnmanagedType.SafeArray, SafeArraySubType = VarEnum.VT_BSTR)]
                                            string[,] origDestArray,
                                            [MarshalAs(UnmanagedType.SafeArray, SafeArraySubType = VarEnum.VT_BSTR)]
                                            string[,] wtClsArray,
                                            [MarshalAs(UnmanagedType.BStr)]
                                            string mode,
                                            [MarshalAs(UnmanagedType.BStr)]
                                            string svcLvl,
                                            [MarshalAs(UnmanagedType.BStr)]
                                            string IOT,
                                            [MarshalAs(UnmanagedType.BStr)]
                                            string custCode,
                                            [MarshalAs(UnmanagedType.Currency)]
                                            decimal fuel,
                                            [MarshalAs(UnmanagedType.Currency)]
                                            decimal addtMarkupPct,
                                            [MarshalAs(UnmanagedType.SafeArray, SafeArraySubType = VarEnum.VT_BSTR)]
                                            string[,] webAccChgArray);

The description for Event ID ( 36512 ) in Source ( SEIPMAFILEDOWNLOAD ) cannot be found. The local computer may not have the necessary registry information or message DLL files to display messages from a remote computer. You may be able to use the /AUXSOURCE= flag to retrieve this description; see Help and Support for details. The following information is part of the event: <ERRORCALLSTACK><ERROR><NUMBER>-2147184992</NUMBER><DESCRIPTION>0-</DESCRIPTION><COMPONENT>seipma_comFileDownload</COMPONENT><MODULE>pzFileDownload</MODULE><ROUTINE>FileDownload</ROUTINE><EIID>11/17/08-21:37-705</EIID><ADDINFO><EXECUTION_STEP>Getting download data: file name = Download11172008.exe</EXECUTION_STEP><PROCEDURE_PARAMETERS><APPSECDB><![CDATA[<ADO_APP_SEC_DB><DSN>SW_APPSECDB_0370a</DSN><USERID>SW0370</USERID><PASSWORD>zaq12wsx</PASSWORD><GUID>{6C067960-45E4-11D3-9F43-00A0D1063EC9}</GUID></ADO_APP_SEC_DB>]]></APPSECDB><USER_SID><![CDATA[{96FBC159-D12A-11D4-8E69-0008C72B623C}]]></USER_SID><FILENAME><![CDATA[Download11172008.exe]]></FILENAME></PROCEDURE_PARAMETERS></ADDINFO><ERRORLOGGED>

The average call duration has exceeded 10 minutes. If this is not the expected behavior, please see article 910904 in the Microsoft Knowledge Base at http://support.microsoft.com for details on how to use the COM+ AutoDump feature to automatically generate dump files and/or terminate the process if the problem occurs again.
Server Application ID: {4C8DA47F-4AC2-4250-AFB3-0115E933175F}
Server Application Instance ID:
{65909717-9B34-44DA-8A88-127AB60FFE09}
Server Application Name: PMABLayer

For more information, see Help and Support Center at http://go.microsoft.com/fwlink/events.asp.

c:\program files\microsoft visual studio\vc98\atl\include\atlcom.h(2395) : error C2504: 'MyConClass' : base class undefined<br />
see reference to class template instantiation 'ATL::CComObject<struct>;' being compiled</struct>

#include "objidl.h"

#ifndef INCLUDE_AUDIOSTREAM
#define INCLUDE_AUDIOSTREAM

class CAudioStream :
	public IStream
{
private:
	LONG m_cRef;
	HANDLE m_hFile;
public:
	CAudioStream(TCHAR* pszFileName);
	~CAudioStream(void);

	HRESULT STDMETHODCALLTYPE QueryInterface(REFIID riid, void** ppvObject);
	ULONG STDMETHODCALLTYPE AddRef(void);
	ULONG STDMETHODCALLTYPE Release(void);

	HRESULT STDMETHODCALLTYPE Read(void *pv, ULONG cb, ULONG *pcbRead);
	HRESULT STDMETHODCALLTYPE Write(const void *pv, ULONG cb, ULONG *pcbWritten);

	HRESULT STDMETHODCALLTYPE Seek(LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition);
	HRESULT STDMETHODCALLTYPE SetSize(ULARGE_INTEGER libNewSize);
	HRESULT STDMETHODCALLTYPE CopyTo(IStream *pstm, ULARGE_INTEGER cb, ULARGE_INTEGER *pcbRead, ULARGE_INTEGER *pcbWritten);
	HRESULT STDMETHODCALLTYPE Commit(DWORD grfCommitFlags);
	HRESULT STDMETHODCALLTYPE Revert(void);
	HRESULT STDMETHODCALLTYPE LockRegion(ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType);
	HRESULT STDMETHODCALLTYPE UnlockRegion(ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType);
	HRESULT STDMETHODCALLTYPE Stat(STATSTG *pstatstg, DWORD grfStatFlag);
	HRESULT STDMETHODCALLTYPE Clone(IStream **ppstm);
};

#endif

#include "StdAfx.h"
#include "AudioStream.h"

CAudioStream::CAudioStream(TCHAR* pszFileName)
{
	m_cRef = 0;
	m_hFile = CreateFile(pszFileName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING,
		FILE_ATTRIBUTE_ARCHIVE | FILE_ATTRIBUTE_NORMAL, NULL);
	if(m_hFile == INVALID_HANDLE_VALUE)
		MessageBox(GetActiveWindow(), "can not open file.", "error", MB_OK);
}

CAudioStream::~CAudioStream(void)
{
	if(m_hFile != INVALID_HANDLE_VALUE)
		CloseHandle(m_hFile);

	m_hFile = INVALID_HANDLE_VALUE;
}

HRESULT STDMETHODCALLTYPE CAudioStream::QueryInterface(const IID &riid, void **ppvObject)
{
	if(IID_IStream == riid || IID_IUnknown == riid)
	{
		*ppvObject = static_cast<IStream*>(this);
		AddRef();
		return S_OK;
	}

	*ppvObject = NULL;
	return E_NOINTERFACE;
}

ULONG STDMETHODCALLTYPE CAudioStream::AddRef()
{
	return InterlockedIncrement(&m_cRef);
}

ULONG STDMETHODCALLTYPE CAudioStream::Release()
{
	if(InterlockedDecrement(&m_cRef) == 0)
	{
		delete this;
		return S_OK;
	}

	return m_cRef;
}

HRESULT STDMETHODCALLTYPE CAudioStream::Read(void *pv, ULONG cb, ULONG *pcbRead)
{
	if(!ReadFile(m_hFile, pv, cb, pcbRead, NULL))
		return E_FAIL;

	if(*pcbRead <= 0)
		return E_FAIL;

	return S_OK;
}

HRESULT STDMETHODCALLTYPE CAudioStream::Write(const void *pv, ULONG cb, ULONG *pcbWritten)
{
	if(!WriteFile(m_hFile, pv, cb, pcbWritten, NULL))
		return E_FAIL;

	if(*pcbWritten <= 0)
		return E_FAIL;

	return S_OK;
}

HRESULT STDMETHODCALLTYPE CAudioStream::Seek(LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
{
	plibNewPosition->QuadPart = SetFilePointer(m_hFile, dlibMove.LowPart, NULL, dwOrigin);
	return S_OK;
}

HRESULT STDMETHODCALLTYPE CAudioStream::SetSize(ULARGE_INTEGER libNewSize)
{
	SetFilePointer(m_hFile, libNewSize.LowPart, NULL, 0);
	return S_OK;
}

HRESULT STDMETHODCALLTYPE CAudioStream::CopyTo(IStream *pstm, ULARGE_INTEGER cb, ULARGE_INTEGER *pcbRead, ULARGE_INTEGER *pcbWritten)
{
	return -1;
}

HRESULT STDMETHODCALLTYPE CAudioStream::Commit(DWORD grfCommitFlags)
{
	return -1;
}

HRESULT STDMETHODCALLTYPE CAudioStream::Revert(void)
{
	return -1;
}

HRESULT STDMETHODCALLTYPE CAudioStream::LockRegion(ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType)
{
	return -1;
}

HRESULT STDMETHODCALLTYPE CAudioStream::UnlockRegion(ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType)
{
	return -1;
}

HRESULT STDMETHODCALLTYPE CAudioStream::Stat(STATSTG *pstatstg, DWORD grfStatFlag)
{
	pstatstg->cbSize.QuadPart = GetFileSize(m_hFile, NULL);
	pstatstg->grfLocksSupported = 0;
	return -1;
}

HRESULT STDMETHODCALLTYPE CAudioStream::Clone(IStream **ppstm)
{
	return -1;
}

#include "stdafx.h"
#include "AudioStream.h"

int main(int argc, char* argv[])
{
	CoInitialize(NULL);
	CAudioStream* pAudioStream = NULL;
	

	IWMSyncReader* reader;
	HRESULT hr;

	hr = WMCreateSyncReader(NULL, 0, &reader);
	if(hr != S_OK)
	{
		CoUninitialize();
		return 0;
	}

	pAudioStream = new CAudioStream("d:\\Music\\You&Me.mp3");
	IStream* pStream = static_cast<IStream*>(pAudioStream);
	pStream->AddRef();

	hr = reader->OpenStream(pStream);
	if(hr != S_OK)
	{
		LARGE_INTEGER dlibMove;
		ULARGE_INTEGER plibNewPosition;

		dlibMove.QuadPart = 30;
		plibNewPosition.QuadPart = 0;
		pAudioStream->Seek(dlibMove, FILE_BEGIN, &plibNewPosition);

		hr = reader->OpenStream(pStream);
		if(hr != S_OK)
		{
			reader->Release();
			reader = NULL;

			pStream->Release();
			pStream = NULL;
			CoUninitialize();

			return 0;
		}

		DWORD dwOutputCount;
		hr = reader->GetOutputCount(&dwOutputCount);
		if(hr != S_OK)
		{
			reader->Release();
			reader = NULL;

			pStream->Release();
			pStream = NULL;

			CoUninitialize();

			return 0;
		}

		printf("OutputCount=%d\n", dwOutputCount);
	}

	system("pause");
	
	reader->Release();
	reader = NULL;

	pStream->Release();
	pStream = NULL;

	CoUninitialize();

	return 0;
}