ADO to Link SQL Server Table

[jo15765]

What would ADO code be to link a SQL server table into my access database?

[jo15765]

*BUMP* --- anyone know if/how this is achievable?

[jonh]

http://www.access-programmers.co.uk/forums/showthread.php?t=156294

If you just want to read data


Private Sub Command0_Click()
Const MYDB = "MY_SQL_DATABASE"
Const MYTBL = "MY_SQL_TABLE"

Dim conn As New ADODB.Connection
conn.Open "DSN=" & MYDB & ";database=" & MYDB & ";Trusted_Connection=Yes;"

With New ADODB.Recordset
Set .ActiveConnection = conn
.Source = "SELECT * FROM " & MYTBL
.Open
Debug.Print .RecordCount
.Close
End With
conn.Close
End Sub