Cacher is the code snippet organizer for pro developers

DB <- odbcConnect("R_2",uid="xxx",pwd="xxx")
sqlTables(DB)
ndata <- sqlQuery( DB, "SELECT *  FROM DDD where CountrySeg='2'", as.is=TRUE)