Hallo Liste, ich wiedermal.
eigentlich habe ich diesmal keine typische asp-frage aber vielicht kann man sie mit einer asp-l�sung beantworten :-) wie kann ich, wenn ich eine Internetseite ausdrucke, die fuss-und kopfzeile unterdr�cken? also der Titel, die Seite 1 von X und die URL? vielen dank p. wagner ---------- Urspruengliche Nachricht ------------------------------- --- Von: "josef.beckers" <[EMAIL PROTECTED]> Antworten: "ASP Diskussionsliste fuer Anfaenger" <[EMAIL PROTECTED]> Datum: Mon, 4 Feb 2002 09:26:29 +0100 >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.a sp > > >| 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.a sp > | 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
