Trying to connect to server database instead of access database was using this code

[DevintheDude]

NOTE: FOR SOME REASON WHEN I TRY
DIM CONN AS NEW ADODB.CONNECTION
ADODB IS NOT AVAILBLE TO ME AS AN OBJECT WHY IS THAT?


dbdir = getdir(ActiveWorkbook)
partsdb = dbdir & "Product_PriceDB"
set dbspartslist = OpenDatabase(partsdb, , true)
set rstTemp = dbspartslist.OpenRecordset("CommonAssemblyname",dbOpenTable)
with rstTemp

//do something

end with


HOW DO I CONVERT THIS TO ACCESS THE SAME DATABASE JUST ON SQL SERVER?

 

[RoryA]

You need to set a reference to the Microsoft ActiveX Data Objects 2.n library (the n will be a number depending on which version is installed on your machine)

 

[DevintheDude]

Hey thanks that works. I found it a couple of them.