6 svar · 336 visningar · startad av mikael_a
Hej, har ett formulär som användarna kan ladda upp bilder till servern, men jag får bara ett internt server fel (500) hela tiden...
formulär_era_bilder.asp ser ut så här:
<!--#include file="../status.inc"-->
<html>
<head>
<meta name="Author" content="Mikael Andersson (micke@micke-anna.nu)">
<meta name="robots" content="noindex, nofollow">
<TITLE>www.video-center.se</TITLE>
<LINK href="../micke.css" rel=STYLESHEET type=text/css>
</head>
<form ACTION="era_bilder_insert.asp" METHOD="POST" ENCTYPE="multipart/form-data">
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="1">
<tr>
<td width="50%" height="15"><font face="Verdana" size="1" color="#´000000"><br>
Ditt namn:</font></td>
<td width="50%" height="15"><font face="Verdana" size="1" color="#000000"><br>
E-mail adress:</font></td>
</tr>
<tr>
<td width="50%" height="25"><font face="Verdana" size="1">
<input type="text" name="namn" size="50" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000"></font></td>
<td width="50%" height="25"><font face="Verdana" size="1">
<input type="text" name="email" size="50" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000"></font></td>
</tr>
<tr>
<td width="50%" height="1"><font face="Verdana" size="1" color="#000000"><br>
Hemsida:
</font></td>
<td width="50%" height="1"><font face="Verdana" size="1" color="#000000"><br>
Stad:</font></td>
</tr>
<tr>
<td width="50%" height="25"><font face="Verdana" size="1">
<input type="text" name="hemsida" size="50" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000">
</font></td>
<td width="50%" height="25"><font face="Verdana" size="1">
<input type="text" name="stad" size="50" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000"></font></td>
</tr>
<tr>
<td width="50%" height="4"><font face="Verdana" size="1" color="#000000"><br>
Kattens namn:
</font></td>
<td width="50%" height="4"><font face="Verdana" size="1" color="#000000"><br>
Kattens ålder
</font></td>
</tr>
<tr>
<td width="50%" height="25"><font face="Verdana" size="1" color="#000000">
<input name="katt_namn" size="50" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000">
</font></td>
<td width="50%" height="25"><font face="Verdana" size="1" color="#000000">
<input name="alder" size="50" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000">
</font></td>
</tr>
<tr>
<td width="50%" height="1"><font face="Verdana" size="1" color="#000000"><br>
Får andra ladda hem din bild ja/nej?
</font></td>
</tr>
<tr>
<td width="50%" height="25"><font face="Verdana" size="1" color="#000000">
<input name="ja_nej" size="50" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000">
</font></td>
</tr>
<td width="50%" height="25"></td>
</tr>
<tr>
<td width="50%" height="2"><font face="Verdana" size="1" color="#000000"><br>
Välj
bild:
</font>
</td>
<td width="50%" height="2"><font face="Verdana" size="1" color="#000000"><br>
Övrigt:</font></td>
</tr>
<tr>
<td width="50%" height="25" valign="top"><font face="Verdana" size="1" color="#FFFFFF"><input type="File" name="theFile" size="36" style="font-family: Verdana; font-size: 10px; background: #ffffff; color:#000000; border-style: solid; border-color:#000000><input type="name="B2" button">
</font>
</td>
<td width="50%" height="25"><p><textarea
rows="4" name="ovrigt" cols="40"></textarea></p>
</td>
</tr>
<tr>
<td width="50%" height="25"><font face="Verdana" size="1" color="#FFFFFF">
<input type="submit" value="Skicka"></font>
<input type="reset" value="Börja om"></td>
<td width="50%" height="25"></td>
</tr>
</table>
<p><font face="Verdana" size="1" color="#000000"><--
<a href="fotogalleriet.asp">
Tillbaks till fotogalleriet</a></font></td>
</body>
och era_bilder_insert.asp ser ut så här:
<%
'=========================================================================
' skapar objekt för komponenten AspUpload
'=========================================================================
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.Save("/clients/micke-anna.nu/wwwroot/images/kattsidan/era_bilder")
'=========================================================================
' skapar objekt för filen som har laddats upp
'=========================================================================
Set File = Upload.Files(1)
'=========================================================================
' gif eller jpg bild samt storleken på filen.
' hämtar data från forumuläret som innehåller beskrivningen av filen.
'=========================================================================
filtyp = File.ImageType
filstorlek = File.Size
ovrigt = upload.Form("ovrigt")
namn = upload.Form("namn")
stad = upload.Form("stad")
katt_namn = upload.Form("katt_namn")
alder = upload.Form("alder")
hemsida = upload.Form("hemsida")
email = upload.Form("email")
ja_nej = upload.Form("ja_nej")
'=========================================================================
' kontrollera så att den uppladdade filen verkligen är av filtypen
' gif eller jpeg.
'=========================================================================
If File.ImageType <> "GIF" and File.ImageType <> "JPG" Then
Response.Write "Filen måste vara av typen JPEG eller GIF"
else
'=========================================================================
' öppnar koppling till databasen
'=========================================================================
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("/databas/fotogalleri.mdb")
'=========================================================================
' beskrivningen och storleken till bilden.
'=========================================================================
SQLStmt = "Insert into fotogalleri "
SQLStmt = SQLStmt & " (ovrigt, storlek, namn, stad, katt_namn, alder, hemsida, email, ja_nej)"
SQLStmt = SQLStmt & " Values('" & ovrigt & "', " & filstorlek & ", '" & namn & "', '" & stad & "', '" & katt_namn & "', '" & alder & "', '" & hemsida & "', '" & email & "', '" & ja_nej & "')"
Connection.Execute(SQLStmt)
SET SQLStmt = Nothing
'=========================================================================
' plockar ut Id-numret för senaste införandet i databasen och
' spara det i variablen "senasteid"
'=========================================================================
SQLStmt = "Select Max(Id) as senasteid from fotogalleri"
SET RS = Connection.Execute(SQLStmt)
senasteid = RS("senasteid")
RS.Close
SET SQLStmt = Nothing
'=========================================================================
' skapar ett nytt unikt filnamn som består av id-nummer och
' filändelse som beror på vilken typ av fil det är.
'=========================================================================
If file.ImageType = "GIF" Then
Extension = "gif"
elseif file.ImageType = "JPG" Then
Extension = "jpg"
End If
filnamn = "bild" & senasteid & "." & Extension
For Each File in Upload.Files
File.Copy "/clients/micke-anna.nu/wwwroot/images/kattsidan/era_bilder/bild" & senasteid & "." & Extension
File.Delete
Next
'=========================================================================
' Uppdatera databasen och för in det nya namnet på filen.
'=========================================================================
SQLStmt = "Update fotogalleri "
SQLStmt = SQLStmt & " SET Filnamn = '" & Filnamn & "'"
SQLStmt = SQLStmt & " Where Id = " & senasteid
Connection.Execute(SQLStmt)
SET SQLStmt = Nothing
'=========================================================================
' Stänger uppkopplingen.
'=========================================================================
Connection.Close
End If
%>
<html>
<head>
<meta name="Author" content="Mikael Andersson (micke@micke-anna.nu)">
<meta name="robots" content="noindex, nofollow">
<title>[:: Micke & Annas @Internet Start ::]</title>
<link REL="StyleSheet" HREF="../micke.css" TYPE="text/css">
<script language="JavaScript">
<!--
// JavaScript: popup, micke.
// Av: Mikael Andersson, BuZz WebDesign
// [url="http://www.micke-anna.nu"]http://www.micke-anna.nu[/url]
// © 2000 Mikael Andersson
function micke() {
window.status='[:: Micke & Annas @Internet Start ::]';
return true;
}
// -->
</script>
</head>
<body onload="micke()">
<p align="center"><font color="#000000">Bilden är inlagd i databasen!</font></p>
<p> </p>
<p><font face="Verdana" size="1" color="#000000"><-- <a href="fotogalleriet.asp">
Tillbaka till fotogalleriet</a></font></p>
<p align="center"><font color="#008000">Copyright © Mikael Andersson, BuZz
WebDesign 1999 - 2000, Med ensamrätt</font></p>
</body>
</html>
någon som ser felet?
------------------
Micke & Annas Sajt
micke@micke-anna.nu
Vilken sida är det som genererar felet?
Testa att byta ut:
<!--#include file="../status.inc"-->
Mot:
<!--#include file="..\status.inc"-->
om det är formulärssidan...
------------------
PC-älskare prasslar i säven, och har malt i ryggen
www.webeye.nu
Har du gjort lumpen?
status bara kollar om användaren har rättigheter, kan det vara det som spökar?
------------------
Micke & Annas Sajt
micke@micke-anna.nu
Testade du det Vide skrev?
Ja det kan nog annars vara det som spökar, alltså du måste ju vara inloggad, antar jag, för att komma åt sidan.
Ta bara bort den raden en gång och testa, se vad som händer.
Andreas
har både ändrat den, och tagit bort raden, men jag får samma fel...
det fungerar kanon på localhost, men inte på webservern, och de stödjer AspUpload. får kanske skriva en rad till supporten.
------------------
Micke & Annas Sajt
micke@micke-anna.nu
Har du set till att katalogen images/kattsidan/era_bilder har läs och skrivrättigheter?
Annars kan det vara så att det är ett internt serverfel som du inte kan påverka. Bilderna som skickas upp till servern brukar hamna i en temp katalog, och sedan kopieras till "din" katalog. Kan mycket väl vara så att det är problem där.
/T
------------------
public static void main()
enligt supporten idag, så skulle jag byta ut save mot virtual save...
menar de Upload.Save att den skall bytas ut mot Upload.Save.virtual ??
eller är jag ute och reser?
------------------
Micke & Annas Sajt
micke@micke-anna.nu
