You're using text to this like TEXT TO this.CursorSchema. Remove this, you're using with oCA. In other words, you need to assign properties of CA, not this.

>with this code i get a function argument value,type or count is invalid
>
>
>why ???
>
>thanks
>
>

>oCA = CREATEOBJECT([CursorAdapter])
>WITH oCa
>     .DataSourceType = [ODBC]
>     .DataSource     = sqlstringconnect([dsn=sqlfoxpro;uid=sql;pwd=sql])
>     .WhereType      = 1 && Key field only
>     .KeyFieldList   = [ident]
>     .Tables         = [dovendor]
>
>     TEXT TO this.CursorSchema NOSHOW  PRETEXT 15 TEXTMERGE
>		CNTR_ORIG C(3), COMPANY C(35), CONTACT C(30), CR_BY C(10), CR_DATE T, EDI C(12), EMAIL C(40), FAX C(15), IDENT I, LANGUE C(1), MAINADDR1 C(30), MAINADDR2 C(30), MAINCITY C(25), MAINCNTRY C(3), MAINSTATE C(3), MAINZIP C(10), NOTE M, PHONE C(15), PLACE_EXP C(3), TAXID C(15), TITRE C(20), VENDNO C(10), VFDCODE C(3), WEBPAGE C(100)
>     ENDTEXT
>
>     TEXT TO this.SelectCmd NOSHOW  PRETEXT 15 TEXTMERGE
>		select cntr_orig, company, contact, cr_by, cr_date, edi, email, fax, ident, langue, mainaddr1, mainaddr2, maincity, maincntry, mainstate, mainzip, note, phone, place_exp, taxid, titre, vendno, vfdcode, webpage from dovendor
>     ENDTEXT
>
>     TEXT TO this.UpdatableFieldList NOSHOW  PRETEXT 15 TEXTMERGE
>		cntr_orig, company, contact, cr_by, cr_date, edi, email, fax, ident, langue, mainaddr1, mainaddr2, maincity, maincntry, mainstate, mainzip, note, phone, place_exp, taxid, titre, vendno, vfdcode, webpage
>	 ENDTEXT
>	
>     TEXT TO this.UpdateNameList NOSHOW  PRETEXT 15 TEXTMERGE
>		cntr_orig dovendor.cntr_orig,
>		company dovendor.company,
>		contact dovendor.contact,
>		cr_by dovendor.cr_by,
>		cr_date dovendor.cr_date,
>		edi dovendor.edi,
>		email dovendor.email,
>		fax dovendor.fax,
>		langue dovendor.langue,
>		mainaddr1 dovendor.mainaddr1,
>		mainaddr2 dovendor.mainaddr2,
>		maincity dovendor.maincity,
>		maincntry dovendor.maincntry,
>		mainstate dovendor.mainstate,
>		mainzip dovendor.mainzip,
>		[note] dovendor.note,
>		phone dovendor.phone,
>		place_exp dovendor.place_exp,
>		taxid dovendor.taxid,
>		titre dovendor.titre,
>		vendno dovendor.vendno,
>		vfdcode dovendor.vfdcode,
>		webpage dovendor.webpage
>     ENDTEXT
>
>     .UseCursorSchema = .t.
>     .Alias           = [MyVFPRecorSet]
>ENDWITH
>
>IF NOT oCA.CursorFill()
>   AERROR(lAerror)
>   MessageBox([Can not fill the cursor adapter ]+lAerror[1,2])
>   RETURN
>ENDIF
>
>SELECT MyVFPRecorSet
>browse