Displaying 1 result from an estimated 1 matches for "currentdb".
Did you mean:
currentbb
2009 Apr 30
1
odbcConnectAccess function
...long with R(D)COM. Something like this:
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Dim myApp As StatConnector
Set myApp = New StatConnector
myApp.GetErrorText
myApp.Init "R"
myApp.EvaluateNoReturn "library(RODBC)"
myApp.EvaluateNoReturn "myDB <- odbcConnectAccess(CurrentDb)"
'query the database and save it as R object 'a'
myApp.EvaluateNoReturn "a <- sqlQuery(CurrentDb, Paste(""select * From Sample""))"
myApp.EvaluateNoReturn "plot(a)"
Thanks in advance
Felipe D. Carrillo
Supervisory Fishery Biologist...