Experts Exchange connects you with the people and services you need so you can get back to work.
Dim obConnection As New ADODB.Connection
Dim obRecordset As New ADODB.Recordset
Dim obCommand As New ADODB.Command
obConnection.Provider = "sas.LocalProvider"
obConnection.Properties("Data Source") = "c:\SASData"
obRecordset.Open "formats", obConnection, adOpenStatic, adLockReadOnly, adCmdTableDirect
For i = 0 To obRecordset.Fields.Count - 1
ActiveCell.Offset(0, i).Value = obRecordset.Fields(i).Name
Set obRecordset = Nothing
Set obConnection = Nothing
Open in new window
At Springboard, we know how to get you a job in data science. With Springboard’s Data Science Career Track, you’ll master data science with a curriculum built by industry experts. You’ll work on real projects, and get 1-on-1 mentorship from a data scientist.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.
Premium members get this course for $151.20.
Premium members get this course for $389.00.
Premium members get this course for $159.20.
Premium members get this course for $49.99.
Premium members get this course for $25.00.
Premium members get this course for $62.50.
Premium members get this course for $122.40.