Avatar billede oleodder Nybegynder
20. januar 2003 - 22:35 Der er 9 kommentarer og
1 løsning

Tilføje sletteknap på billede-upload-side !!

Hej Alle

På min hjemmeside har jeg en side hvor jeg kan uploade billeder online. Det fungerer fint.
Endvidere kan jeg også se alle billederne i en lille kopi, og hvis jeg trykker på filnavnet, ser jeg billedet i dets oprindelige størrelse.
Filen er vedlagt herunder.

Det jeg ønsker og som jeg ikke kan finde ud af, er:
At få tilføjet en sletteknap ud for hvert billede, således at det også er muligt på billedeoversigten, at slette billeder, jeg ikke bruger mere.

Er der nogen der kan hjælpe ??

Mange tak - Koden på min billedeoversigtfil er herunder:

- Tak

<html>
<head>
  <title>Thumbnail generator</title>
<link href="../../style.css" rel="STYLESHEET" TYPE="text/css">

<style type="text/css">
BODY{
background-image : URL(../../images/vandmaerke.jpg);
background-repeat : repeat-y;
background-attachment : fixed;
}</style>

</head>
<body>

<%
thumbwidth = "100"

Set fs = Server.CreateObject( "Scripting.FileSystemObject" )

Set myFolder = fs.GetFolder( "d:\www2\testside\log\billeder" )
%>
<h1>Billede oversigt</h1><br>
<a href="Upload1.htm">Tryk her for Upload af billeder</a><br><br>

<TABLE WIDTH="100%" border=1>
<% For Each thing in myFolder.Files %>
<% If Right(thing.Name,4) = ".gif" Or Right(thing.Name,4) = ".jpg" Then %>
<tr>
  <td  align="left"><a href="<%= thing.Name%>"><img src="<%= thing.Name%>" border="0" alt="<%=thing.Name%>" width="<%= thumbwidth %>" ><%=thing.Name%></a></td>
</tr>
<% End If %>
<% Next %>
</table>
<BR>
</body>
</html>
Avatar billede boenne Nybegynder
20. januar 2003 - 22:51 #1
På din hjemmeside skal du (temmeligt) sikkert være logget på din server med password for at kunne få tilladelse til at slette et billede.. Mit forslag er derfor i stedet at du med ftp går ind via din browser hvor du skriver "ftp://ditbrugernavn:ditpassword@dinsite.dk/ditbibliotek"
Derved får du en udemærket filoversigt hvor du hurtigt kan flytte/slette m.m. - håber du kan bruge det i stedet..
Avatar billede oleodder Nybegynder
20. januar 2003 - 23:13 #2
Nej Nej - ikke via FTP !!
Det er en online billedeoversigt, hvor man via browseren uploader billeder og det er selvfølgelig også via browseren, at man skal kunne slette billederne...
- Så det kan jeg desværre ikke bruge, ellers tak.
Næ, jeg har uden held forsøgt mig med en ASP kode løsning og vil nu gerne have eksperterne til at hjælpe.....
Avatar billede hf Nybegynder
21. januar 2003 - 08:59 #3
Her er hvordan du kan slette en fil fra harddisken:

myFile = myFolder & "\" & thing.Name
fs.DeleteFile(myFile)

Det er god skik at afslutte scriptet med:
set fs=nothing
Avatar billede oleodder Nybegynder
21. januar 2003 - 19:06 #4
Hej HF
Mange tak, men jeg kan ikke rigtig få det til at virke....
Så, er der nogen der kan fortælle mig hvordan det skal skrives i min kode ??
- Tak -
Avatar billede oleodder Nybegynder
24. januar 2003 - 18:16 #5
Det går altså ikke.....

Det er nedenstående stump det skal sættes ind i, ikke ???

<td  align="left"><a href="<%= thing.Name%>"><img src="<%= thing.Name%>" border="0" alt="<%=thing.Name%>" width="<%= thumbwidth %>" ><%=thing.Name%></a></td>

- Er der ikke nogen der kan hjælpe ??
Tak
Avatar billede hf Nybegynder
26. januar 2003 - 22:29 #6
Her er et eksempel

Udvid din tabel med en celle, så rækken ser sådan ud:
<tr>
<td  align="left">
    <a href="<%= thing.Name%>"><img src="<%= thing.Name%>" border="0" alt="<%=thing.Name%>" width="<%= thumbwidth %>" ><%=thing.Name%></a></td>
<td>
    <form method="post" name="sletform" action="sletfil.asp">
      <input name="filnavn" type="hidden" value="<%=thing.Name%>">
    <input type="submit" name="Submit" value="Slet Billede">
    </form>
</td>
</tr>
------------------------------------
Opret filen "sletfil.asp" med dette indhold:

<%
myFile = Request.Form("filnavn")
Set fs = Server.CreateObject( "Scripting.FileSystemObject" )
Set myFolder = fs.GetFolder( "d:\www2\oerskov\http\log\billeder" )
If fs.FileExists(myFolder & "\" & myFile) Then
  fs.DeleteFile(myFolder & "\" & myFile)
  Response.Write "Filen er slettet<br>"
End If
Set fs = Nothing
Response.Write "<a href='list.asp'>Tilbage til listen</a>"
%>

Det er testet og virker.
Avatar billede oleodder Nybegynder
27. januar 2003 - 00:13 #7
Mange tak - Jeg tror jeg har forstået.

Jeg vender tilbage senere........

TAK
Avatar billede oleodder Nybegynder
10. marts 2003 - 23:07 #8
Stadig MANGE TAK - Har lige været væk...Jeg tjecker og vender tilbage.

TAK
Avatar billede oleodder Nybegynder
19. marts 2003 - 00:05 #9
Hej HF

Nu har jeg fået det til at virke !! Det er bare super og virker perfekt.
Mange tak for hjælpen.

Kort spørgsmål: Hvordan sætter jeg en advarsel/alert op, så man lige bliver advaret inden man foretager selve sletningen ??

Under alle omstændigheder tak for hjælpen.........
Avatar billede hf Nybegynder
19. marts 2003 - 08:45 #10
Du kan lave en JavaScript, der viser en confirm-boks.

<html>
<head>
<title>SletteFormular</title>
<script LANGUAGE="JavaScript">
<!--
function confirmSubmit()
{
var agree=confirm("Er du sikker?");
if (agree)
    return true ;
else
    return false ;
}
// -->
</script>
</head>
<body>
<form method="POST" action="delete.html" name="sletform" onSubmit="return confirmSubmit()">
<input type="text" name="tekstfelt">
<input type="Submit" name="Delete" value="Slet">
</form>
</body>
</html>
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester