*The little program CLEAR oConnection = NEWOBJECT("ADODB.Connection") oStream = NEWOBJECT("ADODB.Stream") oConnection.Provider = "SQLOLEDB.1" oConnection.ConnectionString = ; "Persist Security Info=False;User ID=sa;"+; "Initial Catalog=Shipping;Data Source=FDURO_W2K" oConnection.open lcSelect = ; "SELECT * FROM INCIDENT" <B>&& This table is empty!!!</B> lnRecords = 0 oRecordSet = oConnection.Execute(lcSelect, lnRecords) oRecordSet.Save(oStream, 1) XMLTOCURSOR(oStream.ReadText, "MyCursorName", 1028) lnRecords = RECCOUNT('MyCursorName') RELEASE oRecordSet RELEASE oConnection RELEASE oStream Dspl = " _Total Reccords:"+STR(lnRecords,9,0) ? Dspl <B>&& Dspl Give me 2 cause by blank records </B>Thanks