Visual Basic - Problema de ADO

Hola amigos de LWP, espero me yuden con esto, Gracias.

dim objado as new adodb.connection
objado.provider = "MSDASQL;Driver=Microsoft Visual FoxPro Driver;"
objado.conectionstring = "SourceType=DBF;SourceDB=c:\Demo\"
objado.open
objado.execute "create table 'cliente' free ('d01' i,'d02' c(254),'d03' c(3), UNIQUE 'd01' + 'd02' tag 'idx_pk')",,adcmdtext

Ahora el problema esta en que, la tabla se crea en la ruta App.Path y no en el valor de 'SorceDB' que es c:\Demo.

Como lo resuelvo, otra vez Gracias.

Alguien podria ayudarme con esta cuestion.

Fijate con ésto a ver que sucede:

objado.execute "create table '" & objado.Properties("SourceDB") & "cliente' free ('d01' i,'d02' c(254),'d03' c(3), UNIQUE 'd01' + 'd02' tag 'idx_pk')",,adcmdtext

Sino fijate con ADOX y de utilizar el proveedor VFPOLEDB que es más eficiente que ODBC.