<%@ Language=JScript %>
<%
//Parâmetros constantes para o Script
var ForReading = 1;
var ForWriting = 2;
var ForAppending = 8;
var NewLine = "<BR>\n";
// Instância o objeto FSO.
var fso, ts;
fso = new ActiveXObject("Scripting.FileSystemObject");
// Criar um objeto novo de TextStream usando FSO e escrever. Isto resulta em uma linha nova.
// Utilizando a propriedade CreateTextFile para criar o arquivo.
ts = fso.CreateTextFile("e:\\home\\seu_login_de_FTP\\dados\\teste\\arquivo.txt",true);
//Com o método WriteLine você escreve uma linha no arquivo criado acima.
ts.WriteLine("Está quase !!!");
ts.WriteBlankLines(1);
ts.WriteLine("Esta é minha primeira aplicação utilizando FileSystemObject.");
ts.Close();
//O método GetFile retorna o arquivo existente.
ts = fso.GetFile("e:\\home\\seu_login_de_FTP\\dados\\teste\\arquivo.txt");
Response.Write("Nome do arquivo: " + ts.Name + NewLine);
Response.Write("Caminho do arquivo: " + ts.Path + NewLine);
Response.Write("Última atualização: " + ts.DateLastModified);
var strFil = NewLine + ""
ts = fso.OpenTextFile("e:\\home\\seu_login_de_FTP\\dados\\teste\\arquivo.txt",ForReading,false);
while (!ts.AtEndOfStream) {
strFil += ts.ReadLine() + NewLine;
}
//Mostra o conteúdo
Response.Write(NewLine + strFil);
ts.Close();
%>