VC 怎样动态创建oracle数据源

Question

我想用程序实现oracle数据源的动态添加。
//ODBC Data Sources 内容
WriteProfileString("ODBC Data Sources", "ICCS", "Oracle in OraDb10g_home1"); WriteProfileString("ICCS", "Database", "master");
WriteProfileString("ICCS", "Description", "");
WriteProfileString("ICCS", "Driver", "sqlsrv32.dll");
WriteProfileString("ICCS", "Trusted_Connection", "Yes");
WriteProfileString("ICCS", "LastUser", "");
WriteProfileString("ICCS", "OEMTOANSI", "No");
WriteProfileString("ICCS", "Server", "(local)");
WriteProfileString("ICCS", "UseProcForPrepare", "No"); m_pszRegistryKey = o_pszRegistryKey; //恢复旧指针值 //建立 ODBC.INI, 缺省目录为 NT 系统目录
WriteProfileString("ODBC 32 bit Data Sources", "ICCS", "SQL Server (32 bit)"); WriteProfileString("ICCS", "Driver32", "sqlsrv32.dll"); //建立 ODBCINST.INI, 缺省目录为 NT 系统目录
m_pszProfileName = "ODBCINST.INI";
WriteProfileString("ODBC 32 bit Drivers", "Oracle in OraDb10g_home1", "Installed");
WriteProfileString("Oracle in OraDb10g_home1", "Driver", "sqlsrv32.dll");
WriteProfileString("Oracle in OraDb10g_home1", "Setup", "sqlsrv32.dll");
WriteProfileString("Oracle in OraDb10g_home1", "32Bit", "1");
这里的代码我还没有修改完，不知道怎么修改了，请各位老师帮帮忙，谢谢！！！

Answer 1

你这是添加什么?? ODBC数据源吗???
下面是ADO访问ORACLE不用配置数据源的方法,红色部分需要作相应修改:
不配置数据源直接访问oracle数据库m_pConn->Open(L"Provider=OraOLEDB.Oracle.1;User ID=用户名;Password=密码;Data Source=(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=IP地址)(PORT=1521))(CONNECT_DATA=(SERVICE_NAME = 数据库SID)));Persist Security Info=False",L"",L"",adOpenUnspecified);