MS Remote

Cometí algunos errores en el ejemplo anterior, aquí tienes la versión corregida, ya le probé y funciona:
Provider="MS Remote;" +;
"Remote Server=http://myservername/;" +;
"Remote Provider=SQLOLEDB;" +;
"Data Source=myServerName;" +;
"Initial Catalog=myDatabaseName;" +;
"User ID=myUsername;" +;
"Password=myPassword"
wcon=sqlstringconnect(Provider)
if wcon >=1
&& OK
else
=messagebox("Falla en Conexion",0+16+0,"Precaucion")
return
endif
wrs=sqlexec(wconexion,"select * from tabla","temporal")
if wrs>=1
Se le temporal
Go top
Do whil ! Eof()
&& ..... Procesa .......
Se le temporal
Skip
Enddo
Se le temporal
Use
Endif
=sqldisconnect(wcon)

Lo probé así, y me pide un dsn local...
No lo pude hacer funcionar...
¿Me podrías pasar el código de prueba tuyo?
Acá vo como lo hice Yo, a ver si descubrís en que fallé..
Provider="MS Remote;" +;
"Remote Server=http://www.midominio.com/;" +;
"Remote Provider=SQLOLEDB;" +;
"Data Source=www.midominio.com;" +;
"Initial Catalog=mibaseweb.mdb;" +;
"User ID=miusuario;" +;
"Password=miclave"
wcon=sqlstringconnect(Provider)
if wcon >=1
=messagebox("Conexion Ok") &&Ok
else
=messagebox("Falla en Conexion",0+16+0,"Precaucion")
return
endif
wrs=sqlexec(wcon,"select * from mitablaweb","temporal")
if wrs>=1
sele temporal
go top
brow
do whil !eof()
&& ..... Procesa .......
Se le temporal
skip
enddo
Se le temporal
Use
Endif
=sqldisconnect(wcon)

Provider=MS Remote;" ;
"Remote Server=http://myservername/;" ;
"Remote Provider=SQLOLEDB;" ;
"Data Source=myServerName;" ;
"Initial Catalog=myDatabaseName;" ;
"User ID=myUsername;" ;
"Password=myPassword"
wcon=sqlstringconnect(Provider)
if wconexion >=1
&& OK
else
=messagebox("Falla en Conexion",0+16+0,"Precaucion")
return
endif
wrs=sqlexec(wconexion,"select * from tabla","temporal")
if wrs>=1
Se le temporal
Go top
Do whil ! Eof()
&& ..... Procesa .......
Se le temporal
Skip
Enddo
Se le temporal
Use
Endif
=sqldisconnect(wcon)