Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Shaft<- "S001"
- BL <- sqlQuery(myDBcon, paste("SELECT * FROM BL_FGSL WHERE Shaft_ID ='",Shaft,"'"), error = TRUE, as.is = TRUE)
- library(RODBC)
- library(RODBCext)
- Shaft<- "S001"
- BL <-
- sqlExecute(myDBcon,
- query = "SELECT * FROM BL_FGSL WHERE Valid = TRUE AND Shaft_ID = ?",
- data = list(Shaft_ID = Shaft),
- fetch = TRUE,
- stringsAsFactors = FALSE,
- error = TRUE)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement