FoxPro/Visual FoxPro - visual con sqlserver

Hola :
Estoy trabajando vfp con sql server y tengo un problema como le asigno el valor a las variables a y b se me cae ,si alguien tubiera algun ejemplo de algun insert o update se los agredecere.
Yo lo he realiazdo con sqlexec y quiero hacerlo de la forma sgte:

Public Conexion
Public rst
a=''
b=''
Conexion=CreateObject("ADODB.Connection")
rst = CreateObject("ADODB.Recordset")
Conexion.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=kata;Initial Catalog=mula;Data Source=DATALAND_SYSTEM"
Conexion.Open
Consulta = "Select * From cliente "
rst = Conexion.Execute(Consulta)
do While not rst.EOF()
a = rst.fields("rut")
b = rst.fields("nombre")
rst.MoveNext
enddo