20. januar 2003 - 22:35Der 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:
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>
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..
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.....
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>" %>
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.