如何更新主键?

Question

我有一个access数据库,zip_table中的所有记录都在显示在vsflexgrid控件上,现在要实现包括主键zipcode在内的内容更新,就想打开access数据库一样,只要主键的值不相等,就可以更新.
Dim i As Longstrsql = "select * from zip_table order by zipcode"Set rs = New ADODB.Recordset
rs.Open strsql, conn, adOpenKeyset, adLockPessimistici = 1With ZipEditGrid
  .AllowSelection = False
  .AllowBigSelection = False
  .SelectionMode = flexSelectionByRow
  .Editable = flexEDKbdMouse
End WithDo While Not rs.EOF
   strsql = ""
   strsql = rs("zipcode").Value & vbTab & rs("city").Value & vbTab & rs("state").Value & vbTab
   strsql = strsql & rs("Country").Value & vbTab & False
      
   With ZipEditGrid
     .AddItem strsql, i
   End With
   
   i = i + 1
   rs.MoveNext
Looprs.Close
Set rs = Nothing
这怎么实现啊?能用update  zip_table set zipcode='" & ZipEditGrid.TextMatrix(row,col) & "'实现吗?

Answer 1

看样子只能先判断有没有这个主键值,如果没有,就将vsflexgrid表全部插入!