Connexion base Oracle

	// Pour la connexion ...

	HRESULT hr;
	_bstr_t strConn;
	_ConnectionPtr pConnec	= NULL;

	_bstr_t bstr_InitialCatalog("???");
	_bstr_t bstr_DataSource("???"));
	_bstr_t bstr_Login("???"));
	_bstr_t bstr_Pass("???"));
	_bstr_t bstr_security("???"));
	_bstr_t bstr_persist("???"));

	hr = CoInitialize(NULL);
	if( FAILED(hr) ) 
		goto END_CONNEXION;
	
	strConn =  "Provider=MSDAORA.1;";
	strConn += "Persist Security Info=" + bstr_persist + ";";
	strConn += "User ID="		  + bstr_Login + ";";
	strConn += "Password="		  + bstr_Pass + ";";
	strConn += "Data Source="	  + bstr_DataSource	+ ";";

    hr = pConnec.CreateInstance(__uuidof(Connection));
	if( FAILED(hr) ) 
		goto END_CONNEXION;

	try
	{
	    hr = pConnec->Open(strConn, "", "", adConnectUnspecified);
		if( FAILED(hr) )
			_com_issue_error(hr);
	}
	catch(_com_error& e)
	{
		//MsgOutput(sErr);
		goto END_CONNEXION;
	}


END_CONNEXION: 

#include <ole2.h>		
// Prise en charge ADO
#import "C:\Program Files\Fichiers communs\SYSTEM\ADO\msado15.dll" no_namespace rename("EOF", "EndOfFile")