Code -Implementierung mit ASP -Stapel -Modifikationsprogramm, FSO zu tun
Es ist eine kleine Sache, die in Code -Modifikationen durchgeführt werden muss, und ich werde es mit Ihnen teilen.
Die Dateitypen, die derzeit verarbeitet werden können: .asp .inc .htm .html Die spezifischen Typen können selbst geändert und hinzugefügt werden.
Vom Programm implementierte Funktionen: Batch ändern die Dateien im Quellverzeichnis und speichern Sie sie im Zielverzeichnis.
Ein paar Änderungen können viele Dinge erreichen!
Ich werde nichts anderes sagen, der Code ist sehr klar
<%
'// +------------------------------------------------------------------- +
'// | Programmname: Steincode -Batch -Modifikator v1.01 |
'// | Alle Rechte, die von den Steinen der anderen Berge vorbehalten sind, werden Verstöße verfolgt! Bitte geben Sie beim Nachdruck das Urheberrecht an :) |
'// | --------------------------------------------------------------------- |
'// | System: Win2000; Herausgeber: editPlus; Eindrückungsinstrument: Registerkarte; Einzugslänge: 8; Schriftart: Songti (10pt); |
'// | --------------------------------------------------------------------- |
'// | Schöpfer: WYC; Schöpfungszeit: 2004-03-08; |
'// | Schriftsteller: WYC; Schriftsteller: 2004-03-08; |
'// +------------------------------------------------------------------- +
Server.ScriptTimeout = 500 'Skript -Zeitüberschreitungszeit
'// +------------------------------------------------------------------- +
'// | Batch -Modify -Funktionen |
'// | --------------------------------------------------------------------- |
'// | Attribut: Path_From Quelldatei Verzeichnis Path_to Zieldatei Arbeitsverzeichnis |
'// | --------------------------------------------------------------------- |
'// | Rückgabewert: Keine |
'// | --------------------------------------------------------------------- |
'// | Programmfluss: ... |
'// | --------------------------------------------------------------------- |
'// | Schriftsteller: WYC; Schreibzeit: 2004-03-08; |
'// +------------------------------------------------------------------- +
Sub midfile (path_from, path_to)
list_from = path_from 'Speichern Sie das aktuelle Quellarbeitsverzeichnis
list_to = path_to 'Speichern Sie das aktuelle Zielarbeitsverzeichnis
Setzen Sie fso = createObject (scripting.filesystemObject)
Set fold = fso.getFolder (list_from) 'Ordnerobjekt abrufen
Setzen Sie FC = fold.files 'Dateieinträge erhalten
Setzen Sie MM = fold.subfolders 'erhalten Sie den Verzeichnissatzsatz
Für jeden F2 in mm
Setzen Sie objFile = server.createObject (scripting.FilesystemObject)
objFile.CreateFolder (Path_to & / & f2.Name) 'Verzeichnis erstellen
MIDFILE PATH_FROM & / & F2.NAME, PATH_TO & / & F2.NAME 'Rekursiver Anruf
Antwort.Write Path_to & / & F2.Name & Fertig! <br>
Nächste
Für jeden F1 in FC
Datei_from = list_from & / & f1.name 'Dateiadresse erstellen (Quelle)
Datei_to = list_to & / & f1.name 'Dateiadresse erstellen (to) erstellen
Dateiext = lase (rechts (f1.name, 4)) 'Dateityp abrufen
Wenn Dateiext = .asp oder Fileext = .inc oder Fileext = .htm oder Fileext = HTML dann kann der spezifische Typ geändert und selbst hinzugefügt werden