Upload af foto - hvordan angives en default fil?
HejJeg har lidt problemer med en side hvor jeg uploader op til 4 foto til min database. Lidt forklaring til hvordan mine sider fungerer.
Side 1 - her vælger brugeren op til fire fotos ved hjælp af file felter.
Side 2 - her gemmes filerne i foto mappen + filnavnene gemmes i databsen i de tilhørende felter.
Mit problem er nu at hvis brugeren vælger f.eks. foto1, foto2 og foto4 så bliver foto4 gemt som foto 3 i databasen - jeg vil så gerne have det lavet sådan at hvis et felt er tomt (i dette eksempel foto3) så skal der i databsen i stedet gemmes et bestemt filnavn (f.eks. intet_foto1.jpg) i det felt i databasen som hører til det foto hvor der ikke blev valgt en fil.
Her er min kode til side 1
::::SIDE 1::::
<% Option Explicit %>
<HTML>
<HEAD>
<TITLE>Tilføj foto</TITLE>
<Link Rel="stylesheet" href="datronic.css" Type="text/css" >
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><style type="text/css">
<!--
body {
margin-left: 4px;
margin-top: 0px;
}
.style1 {color: #FFFFFF}
-->
</style></HEAD>
<BODY>
<br>
<table width="670" border="0" align="left"><!--Hovedtabel start-->
<tr>
<td height="18" valign="middle" bgcolor="#545DB9"><span class="style1">Tilføj foto til nyoprettet vare</span></td>
</tr>
<tr><td><br>
Det er vigtigt at du tilføjer foto1, foto2 og foto3 da der ellers på varesiderne i NetButikken vil blive vist et billede med teksten 'foto på vej'.<br>
<hr></td>
</tr>
<tr><td>
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="UploadScript1.asp?vareID=<%= request.querystring("vareID") %>">
<table border=0 cellspacing=0 cellpadding=0 width="655" align=left><!--Indholdstabelstart-->
<tr>
<td valign="top">Foto 1 (oversigt):<br>
Bredde 150px<br>
Højde 100px<br></td>
<td><INPUT TYPE=FILE SIZE=30 NAME="navn1"><BR><br><br></td>
</tr>
<tr>
<td colspan="2" valign="top"><hr></td>
</tr>
<tr>
<td valign="top">Foto 2 (vare specifikation):<br>
Bredde 200px<br>
Højde 100px<br></td>
<td><INPUT TYPE=FILE SIZE=30 NAME="navn2"><BR><br><br></td>
</tr>
<tr>
<td colspan="2" valign="top"><hr></td>
</tr>
<tr>
<td valign="top">Foto 3 (vare specifikation):<br>
Bredde 200px<br>
Højde 100px<br></td>
<td><INPUT TYPE=FILE SIZE=30 NAME="navn3"><BR><br><br></td>
</tr>
<tr>
<td colspan="2" valign="top"><hr></td>
</tr>
<tr>
<td valign="top">Foto 4 (tilbud/reklame):<br>
Bredde 210px<br>
Højde 60px<br></td>
<td><INPUT TYPE=FILE SIZE=30 NAME="navn4"><BR><br><br></td>
</tr>
<tr>
<td colspan="2"><hr></td>
</tr>
<tr><td colspan="2"><div align="center">
<input type=SUBMIT value="Tilføj Billeder">
<input type="button" name="Button" value="Gå til forsiden uden upload af foto " onClick="java script:location.href='adm_forside.htm'">
</div></td>
</tr>
</table>
</FORM>
</td></tr></table>
</BODY>
</HTML>
::::SIDE 1 SLUT::::
Min kode til side 2
::::SIDE 2::::
<HTML>
<BODY>
HEJ
<%
'linie til at tjekke om vareid kommer med over fra siden hvor varen blev oprettet
'response.write request.querystring("vareID")
%>
<%
dim vsti,sti2,mappe
vsti=request.servervariables("PATH_INFO")
sti2 =server.mappath(vsti)
mappe = left(sti2, len(sti2)-len("uploadscript1.asp") )
mappe= mappe & "/datronic/shop_admin_test/test/foto"
%>
<%
dim sti
sti = "/datronic/shop_admin_test/test/foto"
dim upload
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
Upload.SaveVirtual(sti)
'for each file in upload.files
'navn = ("foto/") & File.ExtractFileName
set cn = server.createobject("adodb.connection")
cn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("shop1.mdb")
intVareID = request.querystring("vareID")
sql = "update vare set "
i = 1
for each file in upload.files
navn = ("foto/") & File.ExtractFileName
select case i
case 4
sql = sql & " FotoTilbud='" & navn & "',"
case else
sql = sql & " foto" & i & "='" & navn & "',"
end select
i = i + 1
next
sql = left(sql, len(sql)-1) & " WHERE vareid=" & intVareId
'response.write(sql)
cn.execute(sql)
cn.close
set cn = nothing
'next
response.redirect("opdateret_ok.htm")
%>
</BODY>
</HTML>
::::SIDE 2 SLUT::::
Håber der er nogen der kan hjælpe mig, selom mit problem er lidt indviklet!
/Annette
