VFP 愛用者社區

[Terry1211]

請問各位前輩~~

小弟參考站上相關CursorAdapter的文章

Local lcConnectionString As String
Local loCursor As CursorAdapter

lcConnectionString = "Driver=SQL Server;Server=SQLEXPRESS;database=Northwind;trusted_connection = .T."

loCursor = Newobject("CursorAdapter")

With loCursor
.Alias = "Customers"
.DataSourceType = "ODBC"
.Datasource = Sqlstringconnect(lcConnectionString)
.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'

With loCursor
If .CursorFill()
Browse
Else
Aerror(laErrors)
Messagebox(laErrors[2])
Endif
Endwith

ENDWITH

當我把Code放在Init內 執行後所產生的Customers cursor，
離開Init後 就不見（or 被關掉），
我要怎麼利用CursorAdapter所產生的Cursor 或是讓Cursor 不會被關掉

CursorAdapter 不是應該會產生一個Cursor 在client端嗎 ? ^^??

[Jmx]

publ loCursor
試看看

[Terry1211]

To Jmx ~~
感謝您的回應，小弟自己有發現這一點，
我是利用AddProperty產生一個屬性來接受loCursor~~