The example code below will open a text file that resides in the directory 'fsofolder' on the C drive and write out all the contents.
<%
Dim oFilesys, oFile, sFileContents
Set oFilesys= CreateObject("Scripting.FileSystemObject")
Set oFile = oFilesys.OpenTextFile("c:\fsofolder\newfile.txt")
sFileContents = oFile.ReadAll
oFile.close
Set oFile=nothing
Set oFilesys=nothing
Response.write(sFileContents)
%>
Get the best asp web hosting provider now and save 30%
Plug and play ASP membership script that integrates with PayPal to let you charge recurring membership fees.
