<form method="POST" name="ff" action="ss.asp">

<textarea rows="3" name="T1" cols="45"><input type="submit" value="提交" name="B1">

</form>

<%

t1=request.form("t1")

response.write "已将"&t1&"的内容写入ss.txt文本文件中"

wf=server.mappath("ss.txt")

set fs=server.createobject("scripting.filesystemobject")

set o=fs.CreateTextFile(wf,true,false)

o.write(t1)

o.close

set o=nothing

set fs=nothing

%>