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

最新下载

热门教程

故事接龙4 post.asp

时间:2022-07-02 23:34:39 编辑:袖梨 来源:一聚教程网

<%@ Language=VBScript %>
>




<%
'该变量取得当前发表的故事是第几章
dim xchapter
strfilename=server.MapPath("story.txt")
set conlink=server.CreateObject("MSWC.NextLink")
ith=conlink.GetListCount("story.txt")
if cint(ith)>0 then
    '根据链接文件story.txt中的链接数确定当前要发表的是第几章
    xchapter=cint(ith)+1
else
    xchapter=1
end if
%>


欢迎加入故事接龙    
题目


第<%=xchapter%>章 


作 者 


以下写入续接的故事内容


     


 






热门栏目