Local loConn as "ADODB.Connection", loCmd as "ADODB.Command" *** loConn = CreateObject("ADODB.Connection") loConn.ConnectionString = "Provider=VFPOLEDB.1;Data Source='Base\Scd4.dbc';Password='';Collating Sequence=MACHINE" loConn.Open() *** loCmd = CreateObject("ADODB.Command") loCmd.ActiveConnection = loConn loCmd.CommandText = "SET DATE TO DMY" && You can send SET DATE TO DMY command after openning ADO connection loCmd.Execute() && OLE IDispatch exception code 0 from Microsoft OLE DB Provider for Visual FoxPro: Occurs one or more errors on the processing command... loConn.Close() *** * loConn.Execute("SET DATE TO DMY") && do the same error