lcConStr = "Provider=vfpoledb;Data Source="+HOME(2)+"northwind\northwind.dbc" >>oCon = CreateObject("ADODB.connection") >>oCmd = CreateObject("ADODB.Command") >>oRs = CreateObject("ADODB.RecordSet") >>oCon.Open(lcConStr) >>oCmd.ActiveConnection = oCon >>oRs.ActiveConnection = oCon >>oCmd.CommandText = [SET DELETE OFF] >>oCmd.Execute() >>oCmd.CommandText = [ SELECT SET("DELETED"), * FROM orders] >>oRs.Source = oCmd >>>>>Hi All,
>>>SELECT * ; >>> FROM mytable ; >>> WHERE DELETED() >>>>>>