About connection from MS Access to SQL Server

When I create *.adp with Connection, I can see Tables and etc from
MS SQL Server in "DataBase Window".

But when I use:

Sub Connect()
Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection

strCnn = 'something'
cnn.Connection strCnn
...
End Sub

I have connection to MS SQL Server too. I can do this, for example:

Dim rst As Recordset
Dim txt As String
Set rst = cnn.Execute("SELECT * FROM Cars")
txt = rst!CarNumber
Debug.Print txt

But I can't see Tables and etc in "DataBases Window".
Why?


--
Best regards,
Dmitriy Boyko
mailto:dboyko@khakasnet.ru