Ciao a tutti!!

Girando qui sul forum ho trovato questo codice per importare un file txt/csv in un db access.
<%
file = server.mapPath("prova.txt")
set fso = server.createObject("scripting.fileSystemObject")
if fso.fileExists(file) then
set file = fso.openTextFile(file)
i = 1
while not file.atEndOfStream
if i > 1 then
tempLine = file.readLine
tempLine = replace(tempLine,"""","")
elTempLine = split(tempLine,",")
conn.execute("INSERT INTO prova (campo1, campo2, campo3, campo4, campo5) VALUES('" & tempLine(0) & "', '" & tempLine(1) & "', '" & tempLine(2) & "', '" & tempLine(3) & "', '" & tempLine(4) & "')")
end if
i = i + 1
wend

set file = nothing
end if
set fso = nothing
%>
Ho provato piu’ volte ma continua a darmi questo errore:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'tempLine'
/public/import.asp, line 13

il file txt è di questo tipo:
"1","2","3","4","5"
"6","7","8","8","10"

non riesco a trovare l’errore…. :master:
Qualche consiglio?

Grazie a tutti