Microsoft Access

Zadatak: U postojeći MS Access fajl (db_03.accdb), iz primjera importa, eksportovati nove generisane podatke iz data framea db.n.

> #importovati RODBC paket
> library(RODBC)
> #uspostaviti ODBC konekciju
> odbc.con <- odbcConnectAccess2007(access.file = "db_03.accdb")
> #prikazati vec postojece podatke iz baze
> sqlQuery(channel = odbc.con, query = "SELECT * FROM Tabela1")
  ID  x y z
1  1  2 5 a
2  2  4 4 b
3  3  6 3 c
4  4  8 2 d
5  5 10 1 e
> #generisati novi data frame za eksport u postojecu tabelu
> db.n <- data.frame(ID = 6, x = 100, y = 200, z = "aa")
> #dodati podatke iz db.n data framea u postojecu tabelu
> sqlSave(odbc.con, 
+   dat = db.n, 
+   tablename = "Tabela1", 
+   append = TRUE, 
+   rownames = FALSE)
> #provjeriti da li su podaci eksportovani
> sqlQuery(channel = odbc.con, query = "SELECT * FROM Tabela1")
  ID   x   y  z
1  1   2   5  a
2  2   4   4  b
3  3   6   3  c
4  4   8   2  d
5  5  10   1  e
6  6 100 200 aa
> #zatvoriti ODBC konekciju
> odbcClose(channel = odbc.con)

Napomena: Ista R funkcija sqlSave može se koristiti i za eksport novih podataka u postojeće baze putem ODBC konekcije. Dodatno, standardna SQL komanda INSERT INTO takođe se može koristi kao argument R funkcije sqlQuery na isti način kao sto je prikazano.

Više detalja o ODBC konekcijama prikazano je u ovom primjeru.