# NOT RUN {
showClass("RequeteODBCwhere")
# }
# NOT RUN {
test<-0
object=new("RequeteODBCwhere")
object@baseODBC=c("myodbcconnection","myusername","mypassword")
object@select= "select * from mytable limit 100"
# assuming mycol, mycol1 and mycol2 are numeric
object@where=paste(" where mycol>",test,sep="")
object@and=paste(" and mycol2>",test," and mycol3<",test,sep="")
object@order_by=" order by mycol1"
object<-connect(object)
## now object@sql contains the syntax of the query.
## By changing the test variable, one can see how the
## function might be usefull
## object@query contains the resulting data.frame
# }
Run the code above in your browser using DataCamp Workspace