Errore non specificato

[Giupin]

Salve a tutti, ho questo errore in una pagina asp:
"Provider (0x80004005) Errore non specificato."
alla riga "MyConn.Open strConn"

... vorrei capire cosa c'è di anomalo in questo codice

Function ricerca_cittadini()
Dim dataricerca, strSql, MyConn
dataricerca = Request.QueryString("data")
anno = Year(CStr(FormatDateTime(dataricerca)))
nometabella = "AnagCittadini" & anno
strSql = "SELECT Nascite.idcomune AS comunenascita, Indirizzi.idvia, " & nometabella & ".idcomune AS comuneresidenza, " & nometabella & ".idnazione FROM Indirizzi INNER JOIN (" & nometabella & " INNER JOIN Nascite ON " & nometabella & ".idnascita = Nascite.idnascita) ON Indirizzi.idindirizzo = " & nometabella & ".idindirizzo WHERE (((Nascite.datanascita)=#" & dataricerca & "#) AND ((" & nometabella & ".flaganag)=True))"

Set MyConn = openConnection()
...
End Function

Function openConnection()
Dim strConn, MyConn
Set MyConn = Server.CreateObject("ADODB.Connection")
strConn = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & _ Server.MapPath("\abcmediacomuni\db\dbcomune.mdb")
If MyConn.State <> adStateOpen then
MyConn.Open strConn
End If
Set openConnection = MyConn
End Function

..grazie