获取数据按钮代码
con = Sqlstringconnect([Driver={SQL Server};Server=192.168.31.1;UID=sa;PWD=a;Database=sjk])
Public ca
ca=Createobject("CursorAdapter")
With ca
    .Alias = 'cs3'  &&别名
    .Datasource=con  &&建立的连接
    .DataSourceType = 'odbc'
    .SelectCmd = "select id,类别,序号,左侧,顶部 from cs3  "   
    .KeyFieldList = 'id'  &&关键字
    .Tables = "cs3"  &&要修改的表
    .UpdatableFieldList = "id,序号,左侧,顶部"
    .UpdateNameList ="id cs3.id,序号 cs3.序号,左侧 cs3.左侧,顶部 cs3.顶部"  

    .CursorFill()   &&
Endwith
Select cs3
CursorSetProp("buffering",3)

Thisform.Grid1.RecordSource ="cs3"
Thisform.Grid1.ColumnCount =3
Thisform.Grid1.Columns(1).header1.Caption='序号'
Thisform.Grid1.Columns(1).ControlSource='序号'
Thisform.Grid1.Columns(2).header1.Caption='左侧'
Thisform.Grid1.Columns(2).ControlSource='左侧'
Thisform.Grid1.Columns(3).header1.Caption='顶部'
Thisform.Grid1.Columns(3).ControlSource='顶部'
Thisform.Grid1.Column1.Width=50
Thisform.Grid1.Column2.Width=50
Thisform.Grid1.Column3.Width=50
Thisform.Grid1.RowHeight =30
Thisform.Grid1.Refresh

增加按钮代码
Insert Into  cs3 (序号,左侧,顶部) Values (1,2,3)
ThisForm.Grid1.Refresh

保存按钮代码
Select cs3
Tableupdate(1,.t.,'cs3')
按完增加按钮后

表格显示 1,2,3
这时我在表格中修改，然后再按增加按钮，修改的数字能保存。
如果一连增加多个不修改，最后一起修改，即使按了保存，重新按获取数据，结果没有修改还是1,2,3,为什么增加多个修改就不好用？请各位老师给看一下，谢谢

上传源代码

是不是跟关键字id有关，增加时没给id赋值，这个id是sql server表中的自动增量型（名称不记得），多个记录没有一个固定id造成的？这个id怎么赋值？

版主我的时间是同步的

谢谢版主，早上在增加加了保存代码，就可以了

Select cs3
Tableupdate(1,.t.,'cs3')
ca.CursorRefresh()
版主加了这个

是的，有什么号建议或代码，谢谢

论坛恢复后变冷清了