var
sSQL:string;
begin
sSQL := 'Insert into ErrorNote(DocNo,PageNum,PageName,PagePosition,ErrorLog)' +
' values(' +
' '+''''+sDocNo+''',' +
' '+''''+sPageNum+''','+
' '+''''+sPageName+''',' +
' '+''''+sPagePosition+''',' +
' '+''''+sError+'''' +
')';
以上代码我首先要判断其中sPagePosition字段是否有重复,如果有重复怎样写个修改语句改过来。谢谢!
然后用
try
sql.exec;
except
// 处理重复
end;
捕捉