Skrive uploadet billede til database

Hej eksperter

Jeg har et formentlig meget simpelt spg., men det driller bare :-). Jeg bruger nedenstående kode for at få uploadet et billede, hvilket også virker helt fint. Derudover ønsker jeg at få det tilføjet i databasen, at en bruger har uploadet et billede. Den skriver fint nok til databasen, men kan bare ikke få den til at skrive billedets filnavn!

<%function resize(sti,navn,nyX)
    Set objImg = Server.CreateObject("AspImage.Image")
        objImg.PadSize = 0
        objImg.LoadImage Server.MapPath(sti & navn)
        objImg.GetImageFileSize Server.MapPath(sti & navn), X, Y
   
        ResizedX = nyX
        objImg.MaxX = X
        objImg.MaxY = Y
   
        if X > ResizedX then
            ResizedY = (ResizedX / objImg.MaxX) * objImg.MaxY
            objImg.ResizeR ResizedX, ResizedY
            objImg.FileName = (Server.MapPath(sti & navn))
            objImg.SaveImage
        end if
   
    Set objImg = Nothing
end function

If Request("s") = "upload" Then

  Dim mySmartUpload
  Dim file1
  Dim intCount
  intCount=0

  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

  mySmartUpload.Upload

  For each file1 In mySmartUpload.Files

      If not file1.IsMissing Then
       
        file1.SaveAs("/koncept/upload/" & Session("Bruger") & "/" & file1.FileName)

        Response.Write("FileName = " & file1.FileName & "<br>")
        call resize("/koncept/upload/" & Session("Bruger") & "/",file1.FileName,300)
        Response.Write("<img src=""/koncept/upload/" & Session("Bruger") & "/" & file1.FileName & """ title=""Dit billede er nu uploadet""><br>")
        intCount = intCount + 1
      End If
  Next

 
Bruger = Session("Bruger")
Billede = " & file1.FileName & "

SQL = "INSERT INTO Upload(Bruger, Billede)"
SQL = SQL & "Values("
    SQL = SQL & "'" & Bruger & "',"
    SQL = SQL & "'" & Billede & "'"
    SQL = SQL & ")"
   
    Set RS = conn.execute(SQL)
   
Response.Write(intCount & " file(s) uploaded.<BR>")

Else
%>

Hvordan skal Billede = " & file1.FileName & " rettes (har prøvet med mange varianter)?

På forhånd tak.