高分请教：ADO程序，在最后update（）的时候出错，为什么？？？

Question

每次程序运行至：m_pRecordset->Update();时出错，是末知错误，源程序如下：
try{
_RecordsetPtr m_pRecordset;

m_pRecordset.CreateInstance("ADODB.Recordset");

m_pRecordset->Open("fileinfo",
            _variant_t((IDispatch*)m_pConnection,true),
            adOpenKeyset,adLockOptimistic,adCmdTable); //添加文件到数据库
CString str = "M:\\3333.cut";
OpenFile(str);
char *pBuf = m_pFileBuf;
VARIANT varBLOB;
SAFEARRAY *psa;
SAFEARRAYBOUND rgsabound[1];

m_pRecordset->AddNew();
m_pRecordset->PutCollect("id",_variant_t("stu_1"));
m_pRecordset->PutCollect("name",_variant_t("stu_1"));
m_pRecordset->PutCollect("filename",_variant_t("3333"));
CString strCurTime;
                  CTime t = GetCurrentTime();
                  strCurTime.Format("%4d-%02d-%02d %02d:%02d:%02d", t.GetYear(),t.GetMonth(),t.GetDay(),t.GetHour(),t.GetMinute(),t.GetSecond());
m_pRecordset->PutCollect("addtime",_variant_t(strCurTime));
m_pRecordset->PutCollect("abstract",_variant_t("just a test"));
if(pBuf)
{    
rgsabound[0].lLbound = 0;
rgsabound[0].cElements = m_nFileLength;
psa = SafeArrayCreate(VT_UI1, 1, rgsabound);///创建SAFEARRAY对象
for (long i = 0; i < m_nFileLength; i++)
SafeArrayPutElement (psa, &i, pBuf++);///将pBuf指向的二进制数据保存到SAFEARRAY对象psa中
varBLOB.vt = VT_ARRAY | VT_UI1;           ///将varBLOB的类型设置为BYTE类型的数组
varBLOB.parray = psa; ///为varBLOB变量赋值
m_pRecordset->GetFields()->GetItem("file")->AppendChunk(varBLOB);
}
m_pRecordset->Update();


m_pRecordset->Close();
}
catch(_com_error e)///捕捉异常
{
CString errormessage;
errormessage.Format("连接数据库失败!\r\n错误信息:%s",e.ErrorMessage());
AfxMessageBox(errormessage);///显示错误信息
return ;
}

Answer 1

m_pRecordset->Open("fileinfo",
            _variant_t((IDispatch*)m_pConnection,true),
            adOpenKeyset,adLockOptimistic,adCmdTable);
==这里"fileinfo"是什么东西？

Answer 2

你好，fileinfo是我的表的名字，不会是这个出错了吧
我第一次写这种程序

Answer 3

必须是一个查询啊。
m_pRecordset->Open("select * from fileinfo",
            _variant_t((IDispatch*)m_pConnection,true),
            adOpenKeyset,adLockOptimistic,adCmdTable);

Answer 4

我改成您所学的这样
出现了这样的错误
错误信息:IDispatch error #3092"

Answer 5

将游标先移动到记录头再更新看看。
...
m_pRecordset->MoveFirst();
m_pRecordset->Update();

Answer 6

to边城浪子：
如果增加了m_pRecordset->MoveFirst();
那就在这句就出错了，呵呵

Answer 7

首先，你要调试一下。这个错误应该是catch里面跳出的吧。你看一下是哪一句错误转到了catch中。

Answer 8

to happyparrot:
您好，我调试过了
是在m_pRecordset->Update();这句
跳到catch去的

Answer 9

表的主键是哪个？id为stu_1的是否已经存在？尝试逐个字段写入（将其它字段先注释掉），看看和哪个字段有关

Answer 10

update出错，可能是某个字段类型或长度不对了；
m_nFileLength 值对吗，检查一下又没有溢出

Answer 11

to happyparrot：
表的主键是另一个自动生成的recordid，现在我数据库里没有任何东西，是试着第一次向数据库中写东西

Answer 12

to蓝点：
应该不会是m_nFileLength的问题，才5万多一点

Answer 13

to happyparrot：
请问您有邮箱吗
要不我把程序和数据库发给您，您帮我看一下，可以吗

Answer 14

[email protected]
但我没有数据库啊。

Answer 15

是不是你的id和name的输入值相同的缘故啊？
建议先输入一个值，看看update会不会出错

Answer 16

to happyparrot:
不会吧，呵呵
我的库是用access建的，如果您的机器上有access就应该可以吧
已经将程序发到您的邮箱，请查收一下

Answer 17

各位大虾很再帮忙看一下
我又仔细调了一下程序
m_pRecordset->AddNew();
m_pRecordset->PutCollect("id",_variant_t("stu_1"));
m_pRecordset->Update();
如果我的程序只有这一句，在update的时候都会出错

Answer 18

to 快乐鹦鹉：
我运行您的程序在本地写就没有问题，但是写到服务器上就出错了
服务器上的数据库是用access的表导入的

Answer 19

哦。那就不知道了。你所谓的服务器，就是SQL SERVER吧。数据库不同，可能写入数据库的数据格式要求也会不同。比如字符串，SQL SERVER一定要加单引号的

Answer 20

to 快乐鹦鹉：
哈哈，问题终于解决了，程序没有任何问题
是access导入sql server的时候出问题了，导致了数据库的fileinfo那张表不正常了，呵呵
多谢您的热心帮助，也谢谢所有在这里热心帮忙的朋友：）