Ciao a tutti

ho bisogno di caricare in un database mdb dei dati contenuti in un file csv

i dati presenti nel csv li riesco a leggere con questo codice http://www.aspitalia.com/liste/usag/script.aspx?ID=515

ma quando tento ti aprire la connessione all'mdb mi dà errore


in sintesi le operazioni che cerco di di compiere sono queste:

mi connetto al csv
con un loop leggo i dati
mi connetto all'mdb
con un loop inserisco i dati
chiudo la connessione all'mdb
chiudo la connessione al scv

**********************************CODICE********************************

strConnCSV = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\mdb-database\csv\") & ";Extended Properties=""text;HDR=Yes;FMT=Delimited"""
set connCSV = Server.CreateObject("ADODB.Connection")
connCSV.Open strConnCSV
strsqlCSV = "SELECT * FROM lista.csv"
set rsCSV = Server.CreateObject("ADODB.Recordset")
rsCSV.Open strsqlCSV, connCSV, 1, 2
totalrec = rsCSV.recordcount

do while Not rsCSV.eof
add_email = rsCSV("email")

strConnMDB ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("/mdb-database/mailing_list.mdb") & ";"
set connMDB = Server.CreateObject("ADODB.Connection")
strsqlMDB = "SELECT * FROM [tblMailingList] WHERE 0 = 1"
Set rsMDB = Server.CreateObject("ADODB.Recordset")
rsMDB.Open strsqlMDB, connMDB, 1, 2

do while Not rsMDB.eof
rsMDB.AddNew
rsMDB("Email") = add_email
rsMDB.Update
rsMDB.movenext
loop

rsMDB.Close
set rsMDB = Nothing
connMDB.Close
set connMDB = Nothing

rsCSV.movenext
loop

rsCSV.Close
set rsCSV = Nothing
connCSV.Close
set connCSV = Nothing

******************** FINE CODICE**************************

Se questo metodo non è corretto, come posso fare sto benedetto passaggio di dati da un db all'altro?

mi dice che non può portare a termine questa operazione in questo conesto

riferito alla riga in cui eseguo la connessione
rsMDB.Open strsqlMDB, connMDB, 1, 2

ma lasciando stare il codice che ho inserito io..... conoscete voi un modo che mi permette di fare sto passaggio??