1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35
|
#import "C:\Program Files\Fichiers communs\System\ado\msado15.dll" \
no_namespace rename("EOF","ADOEOF")
void main()
{
HRESULT hr;
CoInitialize(NULL);
try
{
_ConnectionPtr connection;
hr = connection.CreateInstance(__uuidof(Connection));
if (FAILED(hr))
{
throw _com_error(hr);
}
_RecordsetPtr recordset;
hr = recordset.CreateInstance(__uuidof(Recordset));
if (FAILED(hr))
{
throw _com_error(hr);
}
connection->CursorLocation = adUseClient;
connection->Open("DSN=msdaora;Data Source=Oracle;User Id=System;Password=8480;", L"", L"", adConnectUnspecified);
/////probléme dinsertion
BioAPI_BIR bir;// type binaire
recordset->Fields->GetItem((long)1)->Value = bir ; |
Partager