请帮我写一段SQL语句，实现的功能不是很复杂的，有兴趣的进来看看。

Question

我写多几个数据吧：
Id1     Id2      date1        date2
1        0       2002-1-1     2002-1-2
2        1       2002-2-2     2002-1-3
3        1       2002-1-20    2002-1-4
4        1       2002-1-3     2002-2-3
5        0       2002-2-1     2002-1-5
6        5       2002-2-2     2002-1-6
7        5       2002-2-3     2002-1-7
变成：
Id1     Id2      date1        date2
1        0       2002-2-3     2002-1-2
2        1       2002-2-3     2002-1-3
3        1       2002-2-3     2002-1-4
4        1       2002-2-3     2002-1-5
5        0       2002-1-7     2002-1-5
6        5       2002-1-7     2002-1-6
7        5       2002-1-7     2002-1-7

Answer 1

帮你看看，不过我没有用ACCESS，最好你能贴出SQLSERVER语句，
帮你改成标准SQL应该会快点

Answer 2

ACCESS的 sql 比较弱。用程序很好实现type
  TIdate = record
    Id:integer;
    Date:Tdatetime;
  end;
var  Idd :array of Tidate;{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
var
  id,i:integer;
  sql :string;
begin
  with  dst do
  begin
    close;
    CommandText :='select *   from tbl where id2=0';
    open;
    setlength(idd,RecordCount);
    i:=0;
    While not eof do
    begin
      id := Fields[0].AsInteger ;
      with dst1 do
      begin
        close;
        CommandText  := 'select max(date2)  from tbl where id1= '+inttostr(id)+' or id2= '+inttostr(id);
        open;
        idd[i].Id := id;
        idd[i].Date := dst1.Fields[0].AsDateTime;
        close;
      end;
      next;
      inc(i);
    end;
    close
  end;
  for i:=low(Idd) to high(idd) do
  begin
    dst2.Parameters[0].Value := idd[i].Date;
    dst2.Parameters[1].Value := idd[i].Id;
    dst2.Parameters[2].Value :=  idd[i].Id;
    dst2.ExecSQL;  end;
    {  sql  := 'update tbl set date1 = '+ formatdatetime('yy-mm-dd',idd[i].date) +
        ' where  id1= '+inttostr(idd[i].id)+' or id2= '+inttostr(idd[i].id);
      ADOConnection1.Execute(sql);   }
end;
dst2 是 adoquery
sql:
update tbl set date1 =:date
where  id1=:id1   or id2=:id2
要指明 参数类型

Answer 3

不，我只要Access的SQL语句完成，不想用任何其他程序。

Answer 4

UPDATE TABLE SET DATE1 = (SELECT TOP 1 DATA2 FROM TABLE ORDER BY DATA2 DESC) WHERE ID1 = 1 OR ID2 = 1

Answer 5

補充一下...我實際上沒有看懂你的要求...并且我沒有DELPHI環境...我想你的SQL問題可能會出在MAX上..所以這樣寫應該不會有問題的

Answer 6

如果是ORACLE，可用一下语句实现
select a.id1,a.id2,b.date1,a.date2
  from a,(select max(date2) date1 from a where id1=1 or id2=1) b;
不过好像ACCESS不支持这种语法，但是不是可以用
select max(date2) into b from a where id1=1 or id2=1
先生成表b，然后再进行处理呢？

Answer 7

UPDATE TABLE SET DATE1 = (SELECT Max(DATA2) FROM TABLE ) WHERE ID1 = 1 OR ID2 = 1