ado中新增记录,"select * from aaa" adCmdText, addnew update??
              "aaa"                adCmdTable, addnew update??
上面两个都在update处出错?我无奈了,高人帮助我吧
代码见下://ado------------------------------
::CoInitialize(NULL);
_ConnectionPtr MyDb;
MyDb.CreateInstance(__uuidof(Connection));
CString strConn;
strConn.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%sTracks.mdb",GetAppPath());
MyDb->Open(_bstr_t(strConn),"","",adModeUnknown);//这里的adModeUnknown有问题吗?
_RecordsetPtr MySet;
MySet.CreateInstance(__uuidof(Recordset));
_variant_t vSql("StatWorks");//表名
//MySet->CursorLocation = adUseClient;
MySet->Open(vSql,MyDb.GetInterfacePtr(),adOpenStatic,adLockOptimistic,adCmdTable);//这里的adCmdTable有问题吗?
try
{
MySet->MoveLast();
_variant_t Holder = MySet->GetCollect(_variant_t("ID"));
long ID = Holder.iVal;
ID += 1;
MySet->AddNew();
MySet->PutCollect(_variant_t("ID"),_variant_t(ID));
MySet->PutCollect(_variant_t("Province"),_variant_t(strProvince));
MySet->PutCollect(_variant_t("HighCity"),_variant_t(strHighCity));
MySet->PutCollect(_variant_t("Team"),_variant_t(strTeam));
MySet->PutCollect(_variant_t("Group"),_variant_t(m_strGroup));
MySet->PutCollect(_variant_t("MapID"),_variant_t(m_strMapID));
MySet->PutCollect(_variant_t("Value"),_variant_t(m_strValue));
MySet->PutCollect(_variant_t("Date"),_variant_t(m_ctDate.Format("%Y-%m-%d")));
MySet->PutCollect(_variant_t("Memo"),_variant_t(m_strMemo));
MySet->Update();//这里出错 }
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}
catch(...)
{
AfxMessageBox(_T("ADO发生错误!"));
}
MySet->Close();//这里错误
MyDb->Close();

::CoUninitialize();