ciao a tutti,
ho letto le varie discussioni in merito all'argomento importazione dati da excel ad access, purtroppo mi sono state di poco aiuto. Ho quindi cercado di creare una procedura semplice per importare i dati che facesse al caso mio.

Questo è il codice che ho implementato:
<%
'apro la connessione al db dove importare i dati
Set DFCon = Server.CreateObject( "ADODB.Connection" )
DFCon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Persist Security Info=False; Data Source=" & Server.MapPath("mdb-database/db2.mdb")
DFCon.Open

'mi connetto al foglio excel
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Server.MapPath("/public/film2.xls") & "Extended Properties=""Excel 8.0;"""


'faccio la query al fooglio excel per leggere i dati
Set objRS = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * from [film]"
objRS.Open SQL, objConn
If Not objRS.EOF then 'se cis ono dati

While Not objRS.EOF

strTitoloItaliano = objRS("Titoloitaliano")
strTitoloOriginale = objRS("Titolooriginale")

'eseguo l'insert nella tabella del db
Set objRSInsert = Server.CreateObject("ADODB.Recordset")
strSQLInsert = "INSERT INTO tbl_film"
strSQLInsert = strSQLInsert & "( f_titolo_italiano,"
strSQLInsert = strSQLInsert & " f_titolo_originale"
strSQLInsert = strSQLInsert & ")"
strSQLInsert = strSQLInsert & " VALUES ( "
strSQLInsert = strSQLInsert & "'"& strTitoloItaliano&"',"
strSQLInsert = strSQLInsert & "'"& strTitoloOriginale &"' "
strSQLInsert = strSQLInsert & ")"

response.write strSQLInsert
' response.End()

objRSInsert.Open strSQLInsert, DFCon, 3, 3
Set objRSInsert = Nothing


objRS.MoveNext
Wend
Else
Response.Write("nessun record")
End IF
objRS.Close
Set objRS = Nothing
DFCon.Close
Set DFCon = Nothing
%>

quando eseguo la pagina ricevo questo errore:

Microsoft JET Database Engine error '80004005'

Not a valid file name.

/importa.asp, line 10

dove la riga 10 è questa:
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Server.MapPath("/public/film2.xls") & "Extended Properties=""Excel 8.0;"""

da cosa può dipendere?
vi ringrazio per l'aiuto
elisa