Changed print message: use as.db.data.frame to realize db.Rquery