<%



dim aspdir,Dir
aspdir=request.servervariables("SCRIPT_NAME")

Dir = "aspdir"
HitsFile = Server.MapPath(Dir) & "\ntcount\hits.txt"
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
File2 = "dir\file1.txt"

On Error Resume Next
Set InStream= FileObject.OpenTextFile (File2, 1, false )
content = CStr(Trim(InStream.ReadLine))
response.write content


%>
<%
newContent="大家好才是真的好！"
Set OutStream= FileObject.CreateTextFile (File2, True)
OutStream.WriteLine(newContent)
%>

不错，支持！！！！！！！！！！

-------------------------------------------------
现108网址站免费收录各种网站，详细请看
http://www.108.hk/
或
http://bbs.108.hk/

108网址站，要您发网址站，做中国最好用的网址大全！

欢迎各大站长前来交换练接！

108网址站现有免费超酷二极域名申请，还带域名证书，还可设置三给域名.....`

是否还在为您的主页地址太长难记而发愁？

在这里您可以免费申请到以108.hk为后缀的域名！

您的http://xiaoxiao.home.chinaren.com/index.html马上就可以变为www.xxx.108.hk或xxx.108.hk!

同时你还可以在xxx.108.hk下添加次级域名!

申请二级域名地址：

http://my.108.hk