有谁会用Oracle数据库 急求解答

[金枪太保]

本人现在要把一个师兄做过的软件从连接SQL server改成Oracle数据库 原来连接SQL server的代码如下 求高手帮我写个连接Oracle数据库的
/*========================================================================
Name: 连接 SQL SERVER 数据库.
-----------------------------------------------------
Params: [dbsrc]: SQL SERVER 服务器名.
[dbname]: 默认的数据库名.
[user]: 用户名.
[pass]: 密码.
==========================================================================*/
BOOL CAdoConnection::ConnectSQLServer(CString dbsrc, CString dbname, CString user, CString pass, long lOptions)
{
CString strConnect = _T("Provider=SQLOLEDB.1; Data Source=") + dbsrc +
_T("; Initial Catalog=") + dbname +
_T("; User ID=") + user +
_T("; PWD=") + pass +
_T("; Connect Timeout = 3");
return Open(LPCTSTR(strConnect), lOptions);
}

[就想叫yoko]

ado连改动量非常小

[eye_motioin]

基本不用更改！