【译者注】 附带的示例文件是一个PRG,实在太简单了,我就直接把内容贴在这里了。 local lcConnString, ; loCursor as CursorAdapter, ; laErrors[1] lcConnString = 'driver=SQL Server;server=(local);database=Northwind;' + ; 'uid=sa;pwd=;trusted_connection=no' * change password to appropriate value for your database loCursor = createobject('CursorAdapter') With loCursor .Alias = 'Customers' .DataSourceType = 'ODBC' .DataSource = sqlstringconnect(lcConnString) .SelectCmd = "select CUSTOMERID, COMPANYNAME, CONTACTNAME " + ; "from CUSTOMERS where COUNTRY = 'Brazil'" .KeyFieldList = 'CUSTOMERID' .Tables = 'CUSTOMERS' .UpdatableFieldList = 'CUSTOMERID, COMPANYNAME, CONTACTNAME' .UpdateNameList = 'CUSTOMERID CUSTOMERS.CUSTOMERID, ' + ; 'COMPANYNAME CUSTOMERS.COMPANYNAME, CONTACTNAME CUSTOMERS.CONTACTNAME' if .CursorFill() browse else aerror(laErrors) messagebox(laErrors[2]) endif .CursorFill() EndWith