I am trying to upload data from VFP tables into SQL server using ADO

I can open the connection, but opening the recordset gives an error.

My code is something like this.

**
local ERR
on Error ERR = .T.
With oNewphotoRS
.ActiveConnection = oConnection
.Source = "Photographers"
.CursorLocation = adUseClient
.LockType = adLockBatchOptimistic
.CursorType = adOpenDynamic
.CommandType = adcmdTable
.Open()
EndWith
**
IF Err
WAIT WINDOW "Error opening recordset"
ENDIF
**

What I am doing wrong here. I am using VFP 7.

TIA

Alhad