ich habe den quelltext unten erweitert, ich hoffe es funzt Aus Aachen gru?t freundlich, \ | / Josef Beckers (0^0) -----------------------------o00--( )--00o-- / PHP - ASP - XML - HTML - SQL - Flash \ \ Online: http://www.freelancer-nrw.de / --------------------------------------------
-----Ursprungliche Nachricht----- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Gesendet: Montag, 4. Februar 2002 09:18 An: ASP Diskussionsliste fuer Anfaenger Betreff: [aspdebeginners] Ausgewdhlte Datei lvschen? Hallvchen, ich hoffe, jemand kann mir helfen, dass das Teil hier furzt. Ich will eigentlich nur die ausgewdhlte Datei Lvschen. <form name="form1" action="bild.asp" method="post"> <input type="Submit" name="delete" value="Delete Pic"><br> <table border="1" width="600" cellspacing="0" cellpadding="5" > <tr> <% Set fso = CreateObject("Scripting.FileSystemObject") Set folder = fso.GetFolder(Server.Mappath("../../upload/")) Set files = folder.Files counter = 0 For Each file in Files %> <td valign="top" align="center"> <input type="Checkbox" name="delete" value="yes"> <% Response.Write file.Name %><br> <% Response.Write "<img src=../../upload/" & file.Name & " width=50>" %></td> <% counter = counter + 1 If delete = "yes" Then '------------------------------File lvschen????? 'objFSO.DeleteFile(Server.MapPath("../../upload/" & file.Name)) 'File.Delete (Server.MapPath("../../upload/" & file.Name)) '------------AB HIER WIRD GELOESCHT-------------------- Set fso = CreateObject("Scripting.FileSystemObject") If (fso.FileExists(Server.MapPath("../../upload/" & file.Name))) Then Set MyFile = fso.GetFile(Server.MapPath(file.Name)) MyFile.Delete End If '----------ENDE MIT LOESCHEN--------------------------- Response.Redirect ("bild.asp") End If %> <% If Counter = 5 then %> </tr> <% counter= 0 end if 'rs.MoveNext 'loop end if Next 'response.write "</select>" Set files = folder.Files Set file = Nothing Set fso = Nothing %> </table> </form> | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ | [aspdebeginners] als [EMAIL PROTECTED] subscribed | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv | Sie knnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ | [aspdebeginners] als [email protected] subscribed | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv | Sie knnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
