RecordsetToXML奇怪问题

[drizzle_yu]

用ASP往ACCESS你们增加了一条记录，下面函数到 aRecordset.Save(xmldoc, adPersistXML);
就出现未知错误，可用ACCESS打开查看记录数据没什么特别之处，是什么原因呀？
ACCESS都是采用Jet OLE DB4.0操作的

function RecordsetToXML(const aRecordSet : _Recordset; IncludeSchema : boolean = FALSE) : widestring;
var xmldoc : DOMDocument30;
begin
result := '';

xmldoc := CoDOMDocument30.Create;
xmldoc.async := FALSE;
//xmldoc := CreateXMLDocument;
aRecordset.Save(xmldoc, adPersistXML);

if not IncludeSchema
then result := xmldoc.childNodes[0].childNodes[1].XML
else result := xmldoc.XML;
end;