ASP编程中15个非常有用的例子

　　<p align="center"><font size="4" face="Arial"><b>
　　The Physical path to this virtual website is:
　　</b></font>
　　<font color="#FF0000" size="6" face="Arial">
　　<%= Server.MapPath("\")%>
　　</font></p>

　　strBrowser=Request.ServerVariables("HTTP_USER_AGENT")
　　If Instr(strBrowser,"MSIE") <> 0 Then
　　Response.redirect("ForMSIEOnly.htm")
　　Else
　　Response.redirect("ForAll.htm")
　　End If

　　<% startdate=DateDiff("d",Now,"01/01/1990")

　　if strdate<0 then startdate=startdate*-1

　　avgvpd=Int((usercnt)/startdate) %>

　　<% response.write(avgvpd) %>

　　that is it.this page have been viewed since November 10,1998

　　〈% dim p,ppic,dpic

　　ppic=12

　　randomize

　　p=Int((ppic*rnd)+1)

　　dpic="graphix/randompics/"&p&".gif"

　　%>

　　〈img src="<%=dpic%>>">

<a href="<%=request.serverVariables("Http_REFERER")%>">preivous page</a>

<img src="arrowback.gif" alt="<%=request.serverVariables("HTTP_REFERER")%>">