Displaying Source Code(s)
|
|
--------------------------------------------------------------------------------
Read Write and Append Text
--------------------------------------------------------------------------------
Description : Uses FSO to read, write, or append text in a file
<%
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c: estfile.txt", ForWriting, True)
f.Write "Hello world!"
%>
--------------------------------------------------------------------------------
|
|
|