#define RETURN { hr = E_FAIL; goto Cleanup; } // don't kill me! Look at last examples of MS
// under http://www.microsoft.com/data/xml
// You can't catch me! :-)
STDMETHODIMP CGetFile::GetFile(VARIANT vFileName)
{
_variant_t vReturnBuffer;
LPSAFEARRAY psaFile;
HANDLE hFile;
DWORD dwSizeOfFile;
DWORD dwNumberOfBytesRead;
BOOL bResult;
unsigned char *pReturnBuffer = NULL;
long k;
HRESULT hr = S_OK;
// Create file in this case only OPENS an existing file (or fails
// if the file does not exist!)
hFile = ::CreateFile(
vFileName.bstrVal, // name of the file
GENERIC_READ, // desired access
FILE_SHARE_READ, // shared access
NULL, // security attributes
OPEN_EXISTING, // creation disposition - open only if existing!
FILE_FLAG_SEQUENTIAL_SCAN, // flag attributes
NULL );
if( hFile == INVALID_HANDLE_VALUE )
{
return E_FAIL;
}
dwSizeOfFile = ::GetFileSize( hFile, NULL );
if (dwSizeOfFile == 0xFFFFFFFF)
{
return E_FAIL;
}
try
{
pReturnBuffer = new unsigned char[dwSizeOfFile];
}
catch( std::bad_alloc& )
{
return E_FAIL;
}
// Get the binary content of the file
bResult = ::ReadFile( hFile, pReturnBuffer, dwSizeOfFile, &dwNumberOfBytesRead, NULL );
if( FALSE == bResult )
{
RETURN(E_FAIL);
}
psaFile = ::SafeArrayCreateVector( VT_UI1 /*unsigned char*/, 0, dwSizeOfFile );
if( !psaFile )
{
RETURN(E_FAIL);
}
// Fill in the SAFEARRAY with the binary content of the file
for( k = 0; k < (int) dwSizeOfFile; k++ )
{
if( FAILED(::SafeArrayPutElement( psaFile, &k, &pReturnBuffer[k] )) )
{
RETURN(E_FAIL);
}
}
vReturnBuffer.vt = VT_ARRAY | VT_UI1;
V_ARRAY(&vReturnBuffer) = psaFile;
m_piResponse->BinaryWrite(vReturnBuffer);
Cleanup:
if( pReturnBuffer )
delete [] pReturnBuffer;
return SUCCEEDED(hr) ? S_OK : E_FAIL;
}
As you see, the idea is simple: to read the binary content of the file, to pack it into safearray and then to pass as a parameter to IResponse::BinaryWrite(). The process is pretty straightforward
Download source and demo project - 62 KB
Digg
del.icio.us
Newsvine
Facebook
Google
LinkedIn
MySpace
Reddit
Slashdot
StumbleUpon
Technorati
Twitter
Windows Live
YahooBuzz
FriendFeed
Comments
I have source code.
Posted by Legacy on 09/10/2002 12:00amOriginally posted by: CSConcordia
send me mail, I give you the source code.
ReplyWhere is the Source Code????
Posted by Legacy on 08/06/2002 12:00amOriginally posted by: Djay
Replywant to code
Posted by Legacy on 07/17/2002 12:00amOriginally posted by: Zafar Asghar
respected sir
i am doing my project of asp and that is "online jobs" . i am confuse what to do please help me. i am waiting for your reply plz guide me.i am waiting for you.
ok bye
ReplyWhere is the Source Code
Posted by Legacy on 03/06/2002 12:00amOriginally posted by: Dion
Hello,
I am trying to do the same thing but when I click on the link to download the zip file, the page could not be found.
Can you send me the Zip file with the source and project?
Thanks
ReplyHelp me~~~
Posted by Legacy on 02/12/2002 12:00amOriginally posted by: James
ReplyWhere is the source code?
Posted by Legacy on 12/14/2001 12:00amOriginally posted by: Carlos
The link is bad!
Replysource code
Posted by Legacy on 11/06/2001 12:00amOriginally posted by: dennis
source code
Replyperfect .
Posted by Legacy on 10/20/2001 12:00amOriginally posted by: abdallah
ReplySource code please?
Posted by Legacy on 09/06/2001 12:00amOriginally posted by: doug w
Fix the source code link please.
ReplyHow do I register the IResponse class?
Posted by Legacy on 09/06/2001 12:00amOriginally posted by: doug w
Apparently the IResponse object is intrinsic. The object is created and destroyed upon opening and closing each ASP page. An example of how to initialize this type of object can be found in the MSDN Library by searching for "Developing Active Server Components with ATL". It took about 2 hours of searching, and about 30 minutes of reading, but the document is very straight forward. I hope this helps anyone else that decides to use this function.
dougw
ReplyLoading, Please Wait ...