% ForReading = 1 txtPath="c:\inetpub\vhosts\claudiodauelsberg.com.br\httpdocs\agenda\agenda.txt" %>
Editor de Agenda
<% Set objeto = CreateObject("Scripting.FileSystemObject") Set leitura = objeto.OpenTextFile(txtPath,ForReading,False) %>
1) <br> - deve ser colocado ao final de cada linha para pular para outra linha
2) Para colocar um texto em negrito coloque o texto entre <b> e </b>
(conforme exemplo -> <b>texto a ficar em negrito</b>)
3) Para centralizar um texto coloque o texto entre: <center> e </center>
<% leitura.Close Set leitura = nothing set objeto = nothing %>