Kan nån säga varaför inga filer sparas i db med följande:

<%
Set Upload = Server.CreateObject("Persits.Upload")
' Capture files
Upload.SaveVirtual("/images/gallery")

' Obtain file object
Set File = Upload.Files("THEFILE")

If Not File Is Nothing Then
' Build ODBC connection string
Connect = "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/db/Inloggning.mdb")
laddaUpp="select * from tblUsers_Galleri"
' Use ADO Recordset object
Set rs = Server.CreateObject("adodb.recordset")

' Reopen recordset to insert file
rs.Open laddaUpp, Connect, 2, 3
rs.Addnew
rs("bild") = File.ExtractFileName
rs("tillhor") = Upload.Form("tillhor")
rs("alt") = Upload.Form("alt")
rs("inlagd") = Upload.Form("inlagd")
rs.Update

Response.Redirect "/aspUpload/?m=success"
Else
Response.Redirect "/aspUpload/?m=failed"
End If
%>