---

Hvad er der g alt med følgende script?

Det kører under VBA til Access men ved linien Postsæt.Open melder programmet
følgende fejl:
http://www.i4.auc.dk/~rhpe00/error.jpg

Hvad kan fejlen skyldes?

Sub Udvaelgelse()
Dim T1 As Long
Dim Forbindelse As New ADODB.Connection
Dim Katalog As New ADOX.Catalog
Dim Postsæt As New ADODB.Recordset
Dim Felt As Field
Forbindelse.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Temp\" & _
"Logdata.mdb"
Set Katalog.ActiveConnection = Forbindelse
Postsæt.Open "join", Katalog.ActiveConnection, _
adOpenDynamic, adLockOptimistic
Postsæt.Fields.Refresh

På forhånd tak.