设为首页收藏本站

新微赢技术网

 找回密码
 注册
搜索
热搜: 回贴
查看: 38|回复: 2
打印 上一主题 下一主题

asp图片验证代码察看

[复制链接]
跳转到指定楼层
1#
发表于 2010-1-7 03:27:41 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
<%



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)
%>
2#
发表于 2010-1-7 03:27:44 | 只看该作者
不错,支持!!!!!!!!!!
-------------------------------------------------
现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
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

申请友链|小黑屋|最新主题|手机版|新微赢技术网 ( 苏ICP备08020429号 )  

GMT+8, 2024-11-20 02:46 , Processed in 0.095273 second(s), 9 queries , Gzip On, Memcache On.

Powered by xuexi

© 2001-2013 HaiAn.Com.Cn Inc. 寰耽

快速回复 返回顶部 返回列表