简单问题:ADO方式如何动态联接SQL SERVER数据库

Question

ASP是这样的！
set con= server.createobject("adodb.connection")
conn.open "driver={sql server}; server=*; database=* uid=* pwd=*"

Answer 1

hr = m_pConnection.CreateInstance(__uuidof(Connection));
char sCon[]="Provider=SQLOLEDB;server=dengguoqi;uid=sa;pwd=;database=DR_Control;";
hr = m_pConnection->Open(sCon,"","",-1);
if(hr>=0)
{
//     MessageBox(NULL,"Success","Connect",MB_OK);
return true;
}
else
{
//   MessageBox(NULL,"Fail","Connect",MB_OK);
  return false;
}

Answer 2

VB中是这样的：
Public Function Get_data(ByVal Sql_str As String) As Recordset
Dim con As ADODB.Connection
Dim rs As ADODB.Recordset
Dim strcnn As String
    Set con = New ADODB.Connection
    Set rs = New ADODB.Recordset
    Set Get_data = rs    con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False"    rs.CursorLocation = adUseClient
    rs.CursorType = adOpenStatic
    rs.Open Sql_str, con, adOpenDynamic, adLockOptimistic
    Set Get_data = rs
    Set con = Nothing
    Set rs = Nothing
End Function虽语言不同，但连接字串基本上一样