%@ Language = JScript %>
<%
//Define constants.
FORREADING = 1;
FORWRITING = 2;
FORAPPENDING = 8;
%>
FileSystem Component
FileSystem Component
<%
var curDir, x ;
var objScriptObject, objMyFile
//Map current path to physical path.
curDir = Server.MapPath("\\iissamples\\sdk\\asp\\components\\");
//Create FileSytemObject component.
objScriptObject = Server.CreateObject("Scripting.FileSystemObject");
//Create and write to a file.
objMyFile = objScriptObject.CreateTextFile(curDir + "\\" + "MyTextFile.txt", FORWRITING);
for (x = 1; x < 5; x++)
{
objMyFile.WriteLine("Line number " + x + " was written to MyTextFile.txt
");
}
objMyFile.Close();
%>
<%
//Read from file and output to screen.
objMyFile = objScriptObject.OpenTextFile(curDir + "\\" + "MyTextFile.txt", FORREADING);
Response.Write(objMyFile.ReadAll());
objMyFile.Close();
%>