将SPT所读取的Cursor便成可擦写

Lparameters cTableName，cUpdateKey，cBuffering
cBuffering = IIF(EMPTY(cBuffering)，3，CBUFFERING)
* *要更新的远程数据表
CursorSetProp ("tables "，" &c tablename")
* *主键值列
CursorSetProp(" key field list "，" & cupdatekey")
* *指定前后字段的对应关系
Nl = name list(cc table FL)
* * SQL WHERE子句仅包含1个键列2个键和可更新字段3个键和修改字段4个键和时间戳字段
CURSORSETPROP("WhereType "，4)
* * * update switch
cursor set prop(" send updates "， T.)
* *缓冲模式
游标设置提示(" buffering "，cbuffering)
返回

函数Field list
Field list = " "
For II = 1 to Fcount()
Field list = Field list+Field(II)+"，"
end For
Return LEFT(Field list，LEN(FieldList)-1)

函数名称列表
Lparameters cTableName
Field list = " "
For II = 1 to Fcount()
Field list = Field list+Field(II)+" "+cTableName+"，"+Field(II)+"，"
end for
Return LEFT(Field list，LEN(FieldList)-1)