Der findes ikke et "OverWriteFiles" kald på SmartUpload.
Men her er den kode jeg er kommet frem til:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled</title>
</head>
<body>
<%
dim navn2, kategori2, beskrivelse2, mySmartUpload, fil2
if Request.querystring("mode") = "upload" then
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.Upload
set fil2 = mySmartUpload.files("fil2")
fil2 = fil2.filename
navn2 = replace(mySmartUpload.Form("navn2"),"'","")
kategori2 = replace(mySmartUpload.form("kategori2"),"'","")
beskrivelse2 = replace(mySmartUpload.form("beskrivelse2"),"'","")
if navn2 = "" then
response.write " Du mangler at oplyse et navn2 "
elseif beskrivelse2 = "" then
response.write " Du mangler at skrive en beskrivelse2 "
elseif kategori2 = "" then
response.write " Du mangler at en kategori2 "
elseif fil2 = "" then
response.write " Der er intet billede til projektet2 "
else
mySmartUpload.Save(".")
conn.execute("Insert into projekter (navn,screendumb,kategori,beskrivelse) values('"&navn2&"','"&fil2&"','"&kategori2&"','"&beskrivelse2&"'")
response.redirect("admin.asp?side=adminindhold&kate=addkorrekt")
end if
end if %>
<form name="myForm" method="post" enctype="multipart/form-data" action="<%= scriptname %>?mode=upload">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td>Fil</td>
<td><input type="File" name="fil2"></td>
</tr>
<tr>
<td>Navn</td>
<td><input type="Text" name="navn2" value=""></td>
</tr>
<tr>
<td>Kategori</td>
<td><input type="Text" name="kategori2" value=""></td>
</tr>
<tr>
<td>Beskrivelse</td>
<td><input type="Text" name="beskrivelse2" value=""></td>
</tr>
<tr>
<td><input type="Submit" value="Gem"></td>
</tr>
</table>
</form>
</body>
</html>
