>>>>>You can use EXECSCRIPT() function, VFPOLEDB supports it.
>>>>
>>>>This works. Thanks
>>>
>>>Hi Michel,
>>>
>>>Can you please tell exactly how did you make it work? Here http://www.tek-tips.com/viewthread.cfm?qid=1356865&page=1 the problem still seems to be unresolved.
>>>
>>>In the meantime I'm looking for a list of supported/unsupported VFP OldeDB commands. Forgot where did I see it.
>>
>>Found the list of unsupported commands Unsupported VFPOleDB commands
>
>This works for me:
>

>In VFP command window:
>CREATE TABLE Test (Fld1 I)
>CLOSE ALL
>
>oAdoConn = CREATEOBJECT([ADODB.Connection])
>oAdoConn.ConnectionString = [Provider=vfpoledb.1;Data Source=D:\All_zapl_4_9_0\;Collating Sequence=machine;]
>oAdoConn.Open()
>
>oAdoComm = CREATEOBJECT([ADODB.Command])
>oAdoComm.ActiveConnection = oAdoConn
>oAdoComm.CommandText = [EXECSCRIPT("SELECT 0"+CHR(13)+CHR(10)+"USE Test EXCLUSIVE"+CHR(13)+CHR(10)+"INDEX ON Fld1 TAG Test")]
>oAdoComm.Execute()
>

Thanks, Borislav. I tried to construct the exact same string in VB :)