问一个SQL循环语句的问题

yuzhusisi

我建立了一张表acform如下

姓名      电话                   ID

张丽    0755-28193455     1

赵春光  0769-3345688      1

朱楠    0769-8896343      1

高红    021-23432452      1

现在我想通过SQL语句把表中的ID 变成

姓名      电话                  ID

张丽    0755-28193455     1

赵春光  0769-3345688      2

朱楠    0769-8896343      3

高红    021-23432452      4

请问如何写循环语句

andymark

Dim AdoRs As New ADODB.Recordset

  Dim i As Integer  AdoRs.ActiveConnection = CurrentProject.Connection

  AdoRs.Open "B", , adOpenKeyset, adLockOptimistic, adCmdTable

   i = 1

Do While Not AdoRs.EOF

    AdoRs("ID") = i

    i = i + 1   AdoRs.MoveNext Loop

AdoRs.Close

Set AdoRs = Nothing

jefferyaccess

慢慢学

yuzhusisi

这么难,谢谢



帮忙再改一下哦

[此贴子已经被作者于2005-10-21 13:44:21编辑过]

XWQ2000

kk