Aprendi a extrair valores de arquivo do FSO e também aprendi a inserir informações no arquivo. Então vamos aplicá -lo.
Não sei se você tem esse hábito: quando você vê um arquivo, clica inconscientemente com o botão direito do mouse e escolhe abri-lo com o bloco de notas. Haha, quase nenhum arquivo não é possível. Então agora, pode -se padrão que todos os arquivos sejam texto, mas os nomes de sufixo são diferentes; Ou seja, as informações de conteúdo de qualquer arquivo podem ser extraídas agora. OK, apenas imagine:
1. Extraia o caminho de um arquivo (use o botão do arquivo para encontrar e localizar)
2. Abra o arquivo de caminho e leia todas as linhas
3. Exiba as informações de leitura
1. ViewCode.asp
| <% Função ShowCode (nome do arquivo) Set fso = server.createObject ("scripting.filesystemobject") Set cnrs = fso.opentExtfile (nome do arquivo, 1) Embora não seja cnrs.atendofstream rsline = cnrs.readline rsline = server.htmlencode (rsline) Response.write (rsline & "<br>") Wend Função final %> <form action = "viewcode.asp" method = "post"> Digite o nome do arquivo <input type = "file" name = "filename">> <input type = "submit" value = "veja o programa de origem"> </morm> <% arquivo = request.form ("nome do arquivo") Response.Write (Arquivo e "Programa de origem da seguinte maneira <HR>") Se TRIM (arquivo) <> "" então CHAMADA SHOSTECODE (FILE) Final se %> |
Ao depurar o programa acima, você pode selecionar as páginas HTML e ASP ou abrir qualquer aplicativo, etc.
A função ShowCode definida é usada principalmente para abrir, ler e exibir todo o conteúdo de informações no arquivo. Observe que o server.htmlencode (rsline) é adicionado para arquivos que contêm código HTML padrão.
Todas as linhas no arquivo de exibição são exibidas em um loop condicional.
Embora não seja cnrs.atendofstream
...
Wend
Em seguida, o exemplo a seguir envolve especificamente o método aberto. Lembrar? Em circunstâncias normais, abra um arquivo usando fso.opentextfile ("c: /testfile.txt", 1), e a função do parâmetro 1 é: Abra o arquivo no modo somente leitura. Este arquivo não pode ser escrito. O que devo fazer se já existir um arquivo e precisar ser adicionado a ele? Simples, o parâmetro é 8.
PS: Há também uma maneira de ler aqui.
<% qualfile = server.mappath ("test.txt") Set fso = createObject ("script.filesystemoBject") Set txt = fso.opentExtFile (qualfile, 1) rline = txt.readall rline = substituir (server.htmlencode (rline), chr (13), "<br>") Response.Write rline txt.close %> |
Qual é a utilidade disso? Haha, é assim que a história on -line da Amazon: se você pode fazê -lo, precisa primeiro exibir a história original e depois adicionar a história para escrevê -la ao arquivo. A coisa mais importante sobre escrever arquivos é adicionar gravações. Portanto, pode ser alcançado abaixo.
2. Story.asp
<% Se não for request.form ("nextline") = "" então Set fso = server.createObject ("scripting.filesystemobject") textfile1 = server.mappath ("story.txt") set cnrs = fso.opentExtfile (textfile1,8) CNRS.WRITINELINE (request.form ("nextline"))) cnrs.close final se %> A história é a seguinte: <% Set fso = server.createObject ("scripting.filesystemobject") textfile1 = server.mappath ("story.txt") set cnrs = fso.opentExtfile (textfile1,1) Embora não seja cnrs.atendofstream Response.write "" & cnrs.readline Wend cnrs.close %> <HR> <form método = "post" action = "story.asp"> Por favor, insira uma nova linha para esta história: <Nome de entrada = "Nextline" type = "text" size = "70"> <input type = "submite" value = "submit"> </morm>
|