table1.first; while not table1.Eof do begin table2.first; while not table2.Eof do begin N:=0; N:=table1['字段1']+table1['字段2']+table1['字段3']; if table2['最小值 ']<=N<=table2['最大值 '] then begin table1.edit; table1['某字段']:=table2['个人 ']; table1.Post; end; table2.next; end; table1.next; end;
table1.first; while not table1.Eof do begin table2.first; while not table2.Eof do begin N:=0; N:=table1['字段1']+table1['字段2']+table1['字段3']; if table2['最小值 ']<=N<=table2['最大值 '] then begin table1.edit; table1['某字段']:=table2['个人 ']; table1.Post; end; table1.next; table2.next; end;
table1.first; while not table1.Eof do begin table2.first; while not table2.Eof do begin N:=0; N:=table1['字段1']+table1['字段2']+table1['字段3']; if table2['最小值 ']<=N<=table2['最大值 '] then begin table1.edit; table1['某字段']:=table2['个人 ']; table1.Post; table2.next; end; end; table1.next; end; end;试试
噢,不好意思,应该是: table1.first; while not table1.Eof do begin table2.first; while not table2.Eof do begin N:=0; N:=table1['字段1']+table1['字段2']+table1['字段3']; if table2['最小值 ']<=N<=table2['最大值 '] then begin table1.edit; table1['某字段']:=table2['个人 ']; table1.Post; end; table2.next; end; table1.next; end; end;
table1.first; while not table1.Eof do begin table2.first; while not table2.Eof do begin N:=0; N:=table1['字段1']+table1['字段2']+table1['字段3']; if table2['最小值 ']<=N<=table2['最大值 '] then begin table1.edit; table1['某字段']:=table2['个人 ']; table1.post; table1.next; table2.next; end; end; table1.next; end;
update table1 set '某字段'=(select '个人 ' from table2 where '最小值 ' <=(table1.'字段1'+table1.'字段2'+'字段3') and '最大值 ' >=(table1.'字段1'+table1.'字段2'+'字段3')
while not table1.Eof do
begin
table2.first;
while not table2.Eof do
begin
N:=0;
N:=table1['字段1']+table1['字段2']+table1['字段3'];
if table2['最小值 ']<=N<=table2['最大值 '] then
begin
table1.edit;
table1['某字段']:=table2['个人 '];
table1.Post;
end;
table2.next;
end;
table1.next;
end;
while not table1.Eof do
begin
table2.first;
while not table2.Eof do
begin
N:=0;
N:=table1['字段1']+table1['字段2']+table1['字段3'];
if table2['最小值 ']<=N<=table2['最大值 '] then
begin
table1.edit;
table1['某字段']:=table2['个人 '];
table1.Post;
end;
table1.next;
table2.next;
end;
while not table1.Eof do
begin
table2.first;
while not table2.Eof do
begin
N:=0;
N:=table1['字段1']+table1['字段2']+table1['字段3'];
if table2['最小值 ']<=N<=table2['最大值 '] then
begin
table1.edit;
table1['某字段']:=table2['个人 '];
table1.Post;
table2.next;
end;
end;
table1.next;
end;
end;试试
table1.first;
while not table1.Eof do
begin
table2.first;
while not table2.Eof do
begin
N:=0;
N:=table1['字段1']+table1['字段2']+table1['字段3'];
if table2['最小值 ']<=N<=table2['最大值 '] then
begin
table1.edit;
table1['某字段']:=table2['个人 '];
table1.Post;
end;
table2.next;
end;
table1.next;
end;
end;
while not table1.Eof do
begin
table2.first;
while not table2.Eof do
begin
N:=0;
N:=table1['字段1']+table1['字段2']+table1['字段3'];
if table2['最小值 ']<=N<=table2['最大值 '] then
begin
table1.edit;
table1['某字段']:=table2['个人 '];
table1.post;
table1.next;
table2.next;
end;
end;
table1.next;
end;
where '最小值 ' <=(table1.'字段1'+table1.'字段2'+'字段3') and
'最大值 ' >=(table1.'字段1'+table1.'字段2'+'字段3')