Clear All csql = "SELECT EmployeeID, LastName, FirstName," + ; "Title, TitleOfCourtesy, BirthDate," + ; "Hiredate, Address, City, Region," + ; "PostalCode, Country, HomePhone," + ; "Extension, Photo, Notes," + ; "ReportsTo, PhotoPath FROM dbo.Employees" lnHandle=Sqlstringconnect('DRIVER=SQL Server;'+; 'SERVER=server;DATABASE=Northwind;Trusted_Connection=Yes') SQLExec(lnHandle,csql,'v_emp') CursorSetProp('KeyFieldList','Employeeid','v_emp') CursorSetProp('WhereType',1,'v_emp') CursorSetProp('Tables','employees','v_emp') TEXT to m.lcUpdateNameList noshow employeeID employees.employeeid, Lastname employees.Lastname, Firstname employees.FirstName, Title employees.Title, TitleOfCourtesy employees.TitleOfCourtesy, BirthDate employees.BirthDate, Hiredate employees.Hiredate, Address employees.Address, City employees.City, Region employees.Region, PostalCode employees.PostalCode, Extension employees.Extension, Notes employees.Notes, ReportsTo employees.ReportsTo, PhotoPath employees.PhotoPath ENDTEXT CursorSetProp("UpdateNameList", ; Chrtran(m.lcUpdateNameList,Chr(13)+Chr(10),''),'V_emp') CursorSetProp('UpdatableFieldList',; "LastName, FirstName," + ; "Title, TitleOfCourtesy, BirthDate," + ; "Hiredate, Address, City, Region," + ; "PostalCode, Country, HomePhone," + ; "Extension, Notes," + ; "ReportsTo, PhotoPath",'v_emp') CursorSetProp('SendUpdates',.T.,'v_emp') CursorSetProp('Buffering',5,'v_emp') Browse Title 'Editable fields are all except Id and Photo' If !Tableupdate(2,.T.,'v_emp') Aerror(arrWhy) Display Memo Like arrWhy Endif SQLExec(lnHandle,'select * from dbo.employees','afterupdate') SQLDisconnect(lnHandle) Select afterupdate BrowseCetin