with ADOConnection1 do begin ConnectionString:=Provider=SQLOLEDB.1Data Source=;User ID=sa;InitialCatalog=hisdbzy20040916 Password='' Persist Security Info=True' Loginprompt:=false; CommandTimeout ;=30; end;with AODQuery1 do begin Connection :=ADOConnection1; Close; SQL.Close; SQL.ADD('Select * from biao'); Open; end;Update biao set ziduan =:... Insert into biao values('',''....); Delete from biao where Edit; Append; Post;
begin
ConnectionString:=Provider=SQLOLEDB.1Data Source=;User ID=sa;InitialCatalog=hisdbzy20040916
Password=''
Persist Security Info=True'
Loginprompt:=false;
CommandTimeout ;=30;
end;with AODQuery1 do
begin
Connection :=ADOConnection1;
Close;
SQL.Close;
SQL.ADD('Select * from biao');
Open;
end;Update biao set ziduan =:...
Insert into biao values('',''....);
Delete from biao where
Edit;
Append;
Post;