Alguém sabe q erro é esse? Erro Invalid use of New Keyword

Tenho que fazer alguma reférencia?

 

Private Sub Form_Load()
    Set conndyn = New Connection ' da a mensagem de erro nesta linha
    conndyn.Open "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;User ID=Admin;Data Source=" & App.Path & "orders.mdb;Mode=Share Deny None;Extended Properties=';COUNTRY=0;CP=1252;LANGID=0x0409';Jet OLEDB:System database='';Jet OLEDB:Registry Path='';Jet OLEDB:Database Password='';Jet OLEDB:Global Partial Bulk Ops=2"
End Sub

Uso inválido da palavra-chave New

tenta assim:

 

Set conndyn = New ADODB.Connection

 

Se não der certo veja se nas referências do seu projeto ("menu Project...References") está marcado a biblioteca do ADODB (Microsoft ActiveX Data Objects 2.XX Library

 

at+