ASP Upload fejl

'"&File&"'

Du har ikke nogen variabel der hedder file men derimod et object - skal du bruge noget fra ojectet skal du bruge en af de tilhørende attributter fx;

'"&File.FileName&"'

Så får jeg denne her fejl:

Der opstod en Microsoft VBScript-kørselsfejl (0x800A005B)
Objektvariablen er ikke angivet
Projekter/Fanoborger/www/Admin/update.asp, line 12

så er det sikkert den anden variabel - Upload.Files("bg_color") - er bg_color et formfelt eller?

prøv med

'"&Upload.Form("bg_color")&"'

OK det hjalp men hvorfor fungere det her så ikke. Du skal nok få dine point.

<%
Set Upload = Server.CreateObject("Persits.Upload")
Upload.Save(server.mappath("../../files/files/fbc/"))

call opendb()
    Call opentbl("SELECT * FROM layout", layout)

if Upload.Form("THEFILE") = "" then
    Set File = layout("logo")
else
    Set File = Upload.Files("THEFILE")
end if

          update_layout= "update Layout SET bg_color = '"&Upload.Form("bg_color")&"', logo = '"&File.Filename&"', font = '"&Upload.Form("font")&"', sizes = '"&Upload.Form("size")&"', font_color = '"&Upload.Form("font_color")&"', link_color = '"&Upload.Form("link_color")&"', hover_color = '"&Upload.Form("hover_color")&"', menu_color = '"&Upload.Form("menu_color")&"', bredde = '"&Upload.Form("bredde")&"', menu_bredde = '"&Upload.Form("menu_bredde")&"' "
            dbconn.Execute(update_layout)       
        Response.redirect("default.asp?message=Layoutet er blevet opdateret")   
       

call closedb()

%>

Fejlen ligger i File.Filename men hvordan får jeg den til at være den samme værdi?

ikke helt forstået?

hvis du updater og "thefile" er "" så kan du jo lige så godt lade være med at update den kolonne

Jeg har en masse felter der skal opdateres. Her i mellem er der et logo der kun skal opdateres hvis hvis feltet er tomt.

ja, men så nøjs med at opdatere feltet hvis der er et billede med

if Upload.Form("THEFILE") <> "" then
  Set File = Upload.Files("THEFILE")
  PICQUERY = ", logo = '" & File.Filename & "'"
end if

update_layout= "update Layout SET bg_color = '"&Upload.Form("bg_color")&"' " & PICQUERY  & ", font = '"&Upload.Form("font")&"', sizes = '"&Upload.Form("size")&"', font_color = '"&Upload.Form("font_color")&"', link_color = '"&Upload.Form("link_color")&"', hover_color = '"&Upload.Form("hover_color")&"', menu_color = '"&Upload.Form("menu_color")&"', bredde = '"&Upload.Form("bredde")&"', menu_bredde = '"&Upload.Form("menu_bredde")&"' "