Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- db <- with(connectionDb, dbConnect(MySQL(),
- user = user,
- password= password,
- dbname = dbname,
- host = host))
- # connectionDb returns user, password, dbname, host from our credential file.
- dbSendQuery(conn = db, 'set character set "utf8"')
- cond <- paste('SELECT * FROM myTable
- WHERE organisation LIKE "Ikea"
- AND dateA >= "2018-05-01" AND dateA < "2018-06-01"')
- export <- dbGetQuery(conn = db, statement = cond)
- organisation Order_ID dateA dateB dateC dateD
- Ikea a 2018-04-01 2018-05-07 2018-05-09 2018-05-01
- Ikea a 2018-06-01 2018-05-03 2018-05-29 NA
- Ikea a 2018-04-02 2018-05-01 2018-07-08 2018-05-26
- Ikea b 2018-06-02 2018-05-01 NA 2018-05-26
- Ikea b 2018-06-02 2018-05-01 NA 2018-05-26
- Ikea b NA 2018-05-05 2018-08-02 2018-06-01
- Ikea c 2018-06-01 2018-05-07 2018-05-09 2018-05-01
- Ikea c 2018-06-01 2018-05-03 NA NA
- Ikea c 2018-08-02 2018-05-09 2018-07-08 2018-05-26
- organisation Order_ID dateA dateB dateC dateD Billed
- Ikea a 2018-04-01 2018-05-07 2018-05-09 2018-05-01 0
- Ikea a 2018-06-01 2018-05-03 2018-05-29 NA 1
- Ikea a 2018-04-02 2018-05-01 2018-07-08 2018-05-26 1
- Ikea b 2018-06-02 2018-05-01 NA 2018-05-26 0
- Ikea b 2018-06-02 2018-05-01 NA 2018-05-26 1
- Ikea b NA 2018-05-05 2018-08-02 2018-06-01 0
- Ikea c 2018-06-01 2018-05-07 2018-05-09 2018-05-01 1
- Ikea c 2018-06-01 2018-05-03 NA NA 1
- Ikea c 2018-08-02 2018-05-09 2018-07-08 2018-05-26 0
Add Comment
Please, Sign In to add comment