ASP Server 对象

ASP Server 对象的作用是访问有关服务器的属性和方法。

实例

探测文件的最后更新时间。

<html>
<body>

<%
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set rs = fs.GetFile(Server.MapPath("/example/aspe/demo_aspe_lastmodified.asp"))
modified = rs.DateLastModified
%>
本文件的最后修改时间是：<%response.write(modified)
Set rs = Nothing
Set fs = Nothing
%>

</body>
</html>

打开并读取某个文本文件

本例会打开文件 "Textfile.txt" 以供读取。

<html>
<body>

<%
Set FS = Server.CreateObject("Scripting.FileSystemObject")
Set RS = FS.OpenTextFile(Server.MapPath("/example/aspe") & "\textfile.txt",1)
While not rs.AtEndOfStream
      Response.Write RS.ReadLine
      Response.Write("<br />")
Wend 
%>

<p>
<a href="/example/aspe/textfile.txt">查看此文本文件</a>
</p>

</body>
</html>

自制的点击计数器

本例可从一个文件中读取一个数字，并在此数字上累加 1，然后将此数写回这个文件。


<%
Set FS=Server.CreateObject("Scripting.FileSystemObject")
Set RS=FS.OpenTextFile(Server.MapPath("/example/aspe/counter.txt"), 1, False)
fcount=RS.ReadLine
RS.Close

fcount=fcount+1

'This code is disabled due to the write access security on our server:
'Set RS=FS.OpenTextFile(Server.MapPath("counter.txt"), 2, False)
'RS.Write fcount
'RS.Close

Set RS=Nothing
Set FS=Nothing

%>
<html>
<body>
<p>
本页已被访问了 <%=fcount%>  次。
</p>
</body>
</html>

Server 对象

ASP Server 对象的作用是访问有关服务器的属性和方法。其属性和方法描述如下：

属性

属性	描述
ScriptTimeout	设置或返回在一段脚本终止前它所能运行时间（秒）的最大值。

方法

方法	描述
CreateObject	创建对象的实例（instance）。
Execute	从另一个 ASP 文件中执行一个 ASP 文件。
GetLastError()	返回可描述已发生错误状态的 ASPError 对象。
HTMLEncode	将 HTML 编码应用到某个指定的字符串。
MapPath	将一个指定的地址映射到一个物理地址。
Transfer	把一个 ASP 文件中创建的所有信息传输到另一个 ASP 文件。
URLEncode	把 URL 编码规则应用到指定的字符串。