HRESULT hr;
//open connection
hr = m_conn.CreateInstance("ADODB.Connection");
hr = m_rst.CreateInstance("ADODB.Recordset");
try {
if(SUCCEEDED(hr))
{
hr = m_conn->Open("Provider=MSDAORA.1;Password=sfis1;User ID=sfis1;Data Source=delltest;Persist Security Info=True","","",adModeUnknown);
//"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\\com.mdb"
}
m_rst->Open("SELECT * FROM testid",_variant_t((IDispatch*)m_conn,true),adOpenDynamic,adLockOptimistic,adCmdText);
UpdateData(true);
m_rst->AddNew();
m_rst->PutCollect(_variant_t((long)0),_variant_t(m_strStart));
m_rst->PutCollect(_variant_t((long)1),_variant_t(m_strEnd));
m_rst->Update();
m_rst->MoveFirst();
m_strStart = m_rst->GetCollect(_variant_t((long)0)).bstrVal;
m_strEnd = m_rst->GetCollect(_variant_t((long)1)).bstrVal;
UpdateData(FALSE);
}
catch(_com_error e)///捕捉异常
{
CString errormessage;
errormessage.Format("Error Message: %s",e.ErrorMessage());
AfxMessageBox(errormessage);
}
//open connection
hr = m_conn.CreateInstance("ADODB.Connection");
hr = m_rst.CreateInstance("ADODB.Recordset");
try {
if(SUCCEEDED(hr))
{
hr = m_conn->Open("Provider=MSDAORA.1;Password=sfis1;User ID=sfis1;Data Source=delltest;Persist Security Info=True","","",adModeUnknown);
//"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\\com.mdb"
}
m_rst->Open("SELECT * FROM testid",_variant_t((IDispatch*)m_conn,true),adOpenDynamic,adLockOptimistic,adCmdText);
UpdateData(true);
m_rst->AddNew();
m_rst->PutCollect(_variant_t((long)0),_variant_t(m_strStart));
m_rst->PutCollect(_variant_t((long)1),_variant_t(m_strEnd));
m_rst->Update();
m_rst->MoveFirst();
m_strStart = m_rst->GetCollect(_variant_t((long)0)).bstrVal;
m_strEnd = m_rst->GetCollect(_variant_t((long)1)).bstrVal;
UpdateData(FALSE);
}
catch(_com_error e)///捕捉异常
{
CString errormessage;
errormessage.Format("Error Message: %s",e.ErrorMessage());
AfxMessageBox(errormessage);
}
解决方案 »
- 警告信息
- Orge和MFC得融合问题
- 用InstallShield制作安装包,想把其中一个文件夹隐藏,有什么办法吗?
- 用MFC实现飞鸽传书的一些功能问题?
- 在MFC中能创建一个指向一个类型的指针数组吗?
- 代码行统计程序。 这道题目本身不难,我想看看大家的程序是如何写的,学习一些好的设计方法。(19号结贴)
- 大家好,帮帮我!向Insernet服务器提交数据的DLL为何在调用时出错?
- 我还是分不清窗口和视口的概念,大家帮帮我,
- 我的activex控件为何不能被应用?(十分急,第一个解决问题者给80分)
- 压缩文件-----用api
- 1.不是说.net程序可以在win98下运行吗?
- 请教个基础的问题(关于malloc,free)……
編譯沒問題, 在運行的時候會出現這樣的报错:
Error Message: Unknown error 0x800A0CB3
誰能幫我一把?
m_conn->("Provider=OraOLEDB.Oracle.1;Password=sfis1;User ID=sfis1;Data Source=delltest;Persist Security Info=True","","",adModeUnknown);
m_rst->Open("SELECT * FROM testid",_variant_t((IDispatch *) m_conn,true),adOpenStatic,adLockOptimistic,adCmdText);
我运行通过了
Thanks! 好象这样也不行, 可能不是这里的原因.
你的方法是對的, 這個問題已解決了. 但是我不太明白, "Provider=MSDAORA.1"与
"Provider=OraOLEDB.Oracle.1"之間有什么不同?
m_rst->CursorLocation = adUseClient