lds_update = create datastore
lds_update.dataobject = dw_1.dataobject
lds_update.settransobject(sqlca)
if dw_1.rowcount() > 0 then
dw_1.RowsCopy(1,dw_1.RowCount(), Primary!, lds_update, 1, Primary!)
end if
if lds_update.update() =1 THEN
COMMIT;
messageBox("加载","加载成功!",Information!)
filedelete(filename)
else
ROLLBACK;
end if
dw_1.reset()
lds_update.reset()