var
doc: IDocument;
docfile: IEmbeddedObject;
doc := doccur;
docid := doc.GetItemValue('BoxID');
tempstr:=docid[0];
if Trim(tempstr)='' then
begin
docid := doc.UniversalID;
tempname := docid;//docid[0];
//
//doc.AppendItemValue('BoxID','213123123123') ;
doc.ReplaceItemValue('BoxID',tempname) ;
doc.Save(True,True,True);
end;
本文地址:http://www.xszlo.com/article/2012-12-10/7620.html,转发请保留这个地址,谢谢
doc: IDocument;
docfile: IEmbeddedObject;
doc := doccur;
docid := doc.GetItemValue('BoxID');
tempstr:=docid[0];
if Trim(tempstr)='' then
begin
docid := doc.UniversalID;
tempname := docid;//docid[0];
//
//doc.AppendItemValue('BoxID','213123123123') ;
doc.ReplaceItemValue('BoxID',tempname) ;
doc.Save(True,True,True);
end;
本文地址:http://www.xszlo.com/article/2012-12-10/7620.html,转发请保留这个地址,谢谢
本文介绍如何使用特定代码实现自动更新文档ID并保存的功能。通过设置变量、条件判断与字符串处理,确保文档ID的正确更新并在保存时保持一致性。
1万+

被折叠的 条评论
为什么被折叠?



