As a topic such as topic such as topic as topic such as topic, first thank you

CodePudding user response:

Var
Unscrpt1: TUniScript;
I: integer;
The begin
Unscrpt1:=TUniScript. Create (nil);
Unscrpt1. Connect:=UniCtn;
For I:=0 to n do
The begin
Unscrpt1. SQL. The Add (' update SQL statements);
The end;
UniCtn. StartTransaction;
Unscrpt1. Execute;
UniCtn.Com MIT;
Unscrpt1. Free;


The end;