Ett exempel ur huvudet:
<%
Set filesys = CreateObject("Scripting.FileSystemObject")
if request.form( "B1" ) <> "" then
set readfile = filesys.OpenTextFile("c:\somefile2.txt", 2, true)
readfile.Write request.form( "text" )
readfile.Close
else
set readfile = filesys.OpenTextFile("c:\somefile2.txt", 1, true)
contents = readfile.ReadAll
readfile.close
%>
<form method="post">
<textarea cols="45" rows="10" name="text"><%=contents%></textarea><br>
<input type="submit" name="B1">
</form>
<%
end if
%>