ASP編程中15個非常有用的例子

　　如何用Asp判斷你的網站的虛擬物理路徑
　　
　　答使用Mappath方法
　　
　　<p align=center><font size= face=Arial><b>
　　The Physical path to this virtual website is:
　　</b></font>
　　<font color=#FF size= face=Arial>
　　<%= ServerMapPath(\)%>
　　</font></p>
　　
　　我如何知道使用者所用的浏覽器？
　　
　　答使用the Request object方法
　　
　　strBrowser=RequestServerVariables(HTTP_USER_AGENT)
　　If Instr(strBrowserMSIE) <> Then
　　Responseredirect()
　　Else
　　Responseredirect()
　　End If
　　
　　如何計算每天的平均反復訪問人數
　　
　　答解決方法
　　
　　<% startdate=DateDiff(dNow//)
　　
　　if strdate< then startdate=startdate*
　　
　　avgvpd=Int((usercnt)/startdate) %>
　　
　　顯示結果
　　
　　<% responsewrite(avgvpd) %>
　　
　　that is itthis page have been viewed since November
　　
　　如何顯示隨機圖象
　　
　　答
　　
　　〈% dim pppicdpic
　　
　　ppic=
　　
　　randomize
　　
　　p=Int((ppic*rnd)+)
　　
　　dpic=graphix/randompics/&p&gif
　　
　　%>
　　
　　顯示
　　
　　〈img src=<%=dpic%>>>
　　
　　如何回到先前的頁面
　　
　　答
　　<a <%=requestserverVariables(Http_REFERER)%>>preivous page</a>
　　
　　或用圖片如
　　
　　<img src=arrowbackgif alt=<%=requestserverVariables(HTTP_REFERER)%>>
　　
　　如何確定對方的IP地址
　　
　　答
　　
　　〈%=RequestserverVariables(REMOTE_ADDR)%>
　　
　　如何鏈結到一副圖片上
　　
　　<% @Languages=vbscript %>
　　
　　<% responseexpires=
　　
　　strimagename=graphix/errors/erroriamgegif
　　
　　responseredirect(strimagename)
　　
　　%>
　　
　　強迫輸入密碼對話框
　　
　　答把這句話放載頁面的開頭
　　
　　<% responsestatus= not Authorized
　　
　　responseend
　　
　　%>
　　
　　如何傳遞變量從一頁到另一頁
　　
　　答用HIDDEN類型來傳遞變量
　　
　　<% form method=post action=mynextpageasp>
　　
　　<% for each item in requestform %>
　　
　　<input namee=<%=item%> type=HIDDEN
　　
　　value=<%=serverHTMLEncode(Requestform(item)) %>>
　　
　　<% next %>
　　
　　</form>
　　
　　為何我在asp程序內使用msgbox程序出錯說沒有權限
　　
　　答由於asp是服務器運行的如果可以在服務器顯示一個對話框那 麼你只好等有人按了確定之後你的程序才能繼續執行而一般服 務器不會有人守著所以微軟不得不禁止這個函數並胡亂告訴你 (:) 呵呵) 沒有權限但是ASP和客戶端腳本結合倒可以顯示一個對話框 as follows:
　　
　　<% yourVar=測試對話框%>
　　
　　<% script language=javascript>
　　
　　alert(<%=yourvar%>)
　　
　　</script>
　　
　　 有沒有辦法保護自己的源代碼不給人看到
　　
　　答可以去下載一個微軟的Windows Script Encoder它 可以對asp的腳本和客戶端javascript/vbscript腳本進行加密不過客戶端加密後只有ie才能執行服務器端腳本加密後只有服務器上安裝有script engine （裝一個ie就有了）才能執行
　　
　　 怎樣才能將query string從一個asp文件傳送到另一個？
　　
　　答前者文件加入下句 ResponseRedirect(secondasp? & RequestServerVariables(QUERY_STRING))
　　
　　 globalasa文件總是不起作用?
　　
　　只有web目錄設置為web application globalasa才有效並且一個web application的根目錄下 globalasa才有效 IIS可以使用Internet Service Manager設置application setting 怎樣才能使得htm文件如同asp文件一樣可以執行腳本代碼？
　　
　　 怎樣才能使得htm文件如同asp文件一樣可以執行腳本代碼？
　　
　　答Internet Sevices Manager > 選擇default web site >右鼠鍵>菜單屬性〉主目錄> 應用程序設置（Application Setting）> 點擊按鈕 配置> app mapping >點擊按鈕Add > executable browse選擇 \WINNT\SYSTEM\INETSRV\ASPDLL EXTENSION 輸入 htm method exclusions 輸入PUTDELETE 全部確定即可 但是值得注意的是這樣對htm也要由aspdll處理效率將降低
　　
　　 如何注冊組件
　　
　　答有兩種方法
　　
　　第一種方法手工注冊DLL 這種方法從IIs 一直使用到IIs 和其它的Web Server它需要你在命令行方式下 來執行進入到包含有DLL的目錄並輸入 :\\regsvr component_namedll 例如 c:\temp\regsvr AspEmaildll 它會把dll的特定信息注冊入服務器中的注冊表中然後這個組件就可以在服務器上使用了 但是這個方法有一個缺陷當使用這種方法注冊完畢組件後該組件必須要相應的設置NT的匿名 帳號有權限執行這個dll特別是一些組件需要讀取注冊表所以這個注冊組件的方法僅僅是 使用在服務器上沒有MTS的情況下要取消注冊這個dll使用 regsvr /u aspobjectdll example c:\temp\regsvr /u aneiodbcdll
　　
　　第二種方法使用MTS(Microsoft Transaction Server) MTS是IIS 新增特色但是它提供了巨大的改進MTS允許你指定只有有特權的用戶才能夠 訪問組件大大提高了網站服務器上的安全性設置在MTS上注冊組件的步驟如下 I) 打開IIS管理控制台 II) 展開transaction server右鍵單擊pkgs installed然後選擇new package III) 單擊create an empty package IV) 給該包命名 V) 指定administrator帳號或則使用interactive（如果服務器經常是使用administrator 登陸的話） VI) 現在使用右鍵單擊你剛建立的那個包下面展開後的components選擇 new then component VI) 選擇 install new component [b]VII) 找到你的dll文件然後選擇next到完成 要刪除這個對象只要選擇它的圖標然後選擇delete 附注特別要注意第二種方法它是用來調試自己編寫組件的最好方法而不必每次都需要 重新啟動機器了
From:http://tw.wingwit.com/Article/program/net/201311/11469.html