Upload af billede + tekst til database

Hejsa eksperter

Jeg har forgæves forsøgt at kombinere to scripts, der skal gøre det muligt at uploade et billede til et dir, samtidig med at nogle oplysninger gemmes i en database. Det skal bruges til et nyhedssystem. De to scripts virker fint hver for sig, men når jeg koder dem sammen får jeg problemet, at uploadfunktionen slet ikke virker - den skriver altså kun til databasen.

Her er det vigtigste af koden:

if request.form("list1") = "ja" then

    Set Upload = Server.CreateObject("Persits.Upload.1")
   
    Upload.OverWritefiles = false
    Upload.SetMaxSize 10000000, True
    Count = Upload.SaveServer.MapPath("db")

Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/1test.mdb") & ";UID=admin;PWD=;"

    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "Select * From News"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

          rs.AddNew
          rs("forfatter") = Request.form("forfatter")
          rs("Email") = Request.form("email")
          rs("Nyhed") = Request.form("langtekst")
    rs("overskrift") = Request.form("overskrift")
    rs("Dato") = date()
        rs.Update

    rs.Close
    Set rs = Nothing

Conn.Close
set Conn = Nothing


else

Håber der er en eller flere der kan hjælpe.
På forhånd tak
Stefold