|
Creating the Main Form
To start with create a simple form where the user can type some text. Whatever the client types in this form has to be appended to a text file, this text file will then be displayed to the client. The actual writing to the text file is done with an Active Server Script.
<FORM method="post" action="chat.asp"> <Input type=text value="" size="35" name="txtbox"> <Input type=submit value="GO">
Refreshing the Page
By including the meta tag for refreshing the page will be refreshed every 5 seconds. This concept is called client pull. This is because it is the clients responsiblity to read the meta tag and call for a refresh every five seconds.
<HEAD> <META http-equiv="refresh" content="5"> </HEAD>
, The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code.<% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%>
The Active Server Page
, The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code.<% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%> , The form for submitting the data and the page for reading the text are on two different pages. In order to combine them we put both pages with in a frame. This allows the user to easy type and read the responses without being interrupted., Since the above form is in a file called chat.asp and the form posts to chat.asp, the form post to itself. To handle the output of the post you need some Active Server Code. <% textstr=Request.Form("txtbox") Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set OutStream= FileObject.OpenTextFile (TestFile, 8, TRUE) ipaddr=Request.ServerVariables("REMOTE_ADDR") & " : " OutStream.Write ipaddr OutStream.WriteLine textstr & "<BR>" Set OutStream = Nothing
%>
Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
Active Server Page
Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object.
, Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step it to close the object. , Installation is fairly simple, just follow these steps:
- Create a virtual root called "asp", make it giving it Execute Access
- Download and expand http://15seconds.com/files/012497.zip (1064 bytes) into the virtual directory just created.
- Create a blank text file in that directory called textwork.txt
If you want to change the name of virtual root, you must change the name in the Active Server Page code since it uses the virtual root name to find the text file's path.
Mainchat.asp could be mainchat.htm, and located in a directory with read access but the installation is easier with all the files in the same directory., Set FileObject = Server.CreateObject("Scripting.FileSystemObject") TestFile = Server.MapPath ("/asp") & "\textwork.txt" Set InStream= FileObject.OpenTextFile (TestFile, 1, False, False) Response.Write Instream.ReadALL & "&<BR&>" Set Instream=Nothing Here a Fileobject is created in the READ mode by specifying the parameter 1 to the OpenTextFile() method. In the following statement two things are done in one stroke. The READALL() function is used to read the entire contents of the file and then the Response.Write function is used to output the entire file to the client. The final step i |