Implementação de código usando o programa de modificação do lote ASP, relacionado ao FSO
É uma coisa pequena que precisa ser feita em lotes de modificações de código, e eu o compartilharei com você.
Os tipos de arquivo que podem ser processados no momento: .asp .inc .htm .html Os tipos específicos podem ser modificados e adicionados por você.
Funções implementadas pelo programa: o lote modifica os arquivos no diretório de origem e salve -os no diretório de destino.
Algumas modificações podem alcançar muitas coisas!
Não vou dizer mais nada, o código está muito claro
<%
'// +------------------------------------------------------------------------- +
'// | Nome do programa: Modificador em lote de código de pedra v1.01 |
'// | Todos os direitos reservados pelas pedras das outras montanhas, a violação serão perseguidos! Por favor, indique os direitos autorais ao reimprimir :) |
'// | --------------------------------------------------------------------------- |
'// | Sistema: Win2000; Editor: EditPlus; Ferramenta de indentação: guia; Comprimento de recuo: 8; Fonte: Songti (10pt); |
'// | --------------------------------------------------------------------------- |
'// | Criador: WYC; Tempo de criação: 2004-03-08; |
'// | Escritor: WYC; Escritor: 2004-03-08; |
'// +------------------------------------------------------------------------- +
Server.scriptTimeout = 500 'Tempo limite de script Tempo limite
'// +------------------------------------------------------------------------- +
'// | Funções modificadas em lote |
'// | --------------------------------------------------------------------------- |
'// | Atributo: PATH_FROM Origem do diretório de arquivos de origem PATH_TO Diretório de trabalho de arquivo de destino |
'// | --------------------------------------------------------------------------- |
'// | Valor de retorno: Nenhum |
'// | --------------------------------------------------------------------------- |
'// | Fluxo do programa: ... |
'// | --------------------------------------------------------------------------- |
'// | Escritor: WYC; Tempo de gravação: 2004-03-08; |
'// +------------------------------------------------------------------------- +
Sub Midfile (Path_From, Path_to)
list_from = path_from 'armazenamento o diretório de trabalho atual da fonte
list_to = path_to 'armazenamento o diretório de trabalho de destino atual
Set fso = createObject (script.filesystemObject)
Set dobr = fso.getFolder (list_from) 'Obtenha objeto de pasta
Definir fc = dobrar.files 'obtenha o conjunto de registros de arquivo
Definir mm = dobl.subfolders 'Obtenha o conjunto de registros de diretório
Para cada F2 em mm
set objfile = server.createObject (scripting.filesystemobject)
objfile.createfolder (path_to & / & f2.name) 'Criar diretório
Midfile Path_From & / & f2.Name, Path_to & / & f2.Name 'Chamada recursiva
Response.write path_to & / & f2.name & terminado! <br>
Próximo
Para cada F1 no FC
file_from = list_from & / & f1.name 'Criar endereço do arquivo (fonte)
file_to = list_to & / & f1.name 'Criar endereço de arquivo (para)
fileExt = lcase (direita (f1.name, 4)) 'Obtenha o tipo de arquivo
Se fileExt = .asp ou fileExt = .inc ou fileExt = .htm ou fileExt = html Então 'o tipo específico pode ser modificado e adicionado por você mesmo