CDataSource m_source;
CSession    m_session;

HRESULT OpenDataBase()
{

   USES_CONVERSION;

	// close and delete any open recordsets


	if (m_source.m_spInit != NULL)
		m_source.m_spInit.Release();

	if (m_session.m_spOpenRowset != NULL)
		m_session.m_spOpenRowset.Release();

	if (m_source.OpenWithPromptFileName(::GetActiveWindow())!= S_OK)
	{
		MessageBox(_T("Couldn't connect to data source"));
		return E_ABORT;
	}
	else
	{
		if (m_session.Open(m_source) != S_OK)
		{
		MessageBox(_T("Couldn't create session on provider"));
			return E_ABORT;
		}
		CComVariant var;
		HRESULT hr;
		hr = m_source.GetProperty(DBPROPSET_DATASOURCEINFO, DBPROP_DATASOURCENAME, &var);

	return SUCCEEDED(hr);
   }
};