精华区文章阅读

发信人: lyl (天马行空), 信区: network
标  题: Re:  懂 ASP的大侠帮忙
发信站: 听涛站 (Tue May  9 12:37:58 2000), 转信

【在 echo (lucky三毛) 的大作中提到: 】
: 【在 yahooboy 的大作中提到: 】
: : 看看这个程序目的是实现故事接龙  就是大家可以为这个故事写接下去的情节
: : 但我看第一个脚本是新建一个文本文件而且是可以覆盖的
: : 第二个脚本事读出这个脚本  那么每次打开这页的时候这个文本文件不是都会被
: : 重建一次，那又如何称的上是接龙呢？而且Action是调用本身所在地页，又是什么意思呢？
: : 是不是应该先调入这个文本文件，然后将脚本另存在一页呢？
: : <%
: : IF NOT Request.Form(“NextLine”)=”” THEN
: : Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)
: : Set MyTextFile=MyFileObject.CreateTextFile(“C:\MyDir\TheStory.txt”,8,TRUE)
:                               ~~~~~~~~~~~~~~~写错了吧，应该OpenTextFile
:         后面的参数true表示如果文件不存在就建立此文件。
         而参数8表示向文件末尾追加。1表示读，2表示写。

: : MyTextFile.WriteLine(Request.Form(“NextLine”))
: : MyTextFile.Close
: : END IF
: : %>
: : <HTML>
: : <HEAD><TITLE>在线故事接龙</TITLE></HEAD>
: : <BODY>
: : <hr>
: : <%
: : Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)
: : Set MyText=MyFileObject.OpenTextFile(“C:\MyDir\TheStory.txt”)
: : WHILE NOT MyTextFile.AtEndOfStream
: : Response.Write(“&nsp;&nsp;”&MyTextFile.Readline)
: : WEND
: : MyTextFile.Close
: : %>
: : <HR>
: : <H3>请输入这个故事的新行：</h3>
: : <Form method=”post” action=”Story.asp”>
: : <input name=”NextLine” Type=Text Size=70>
: : <input type=Submit Value=”确认添加这一句”>
: : </Form>
: : </Body>
: : </HTML>

--
与其相濡以沫，不若相望于江湖。

http://10.23.31.91/iishelp/iis/misc/default.asp
http://10.23.31.91:9999

※ 修改:．lyl 于 May  9 12:38:14 修改本文．[FROM: 匿名天使的家]
※ 来源:．听涛站 cces.net．[FROM: 匿名天使的家]

computer 版 (精华区)