求教
代码如下:
void CTestwuliouDlg::OnWriteBz()
{
CDaoDatabase* m_pDatabase;
CDaoRecordset* m_pRecordset;
CString strWuLiou;
CString strMuDi;
CString strYuan;
COleVariant varMuDi;
COleVariant varWuLiou;
COleVariant varYuan;
char *strBz="1";
char *strWlm="1111111111111";
char *strPcl="2222";
m_pDatabase = new CDaoDatabase;
try
{
//m_pDatabase->Open(strMdb);
//"data source=AUTO;initial catalog=市场部;Connect TimeOut =30;user id =sa; password =c" +
// "wj";
m_pDatabase->Open(NULL,FALSE,FALSE,"ODBC;DSN=wljk;UID=sa;PWD=cwj;");
//m_pDatabase->Open(NULL,FALSE,FALSE,"Driver={SQL Server};Server =AUTO;Uid =sa;Pwd =cwj;initial catalog=wljk");
m_pRecordset = new CDaoRecordset(m_pDatabase);
}
catch(CDaoException *e)
{
//e->ReportError();
delete m_pDatabase;
m_pDatabase = NULL;
//e->Delete();
return ;
}
if(!m_pDatabase->IsOpen()) return ;
try
{
CString strSelect(_T("Select * from 入出库表 "));
m_pRecordset->Open(dbOpenDynaset,strSelect,dbConsistent);
m_pRecordset->MoveFirst();
if ( strBz[0]=='1')
{
m_pRecordset->Edit();//跳出,提示出错
m_pRecordset->SetFieldValue(6,"5");
m_pRecordset->Update();
}
return ;
}
catch(CDaoException *e)
{
e->ReportError();
e->Delete();
return ;
}
}
//不知道为什么,请大家帮忙 提示出错如下:
不能更新,数据库或对象为只读,可是我是以可读打开的,且有可读的权限?????