uploade bilder og tekst til database

Jeg får til å uploade bilde stien til databasen men jeg får ikke til tekstfeltene.
Kan noen hjelpe? Her er koden:

<%
    Dim objDict, rs, sql, str, allowedDir
str = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("../BK.mdb")
set rs = Server.createObject("ADODB.Connection")
    'Hent fil og evt. øvrige data 
    Set objDict = FileUpload(Null, 1000000, Null, Array("gif", "jpg", "jpeg"), Null, True, False)
    'Giv passende resultat
    If objDict("FILEUPLOAD_STATUS") = 0 Then
        'Giv en positiv besked
        'Response.Write "Filen <A HREF=""" & objDict("FILEUPLOAD_URL") & """>" & objDict("FILEUPLOAD_FILENAME") & "</A> er uploaded til mappen " & objDict("FILEUPLOAD_DIR") & "<BR>"
        'Response.Write "Det er en fil af typen " & objDict("FILEUPLOAD_CONTENTTYPE") & " og den fylder " & objDict("FILEUPLOAD_SIZE") & " bytes.<BR>"
rs.open str 
sql = "insert into [BK informasjon](title,notes,innhold,bilde) VALUES(' # & title & # ',' # & notes & # ',' & innhold & ','"&objDict("FILEUPLOAD_URL")&"')"
set rs = rs.execute(sql)
response.redirect("minside.asp")
    Else
        'Giv en negativ besked
response.write(objDict("strFileSpec"))
        Response.Write objDict("FILEUPLOAD_STATUSTXT") & " (Fejl nummer " & objDict("FILEUPLOAD_STATUS") & ")<BR><a href='submit.asp'>Prøv igen</a>"
    End If


%>