ASP网页设计一个收费的邮件列表源程序(二)
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同，ASP拥有应用系统所有权，用户拥有使用权，应用系统集中放在ASP的数据中心中，集中管理，分散使用，以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务，实现规模效益。ShowSource.asp<%@Language=JavaScript%>
<!--#includefile="include/SetGlobals.asp"-->
<%
//getthepagetodisplayfromtheURL
varsPage=""+Request.QueryString("page");
//makesureitsapageweallowthemtoview!
switch(sPage)
{
case"Wider":
case"COM":
case"Handle404":
case"Categories":
case"CategoryPage":
case"Columns":
case"ResultsPage":
case"Date":
case"Contact":
case"Subscribe":
case"MailToList":
break;
default:
Response.Redirect("NaughtyNaughty!");
}
//outputrelevantmetatags
Init("ASPsourceexample");
//outputcommontopofpage
Header(<ahref="work.asp">Work</a>--><ahref="+sPage+.asp">"+sPage+.asp"</a>-->Source,3);
//outputpagecontent
Content();
//outputcommonbottomofpage
Footer();
%>
<%/*standardpageelements*/%>
<!--#includefile="utils/Init.asp"-->
<!--#includefile="utils/Header.asp"-->
<!--#includefile="utils/Footer.asp"-->
<!--#includefile="utils/ShowFile.asp"-->
<%
//============================================
//thecontentofthispage
//============================================
functionContent()
{
Out(<tdwidth="20%"></td>);
Out(<tdwidth="60%">);
//createhandletoFileSystemObject
varoFSO=Server.CreateObject(Scripting.FileSystemObject);
//eachsourcefilethatweshowsourceforcouldhavearelated
//documentationfileforustodisplaybeforeandafterthe
//source.fornow,Iuseagenericheaderandfooterfile.the
//truetellsShowFiletopassthroughanyHTMLtothebrowser.
ShowFile(oFSO,Generic.pre,true,false);
switch(sPage)
{
case"Categories":
case"CategoryPage":
case"Columns":
Out(<p></td>);
}
%>
utils/ShowFile.asp
<%
//haveweadvertizedourmailinglistyet?
varbDoneLink=false;
//============================================
//displaythecontentsofthegivenfile
//============================================
functionShowFile(oFSO,sFile,bPassHTML,bShowName)
{
varForReading=1;
//varForWriting=2;
//varForAppending=8;
//openaspfileforreading
varfFile=oFSO.OpenTextFile(Server.MapPath(sFile),ForReading);
//readentirefilecontentsintovariable
vars=fFile.ReadAll();
if(!bPassHTML)
{
//replace&with&soHTMLdisplayed,notinterpreted
s=s.replace(/&/g,&);
//replace<with<soHTMLdisplayed,notinterpreted
s=s.replace(/</g,<);
//replacenewlinewithHTMLequivalent
s=s.replace(/
/g,<br>);
//replacetabswith3spaces
s=s.replace(/ /g,);
//showfilenameandchangefontcolorforsourcecode
s=<fontcolor="black">+s+</font>;
if(bShowName)
s=<h4>+sFile+</h4>+s;
}
Out(s);
fFile.Close();
}
//============================================
//showasourcefileoutsidethetable
//============================================
functionShowSource(oFSO,sFile,bShowName)
{
//advertizeourmailinglistbeforethefirstsourcefile
if(!bDoneLink)
{
bDoneLink=true;
Out(<p><b>Getinformedwhenthesourcecodebelowchanges!</b><ahref="subscribe.asp">Subscribetoourmailinglist.</a>);
}
Out(</td>);
Out(<tdwidth="20%"></td></tr><tr><tdcolspan=3width="100%"bgcolor="#ff9900">);
//shownewsfile
ShowFile(oFSO,sFile,false,bShowName);
Out(</td></tr><tr><tdwidth="20%"></td>);
Out(<tdwidth="60%">);
}
%>
楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组 从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 代码的可重用性差：由于是面向结构的编程方式，并且混合html，所以可能页面原型修改一点，整个程序都需要修改，更别提代码重用了。 代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。 用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。 弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。
页:
[1]