Es una pequeña cosa que se debe hacer para modificar el código en lotes debido al trabajo. Compartiré con ustedes los tipos de archivos que se pueden procesar actualmente: .asp .inc .htm .html. Los tipos específicos se pueden modificar mediante. usted mismo
Funciones implementadas por el programa: Cambiar los tipos de archivos en el directorio de origen Después de que los archivos se modifican en lotes, se guardan en el directorio de destino y se pueden lograr muchas cosas con ligeras modificaciones.
Sin mencionar nada más, todo está claramente escrito en el código.
<%
Server.ScriptTimeOut = 500 'Tiempo de espera del script
' // +-------------------------------------- ------------------------------------------------+
'// | Función de modificación por lotes |
'// | ---------------------------------------------- -------------------------- |
'// | Atributo: ruta_desde el directorio del archivo de origen ruta_al directorio de trabajo del archivo de destino |
'// | ---------------------------------------------- -------------------------- |
'// | Valor de retorno: Ninguno |
'// | ---------------------------------------------- -------------------------- |
'// | Flujo del programa:... |
'// | ---------------------------------------------- -------------------------- |
'// | Escritor: WYC; tiempo de escritura: 2004-03-08 |
'// +---------------------------------------------- -----------------------+
Sub medio archivo (ruta_desde, ruta_hacia)
list_from = path_from 'Almacena el directorio de trabajo de origen actual
list_to = path_to 'Guardar el directorio de trabajo de destino actual
Establecer fso = CreateObject("Scripting.FileSystemObject")
Set Fold = fso.GetFolder(list_from) 'Obtener objeto Carpeta
Set fc = Fold.Files 'Obtener conjunto de registros de archivos
Set mm = Fold.SubFolders 'Obtener conjunto de registros de directorio
Para cada f2 en mm
establecer objfile = server.createobject("scripting.filesystemobject")
objfile.CreateFolder(ruta_a & "" & f2.name) 'Crear directorio
midfile path_from & "" & f2.name, path_to & "" & f2.name 'Llamada recursiva
respuesta.escribir ruta_a & "" & f2.name & " ¡Listo!<br>"
Próximo
Para cada f1 en fc
file_from = list_from & "" & f1.name 'Generar dirección de archivo (fuente)
file_to = list_to & "" & f1.name 'Generar dirección de archivo (a)
fileExt = lcase(right(f1.name,4)) 'Obtener el tipo de archivo
Si fileExt=".asp" o fileExt=".inc" o fileExt=".htm" o fileExt="html" Entonces 'El tipo específico puede ser modificado y agregado por usted mismo
set objfile = server.createobject("scripting.filesystemobject") 'Definir un componente del servidor (leer el archivo fuente)
establecido = objfile.opentextfile(file_from, 1, false, false)
content = out.readall 'Leer datos
out.close
'// +------------------------------------------- --- --------+
'// | Módulo de procesamiento de contenido de archivos (principalmente, otros son operaciones de archivos) |
Establecer expresión regular = nueva expresión regular
regEx.Pattern = "(>s*n)"
regEx.Global = true 'Establecer todos los modos coincidentes
content = regEx.Replace(content, ">") 'Reemplazar el carácter de retorno de carro
contenido = Reemplazar(contenido, " ", "") 'Reemplazar pestaña
'// +---------------------------------------------- --- -----+
set objfile = server.createobject("scripting.filesystemobject") 'Definir un componente del servidor (escribir en el archivo de destino)
establecido = objfile.createtextfile(file_to,TRUE,FALSE)
outt.write(contenido) 'Escribir datos
salir.cerrar
else 'de lo contrario copia el archivo directamente
Establecer fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile archivo_de, archivo_a
Terminar si
Próximo
End Sub
midfile Server.mappath("temp/aaa"), Server.mappath("temp/bbb") 'Llame al directorio fuente de muestra temp/aaa y guárdelo en temp/bbb después del procesamiento
'Directorio de origen directorio de destino (debe ser un directorio existente)
%>
Atentamente, muchas gracias (piedra de otras montañas)