ASP网站制作之让你的毛病提醒重生动
缺点：正版成本价格贵（盗版就不说了）、不够安全，大多数服务器用windows系统，没有linux安全毛病默许的IIS500-100.asp文件毛病提醒只报到行号，这对我们找毛病仍是很贫苦的本文件是修正后的500-100.asp文件，间接显现堕落行的文本，便于查找毛病
<%@language="VBScript"%>
<%
OptionExplicit
ConstlngMaxFormBytes=200
DimobjASPError,blnErrorWritten,strServername,strServerIP,strRemoteIP
DimstrMethod,lngPos,datNow,strQueryString,strURL
IfResponse.BufferThen
Response.Clear
Response.Status="500InternalServerError"
Response.ContentType="text/html"
Response.Expires=0
EndIf
SetobjASPError=Server.GetLastError
%>
<!DOCTYPEHTMLPUBLIC"-//W3C//DTDHTML3.2Final//EN">
<htmldir=ltr>
<head>
<style>
a:link{font:9pt宋体;color:FF0000}
a:visited{font:9pt宋体;color:#4e4e4e}
</style>
<METANAME="ROBOTS"CONTENT="NOINDEX">
<title>本页没法显现</title>
<METAHTTP-EQUIV="Content-Type"Content="text-html;charset=gb2312">
<METANAME="MS.LOCALE"CONTENT="ZH-CN">
</head>
<script>
functionHomepage(){
<!--
//inrealbits,urlsgetreturnedtoourscriptlikethis:
//res://shdocvw.dll/http_404.htm#http://www.DocURL.com/bar.htm
//FortestinguseDocURL="res://shdocvw.dll/http_404.htm#https://www.microsoft.com/bar.htm"
DocURL=document.URL;
//thisiswherethehttporhttpswillbe,asfoundbysearchingfor://butskippingtheres://
protocolIndex=DocURL.indexOf("://",4);
//thisfindstheendingslashforthedomainserver
serverIndex=DocURL.indexOf("/",protocolIndex+3);
//forthehref,weneedavalidURLtothedomain.Wesearchforthe#symboltofindthebegining
//ofthetrueURL,andadd1toskipit-thisistheBeginURLvalue.WeuseserverIndexastheendmarker.
//urlresult=DocURL.substring(protocolIndex-4,serverIndex);
BeginURL=DocURL.indexOf("#",1)+1;
urlresult=DocURL.substring(BeginURL,serverIndex);
//fordisplay,weneedtoskipafterhttp://,andgotothenextslash
displayresult=DocURL.substring(protocolIndex+3,serverIndex);
document.write(<AHREF="+escape(urlresult)+">+displayresult+"</a>");
}
//-->
</script>
<bodybgcolor="FFFFFF">
<tablewidth="100%"cellpadding="3"cellspacing="5">
<tr>
<tdalign="left"valign="middle"width="360">
<h1style="COLOR:000000;FONT:9pt宋体"><!--Problem-->本页没法显现</h1>
</td>
</tr>
<tr>
<tdwidth="100%"colspan="2">
<fontstyle="COLOR:000000;FONT:9pt宋体">试图会见的网页呈现成绩，没法显现。</font></td>
</tr>
<tr>
<tdwidth="100%"colspan="2">
<fontstyle="COLOR:000000;FONT:9pt宋体">
<hrcolor="#C0C0C0"noshade>
<p>请实验以下办法：</p>
<ul>
<liid="instructionsText1">单击
<ahref="javascript:location.reload()">
革新</a>按钮大概梢候再试。<br>
</li>
<li>翻开
<script>
<!--
if(!((window.navigator.userAgent.indexOf("MSIE")>0)&&(window.navigator.appVersion.charAt(0)=="2")))
{
Homepage();
}
//-->
</script>
主页，然后查找与所需信息相干的链接。</li>
</ul>
<h2style="FONT:9pt宋体;color:000000">HTTP500.100-外部服务器毛病-ASP毛病<br>
Internet信息服务</h2>
<hrcolor="#C0C0C0"noshade>
<p>手艺信息（合用于撑持职员）</p>
<ul>
<li>毛病范例：<br>
<%
DimbakCodepage
bakCodepage=Session.Codepage
Session.Codepage=936
Response.WriteServer.HTMLEncode(objASPError.Category)
IfobjASPError.ASPCode>""ThenResponse.WriteServer.HTMLEncode(","&objASPError.ASPCode)
Response.WriteServer.HTMLEncode("(0x"&Hex(</p>实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同，ASP拥有应用系统所有权，用户拥有使用权，应用系统集中放在ASP的数据中心中，集中管理，分散使用，以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务，实现规模效益。 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标. Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点) 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标. 哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的? 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。 我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。
页:
[1]