Por ser uma das formas mais antigas de armazenamento de dados, e também uma das mais simples, os arquivos TXT ainda são uma grande arma no armazenamento de informações, e como tal, tem seu destaque na linguagem ASP. Integração de diferentes bases de dados a baixo custo, armazenamento de grande quantidade de informação não padronizada e aceitabilidade em 100% dos sistemas operacionais são algumas das características/vantagens dos arquivos TXT.
Um objeto chamado FileSystemObject foi desenvolvido com o intuito de permitir acesso a arquivos TXT a partir de ASP, e dispõe das seguintes funções: LER arquivos TXT, CRIAR arquivos TXT e adicionar dados em arquivos TXT.
O ASPBRASIL dividiu este tutorial em 4 partes, como segue:
1. LER arquivos TXT
2. CRIAR arquivos TXT e gravar informações iniciais
3. ADICIONAR informações a um arquivo TXT já existente
4. ASPECTOS AVANÇADOS do objeto FileSystemObject
Abaixo, segue um exemplo de leitura de um arquivo TXT.
nome do arquivo: teste.txt (abaixo, layout do arquivo teste.txt)
TESTE de leitura de arquivo TXT
Este arquivo txt pode conter tanto texto puro quanto texto com formato HTML.
Este tutorial será dividido em 4 partes, como segue:
1. A primeira parte, ensinara a ler um arquivo TXT
2. A segunda parte, a criar e gravar em um arquivo TXT
3. A terceira parte, a adicionar conteúdo a um arquivo TXT já existente
4. A quarta parte discutirá algumas funções avançadas e algumas aplicações dos arquivos TXT
Abaixo, rotina
ASP que lê arquivos TXT
<!--#include file="fobjvbs.inc"-->
<%
path_do_arquivo = "e:/teste/"
nome_do_arquivo = "teste.txt"
'as linhas abaixo faz a conexão com o objeto FileSystemObject e abre o arquivo txt especificado.
Set fs = CreateObject("Scripting.FileSystemObject")
Set thisfile = fs.OpenTextFile(path_do_arquivo & nome_do_arquivo, forreading, False)
while (not thisfile.AtEndOfStream) and response.isclientconnected()
'as linhas abaixo lêem o arquivo TXT e então escrevem o seu conteúdo no Browser.
linha_txt = thisfile.readline
response.write linha_txt
wend
thisfile.Close
set thisfile=nothing
set fs=nothing
%>