Storing Data in Binary Field using ADODB

[Channing Jones]

Hello everyone,

I am trying to store data in a binary field of an SQL-Server table using
ADODB.
So far, I have managed to store a record but not any data in the binary
field.
I only get exceptions on various part. I have tried both AppendChunk and
using a stream object.
Unfortunately all the examples I can find in the Net and on the Microsoft
site
are in VB and don't translate easily into C++.

Does anyone have an example where this is done in C++??
Here is my code if you want to check it it's pretty messy because I've been
trying all kinds of things:
---------------------------------------
#include <ctime>
#include <stdio.h>
#include <iostream>
#include <string.h>

#import "C:\Programme\G emeinsame Dateien\System\ ado\msado15.dll "
rename("EOF", "ADOEOF")

using namespace std;

#include <windows.h>

const AnzMesswerte = 50;
typedef struct {
unsigned int ZeitStempel;
short Uoc, Isc, Umpp, UdcIst, UausIst, Uiso, Iiso, Tin, Tk, Tmod[5];
short UGenIst[AnzMesswerte];
short IGenIst[AnzMesswerte];
unsigned int ZeitStempelEnde ;
} SatzStruct;

typedef struct {
unsigned int sec;
unsigned short us, ms;
} ExakteZeit;

#define MaxRetries 10
#define SatzSize sizeof(Satz)
short retries = 0;
unsigned int temp_int;
unsigned int *int_ptr;
unsigned int sec, usec, usec2;
bool err = false;
HRESULT hr;
ExakteZeit Zeit;
SatzStruct Satz;

ADODB::_Connect ionPtr connection;
ADODB::_Records etPtr recordset;
ADODB::_StreamP tr mstream;
_variant_t varChunk;
void ConnectDB(void) {

CoInitialize(NU LL);
try
{
hr = connection.Crea teInstance(__uu idof(ADODB::Con nection));
if (FAILED(hr)) throw _com_error(hr);
hr = recordset.Creat eInstance(__uui dof(ADODB::Reco rdset));
if (FAILED(hr)) throw _com_error(hr);
connection->CursorLocati on = ADODB::adUseCli ent;
connection->Open(L"Provide r=sqloledb;Data Source=localhos t;"
L"Initial Catalog=Modulme ssdaten;User Id=sa;Password= <Passwort>;", L"",
L"", ADODB::adConnec tUnspecified);
recordset->Open(L"Messdat en", connection.GetI nterfacePtr(),
ADODB::adOpenDy namic, ADODB::adLockOp timistic, ADODB::adCmdTab le);
}
catch(...)
{
std::cerr << "Connect to database Exception";
}
}

void DatensatzSchrei ben(short ModulNr) {

try {
recordset->AddNew();
recordset->Fields->GetItem(L"Tmod 4")->PutValue(varCh unk);
recordset->Fields->GetItem(L"UGen Ist")->PutValue(mstre am->Read(AnzMesswe rt
e));

recordset->Update();
}

catch(...)
{
std::cerr << "Update Exception";
}
}

int main() {
int i=1;
string l;
cout << "Connecting to database\n";
ConnectDB();

hr = mstream.CreateI nstance(__uuido f(ADODB::Stream ));
if (FAILED(hr)) throw _com_error(hr);
mstream->Type = ADODB::adTypeBi nary;

UCHAR chData;
SAFEARRAY FAR *psa;
SAFEARRAYBOUND rgsabound[1];
rgsabound[0].lLbound = 0;
rgsabound[0].cElements = AnzMesswerte;
psa = SafeArrayCreate (VT_UI2,1,rgsab ound);
long index1 = 0;

://Copy the data only into Field.
for(long index=0;index<= (AnzMesswerte-1);index++)
{
//Take BYTE by BYTE and advance Memory Location
chData = Satz.UGenIst[index];
hr = SafeArrayPutEle ment(psa,&index 1,&chData);
index1++;
}

varChunk.vt = VT_ARRAY|VT_UI2 ;
varChunk.parray = psa;

mstream->Write(varChunk );

DatensatzSchrei ben(1);
recordset->Close();
connection->Close();
return 0;

}