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"

　%＞