Hvorfor bliver fil-navnet ikke skrevet til DB
Jeg har lavet et upload komponent til min webside som er baseret på asp upload. Det virker også fint, filerne bliver lagt op på webhotellet, men prøver jeg at uploade større filer bliver de ikke skrevet til databasen. Kan det have noget at gøre med en timeout eller er der andre måder at gøre det på end nedenstående.<!--#INCLUDE file="Includes/DB.inc" -->
<%call opendb
Feltnavn = Request.Querystring("felt")
select case (Feltnavn)
case "gallery"
Set Upload = Server.CreateObject("Persits.Upload")
Upload.OverwriteFiles = False
Upload.Save(server.mappath("../Images/Gallery/Index/"))
For Each File in Upload.Files
mappe = upload.form("add_date")
dato = upload.form("add_date")
if dato = "" then dato = date
name1 = replace(upload.form("name"), "'", "'")
description1 = replace(upload.form("description"), "'", "'")
add_gallery= "INSERT INTO Gallery(name, description, dato, billede, opret) VALUES ('"&name1&"', '"&description1&"', '"&dato&"', '"&file.filename&"', '"&upload.form("author")&"')"
dbconn.Execute(add_gallery)
response.redirect "gallery.asp?Fejl=Galleriet er blevet tilføjet"
Next
case "gallery_update"
Set Upload = Server.CreateObject("Persits.Upload")
Upload.OverwriteFiles = False
Upload.Save(server.mappath("../Images/Gallery/Index/"))
if upload.form("THEFILE") = "" then
dato = upload.form("add_date")
if dato = "" then dato = date
name1 = replace(upload.form("name"), "'", "'")
description1 = replace(upload.form("description"), "'", "'")
update_gallery= "update gallery SET name = '"&name1&"', description = '"&description1&"', dato = '"&dato&"', opret = '"&upload.form("author")&"' where id = "&Request.QueryString("id")&" "
dbconn.Execute(update_gallery)
response.redirect "gallery.asp?Fejl=Galleriet er blevet opdateret"
else
For Each File in Upload.Files
mappe = upload.form("add_date")
dato = upload.form("add_date")
if dato = "" then dato = date
name1 = replace(upload.form("name"), "'", "'")
description1 = replace(upload.form("description"), "'", "'")
update_gallery= "update gallery SET name = '"&name1&"', description = '"&description1&"', dato = '"&dato&"', billede = '"&file.filename&"', opret = '"&upload.form("author")&"' where id = "&Request.QueryString("id")&" "
dbconn.Execute(update_gallery)
response.redirect "gallery.asp?Fejl=Galleriet er blevet tilføjet"
Next
end if
end select
call closedb()%>
