一聚教程网：一个值得你收藏的教程网站

ps教程 | flash教程 | 路由器设置 | Jsp教程 | 加入收藏

PHP教程 Css教程 操作系统 数据库

首页 php教程 asp.net教程 css教程 网页制作 网页特效 手机开发 办公数码
当前位置：一聚教程网 > asp教程 > 高级应用

推荐专题

最新下载

热门教程

故事接龙5 readnew.asp

时间：2008-01-18 编辑：简简单单 来源：一聚教程网

<%@ Language=VBScript %>
>





<%
Response.Write "阅读新章节
"
set conlink=server.CreateObject("MSWC.NextLink")
set fsys=server.CreateObject("scripting.filesystemobject")
if fsys.FileExists(server.MapPath("/project4_local") & "/new1/new.txt") then
    ith=conlink.GetListCount("new1/new.txt")
    for i=1 to cint(ith)
        Response.Write ""
        Response.Write    "" & conlink.GetNthDescription("new1/new.txt",i) & "
"
    next
else
    Response.Write "目前还没有新文章"
end if
%>



加入你的评论意见






相关文章

热门栏目

一聚教程网| 关于我们| 联系我们| 广告合作| 友情链接| 版权声明

copyRight@2007-2024 www.111COM.NET AII Right Reserved 苏ICP备17065847号-2

网站内容来自网络整理或网友投稿如有侵权行为请邮件:yijucomnet@163.com 我们24小时内处理