ASP网页设计ASP进阶教程Ⅱ：一个复杂的留言簿
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来；从本章入手下手我们将由一个复杂的，使用文件贮存会见留言的留言簿程序进进我们的教程。编写如许一个留言簿，我们大抵能够从以下三个步骤来完成。
步骤一：先计划一个留言表单的网页（如：guestbook1.asp，这不必我在这儿说教了吧？)。见下图：
步骤二：在计划好留言表单后，我们入手下手举行编写处置留言的ASP程序。
我们要编写处置留言的ASP程序，最主要的成绩是怎样完成存取留言。而在ASP程序中，要存取文件，我们必需创建FileSystemObject工具（该工具次要用于读取Unicode或ASCII码的文件）。而要创建FileSystemObject工具，我们又可使用以下的语句：
SET工具实例=CREATEOBJECT（"SCRIPTING.FILESYSTEMOBJECT")
FileSystemObject工具的办法包含：CreateTextFile和OpenTextFile：
CreateTextFile：创建一个文件称号，并前往一个TextStream工具供应你读写文件
OpenTextFile：翻开一个已存在的文件并创建一个TextStream工具以供你读写文件在创建并翻开一个可供编纂的文件后，我们最初能够挪用TextStream工具下的办法WriteLine(把信息写进到已翻开的文件中并换行)和办法ReadLine(读取已翻开文件的一行信息)来存取文件。
因而，要完成存取留言的ASP程序，我们能够大抵构想以下：
先创建FileSystemObject工具；然后经由过程该工具来挪用OpenTextFile翻开文件大概挪用CreateTextFile来创立新的文件，创建TextStream工具；最初我们再举行挪用TextStream工具的WriteLine和ReadLine举行存取文件。办理了这个次要成绩后，我们能够将处置留言的ASP程序写成以下所示：
<%
Name=Request("Name"))
Email=Request("Email")
Subject=Request("Subject")
Memo=Request("Memo")
从留言表单获得数据
IfName=""OrEmail=""OrSubject=""OrMemo=""Then
Response.Write"输出框不克不及为空缺!"
Response.End
EndIf
反省表单的各输出框是不是有信息输出，若留有空输出框没填则显现申明信息："输出框不克不及为空缺!"并中断实行上面的程序。?
Line1="留言人："&Name
Line1=Line1&String(5," ")
Email="<AHREF=mailto:"&Email&">"&Email&"</A>"
Line1=Line1&"Email？"&Email&"<BR>"
Line2="主题："&Subject&"<BR>"
Memo=Replace(Memo,vbCrLf,"<BR>")
Line3="<TABLEBORDER=1><TR><TD>"
Line3=Line3&"您的留言："&Memo&"</TD></TR></TABLE>"
Line4="时间："&Now()
界说留言的显现格局，个中留言信息用信息框框起来。
OnErrorResumeNext
制止假如实行上面的ReadAll（读取已翻开文件的全体信息）时，没法读失信息就酿成的程序毛病的情形产生，因而到场此句用于疏忽一切的毛病。
Setfso=Server.CreateObject("Scripting.FileSystemObject")Application.Lock
TxtPath=Server.MapPath("book1.txt")
NewPath=Server.MapPath("newbook.txt")
fso.MoveFileTxtPath,NewPath
Setfin=fso.OpenTextFile(NewPath,,True)
Setfout=fso.CreateTextFile(TxtPath)
创建FileSystemObject工具，并锁定Application工具，不让任何两位上彀者同时实行留言操纵，同时创建和翻开一个TextStream工具，指向要对实在行操纵，用于留言纪录的文本book1.txt。
fout.WriteLineLine1
fout.WriteLineLine2
fout.WriteLineLine3
fout.WriteLineLine4
fout.WriteLine"<hr>"
fout.WriteLinefin.ReadAll
把留言表单中的信息分行写进到已翻开的文件中。
fin.Close
fso.DeleteFileNewPath,True
Application.UnLock
Response.Redirect"guestbook1.asp"
封闭并删除gbookold.txt，然后排除Application工具的锁定，再指引客户端扫瞄器到新的Web页面guestbook1.asp。
%>
将上述代码COPY到你的记事本，注重：要记得将一切“<”标记前面多加的空格往失落，然后存成文件manage1.asp。
步骤三：计划留言页面
由于我们要本留言簿的留言显现在留言表单上面，以是我们能够将以下HTML代码COPY到guestbook1.asp的最初面。
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title>您的留言</title>
<linkrel="stylesheet"href="../images/Text.css">
</head>
<bodyTEXT="#000000"BGCOLOR="#FFFFFF"BACKGROUND="b01.jpg">
<h2ALIGN="CENTER">您的留言</h2>
<hrnoshadecolor="red">
<!--#includefile="book1.txt"-->
</body>
</html>
<%Response.End%>
完成上述的一切步骤后，将guestbook1.asp和manage1.asp保留在WEB服务器的可实行假造目次（如：asp/)下，并在扫瞄器顶用HTTP的体例举行扫瞄，如：http://yourcomputername/asp/guestbook1.asp。瞧！就这么复杂，你已有了本人的留言簿了。还不从速尝尝！
写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们) 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。 接下来就不能纸上谈兵了，最好的方法其实是实践。实践，只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好，因为你还没有熟练的能力去综合各种技术，这样只能使你自己越来越迷糊。 学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点: 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。
页:
[1]