Dies ist das erste Mal, dass ich einen Artikel übersetze. Bitte verzeihen Sie mir etwaige Mängel.
Der Grund, warum Indien heute ein bedeutender Softwareexporteur ist, liegt darin, dass es uns an vielen Stellen überlegen ist. Einer der ersten Vorteile besteht darin, dass die offizielle Sprache Indiens Englisch ist, was indischen Programmierern, die Englisch als Programmiersprache verwenden, einzigartige Vorteile bringt. Für diejenigen unter uns in der IT-Branche sollten wir auch unsere Englischkenntnisse stärken.
Einleitung Wenn Sie eine Website haben, die seit mehr als zwei Monaten läuft, ist Ihnen möglicherweise aufgefallen, dass sich auf Ihrer Website viele Bilddateien angesammelt haben. Obwohl wir alle unser Bestes geben, diese Bilddateien gut zu benennen, fällt es uns beim Durchsuchen der Dateinamen dieser Bilder immer schwer, uns an die besondere Bedeutung oder Verwendung einiger Bilddateinamen zu erinnern.
Zu diesem Zeitpunkt öffnen wir diese Bilder normalerweise wiederholt mit dem Browser, um zu sehen, um welche Bilder es sich handelt. Derzeit kann dieser ASP-Code als Bildbrowser (und Reiniger) verwendet werden, um diese Bilder zu durchsuchen und Reinigungsvorgänge durchzuführen.
Codierung:
Tatsächlich handelt es sich bei diesem Programm um eine Listenseite, die alle Bilder in einem bestimmten Verzeichnis enthält und das FileSystemObject-Objekt verwendet, um diese Bilddateien (GIF- und JPEG-Dateien) aufzulisten.
Fügen Sie der Seite eine Link-Umschaltanzeige hinzu, um zu steuern, ob das Bild angezeigt werden soll. Wenn Sie viele Dateien haben und nicht alle laden möchten, können Sie einfach einen Link zu einem Bild auf der Seite anzeigen lassen. Wenn Sie jedoch nicht sicher sind, was einige Dateinamen bedeuten, ist diese Funktion verfügbar Gute Hilfe für Sie beim Aufräumen.
Das Folgende ist ein sehr prägnanter Code
<%@ Language=VBScript %>
<% Option Explicit %>
<%
Const ImageFilePath = "images"
Const DeleteButtonLabel = „Ausgewählte Bilder löschen“
Dim objFSO
Dimmen Sie objFolder
Dimmen Sie objFile.
Dimmen Sie strFileName
Dim strFileExtension
Dim blnShowImages
If Request.QueryString("ShowImages") = "" Then
blnShowImages = Falsch
Anders
blnShowImages = CBool(Request.QueryString("ShowImages"))
End If
If Request.Form("btnDelete") = DeleteButtonLabel Then
Legen Sie objFSO = Server.CreateObject("Scripting.FileSystemObject")
für jeden strFileName in Request.Form("delete")
fest.
objFSO.DeleteFile(Server.MapPath(ImageFilePath & "/" & _
strFileName))
Als nächstes
setze objFSO = Nothing
Ende wenn
%>
<html>
<Kopf>
<title>ASP 101 Image Browser & Killer!</title>
</head>
<body>
<form action="<%= Request.ServerVariables("URL") %>" method="post">
<table border="1">
<tr>
<th>Bildname</th>
<th>Image <a href="<%= Request.ServerVariables("URL") %>?
ShowImages=<%= Not blnShowImages %>">(Anzeige umschalten)</a></th>
<th>Dieses Bild löschen</th>
</tr>
<%
Setze objFSO = Server.CreateObject("Scripting.FileSystemObject")
Legen Sie objFolder = objFSO.GetFolder(Server.MapPath(ImageFilePath))
für jede objFile in objFolder.Files
fest
strFileExtension = LCase(Mid(objFile.Name, _
InStrRev(objFile.Name, ".", -1, 1) + 1))
Wenn strFileExtension = "gif" Oder strFileExtension = "jpg" Oder _
strFileExtension = "jpeg" Dann
' Option zur Identifizierung der Originalbilddatei:
'Wenn objFile.Type = "GIF Image" oder _
objFile.Type = "JPEG Image" Dann
%>
<tr>
<td>
<a href="<%= ImageFilePath & "/" & objFile.Name %>">
<%= objFile.Name %></a>
</td>
<%
Wenn blnShowImages Dann
%>
<td>
<img src="<%= ImageFilePath & "/" & objFile.Name %>" />
</td>
<%
Anders
%>
<td>
<a href="<%= ImageFilePath & "/" & objFile.Name %>">
Bild anzeigen</a>
</td>
<%
Ende wenn
%>
<td align="center">
<input type="checkbox" name="delete"
value="<%= objFile.Name %>" />
</td>
<%
Ende wenn
Als nächstes
setze objFolder = Nothing
Setze objFSO = Nichts
%>
<tr>
<td colspan="3" align="right">
<input type="submit" name="btnDelete"
value="<%= DeleteButtonLabel %>">
</td>
</tr>
</table>
</form>
</body>
</html>
Beachten Sie beim Durchführen eines Löschvorgangs unbedingt, dass das Programm den Löschvorgang nicht rückgängig machen kann, wenn im Programm keine Löschbestätigungsaufforderung vorhanden ist.
Fazit: Menschen werden ASP niemals verwenden, um umfangreiche, skalierbare Websites zu erstellen. (Anmerkung des Übersetzers: Dieser Satz ist ohne Übersetzung nicht sehr angemessen. Nach meiner Berufserfahrung kann ASP vollständig große Website-Systeme erstellen. In Bezug auf ASP habe ich am Aufbau großer Unternehmensintranets und mobiler Branchenanwendungen teilgenommen , usw.) Aber manchmal können Sie dies nutzen, um Ihre Arbeit zu vereinfachen, selbst wenn der Code nie im WEB veröffentlicht wird.
Um den Code zu erhalten, können Sie die Diskussions-ZIP-Datei mit diesem Code aus dem Stammverzeichnis von http://www.weiw.com herunterladen. Nachdem der Code ausgeführt wurde, finden Sie alle Bilder unter http://www.weiw.com/images / wird angezeigt.
Sie können den Wert der ImageFilePath-Konstante ändern. Sie können hier auch einige virtuelle Pfade einfügen und der Code verwendet Server.MapPath, um den entsprechenden physischen Pfad zu bestimmen. Sie können ganz einfach bestimmte Standorte auf Ihrer Website angeben. Wenn Sie beispielsweise den Wert dieser Konstante von „images“ in „/images“ ändern, würde das Programm auf das Bilderverzeichnis im Stammverzeichnis der Website verweisen. Auf die gleiche Weise kann der Wert von ImageFilePath geändert werden, um denselben Zweck zu erreichen.
Zweitens: Beim Schreiben dieses Codes habe ich einfach den Dateityp auf meinem Computer verwendet. Das funktioniert nur auf meiner Maschine reibungslos. Es stellt sich heraus, dass die Beschreibung des Dateityps die Grundlage Ihrer Dateivereinigung ändern kann. Um die Erweiterungen zu erhalten, wählen Sie die Anzeige dieser Dateien basierend auf solchen Dateien und nicht auf deren Typ aus. Ich habe diese Funktionalität im Code dieser ZIP-Datei implementiert. Dies ist jetzt die neueste Version des Programms.