Question

VC6++怎么和oracle进行连接啊，后台建好了。可是不知道怎么连，ODBC的。

请教高人，希望有图有代码的那种。自己刚弄的VC6.0还不知道怎么用。最好有点儿讲解。希望能快点上手。老师留得大作业。拜托了，大虾们！

Answer 1

http://icese.net/icetool/other/testdatabasedll.rar

//连接Access数据库
retCode=icePub_databaseConnect(DBTYPE_Access, "TEST", "", szFile, "", "", "", &m_henv, &m_hdbc);

//连接SQL Server数据库
//icePub_databaseConnect(DBTYPE_SQLServer, "sqltest", "test", "", "(local)", "sa", "", &m_henv, &m_hdbc);

//连接MySQL数据库
//icePub_databaseConnect(DBTYPE_MySQL, "TEST", "test", "", "localhost", "root", "123456", &m_henv, &m_hdbc);

//连接DB2数据库
//icePub_databaseConnect(DBTYPE_DB2, "TEST", "TEST", "", "DB2", "db2admin", "123456", &m_henv, &m_hdbc);

//连接Oracle数据库
//icePub_databaseConnect(DBTYPE_Oracle, "TEST1", "", "", "bjrocket", "system", "system", &m_henv, &m_hdbc);

可参考

Answer 2

// 初始化数据库
BOOL CDataBase::FaxIniDataLink(CString BaseName,CString Name,CString Code)
{
if(m_FaxDataLink!=NULL&&m_FaxDataLink->State)
m_FaxDataLink->Close();
if(m_FaxDataLink!=NULL&&m_FaxDataLink->State)
{
if(m_FaxDataBaseName != BaseName)
{
m_FaxDataLink -> Close();
m_FaxDataLink = 0;
}
}
if(m_FaxDataLink!=NULL&&m_FaxDataLink->State)
return 1;
CString SQL="DSN="+BaseName+";UID="+Name+";PWD="+Code;
// CString SQL="Driver={SQL Server};Server=150.0.1.131;Uid Id=;Pwd=;Database=餐饮管理";
// _bstr_t source("Driver={SQL Server};Server=150.0.1.131;Uid Id=;Pwd=;Database=Northwind");
// 数据库连接字符串（数据库名称，登陆名称，登陆密码）维修服务管理系统数据库
_bstr_t conn = SQL;
_bstr_t name;
_bstr_t code;
HRESULT hr = 0;
try
{
// 创建连接智能指针"ADODB.Connection"
hr = m_FaxDataLink.CreateInstance(__uuidof(Connection));
if (SUCCEEDED(hr))// 连接数据库
m_FaxDataLink -> Open(conn, "", "", -1);
if(SUCCEEDED(hr))// 置数据库打开标志
{
// 设置连接超时
m_FaxDataLink->PutCommandTimeout(5);
m_FaxDataBaseName = BaseName;
m_FaxLinkName=Name;
m_FaxLinkCode=Code;
m_FaxLinkSQL = SQL;
}
else
{
AfxMessageBox("ADO数据源初始化失败！");
m_FaxLinkSQL = "";
}
}
catch (_com_error & error)
{
// 出错处理
AfxMessageBox(error.ErrorMessage());
m_FaxDataLink=NULL;
m_FaxLinkSQL.Empty();
return 0;
}
return 1;
}