ASP面向?qū)ο缶幊烫接懠氨容^

�牐燗SP是Microsoft于較早期推出的動態(tài)網(wǎng)頁編程技術(shù)，但其結(jié)合ADO對數(shù)據(jù)庫方便快捷的訪問、結(jié)合XML、COM/ActiveX等其它技術(shù) 實現(xiàn)服務(wù)器多層結(jié)構(gòu)的功能使它在今天還有著頑強的生命力，并且依然有著一定的發(fā)展。ASP.Net雖然在架構(gòu)上完全不同于ASP，但它很多內(nèi)建對象也是基 于ASP進(jìn)行擴展的。網(wǎng)上有無數(shù)的介紹ASP的文章，卻鮮有介紹ASP面向?qū)ο笠约芭c其它語言比較的，這也就是我下決心寫這篇文章的原因。
�牐犚驗槭窃缙诘陌姹荆珹SP只提供了很弱的面向?qū)ο蟮慕涌�。眾所周知，ASP的實現(xiàn)語言分為VBScript和JavaScript/JScript： 在VBScript中有Class關(guān)鍵字，可以用來聲明一個自定義類；JavaScript就比較怪，它用一個函數(shù)來“聲明”類，然后在該函數(shù)里通過 this.prototype定義屬性，this.func定義方法。這里將以VBScript為主進(jìn)行討論，VBScript的類聲明是這樣的：
�牐燙lass name
�牐�    statements
�牐燛nd Class
�牐犨@里statements里可以聲明公有或私有的成員，包括函數(shù)、成員和屬性。關(guān)于屬性，不得不贊一下微軟的get和set方法，這個在COM中出現(xiàn) 的理念，直到.Net中一直被沿用下來，個人認(rèn)為對程序員而言，比Java用getProp()、setProp()兩個方法來實現(xiàn)同樣效果要方便直觀得 多。
�牐犗啾戎�下，VBScript中的類與PHP4中的類各有千秋（當(dāng)然跟最新的PHP5沒法比），VBScript中的類保持了VB的不完全面向?qū)ο蟮?“特性”，它僅僅實現(xiàn)了最基本的構(gòu)造/析構(gòu)函數(shù)、成員函數(shù)、變量、屬性，甚至構(gòu)造函數(shù)不能帶參數(shù)。PHP4中則還實現(xiàn)了繼承、函數(shù)重載等類的重要性質(zhì)，也 只有實現(xiàn)了這些，才能稱之為面向?qū)ο�，才有可能為實現(xiàn)多態(tài)提供基礎(chǔ)。但二者均沒有實現(xiàn)類的靜態(tài)（static）成員等功能。盡管可以用其它一些變通達(dá)到同 樣的功效，但從面向?qū)ο蟮乃枷氤霭l(fā)，這都是不徹底的（由于PHP非常靈活，PHP4中可以通過成員函數(shù)的靜態(tài)變量來間接實現(xiàn)類的靜態(tài)變量；而“::”—— 可以實現(xiàn)類的靜態(tài)函數(shù)訪問的操作符——在PHP4中沒有嚴(yán)格檢查。換句話說，所有的成員函數(shù)都可以當(dāng)成靜態(tài)函數(shù)訪問，只要你在該函數(shù)里不使用成員變量就不 會出錯。VBScript根本沒有實現(xiàn)static，只能用Session或Application來實現(xiàn)）。所以在平常的使用中，你可以使用 VBScript的自定義類來封裝一些操作，但不要指望它像C++ / Java / .Net那樣為你的面向?qū)ο笏枷敕��?wù)。
�牐燰BScript同樣發(fā)揚了VB中默認(rèn)的參數(shù)或變量是引用的好風(fēng)格。這樣，盡管Script語言中對類型不敏感，但它還能夠達(dá)到C/C++里指針/引用同樣的功效，完成很多事情。最基本的，比如說用它定義一個列表（List）的節(jié)點類ListNode：
<%
Class ListNode
    Public Content
    Public NextNode

    Private Sub Class_Initialize()
        Content="Node"
        Set NextNode=Nothing
    End Sub
End Class
%>
�牐牶呛�，就這么簡單，但不要感到鄙夷，也不要忘記對變量初始值。VB中也差不多，聲明時加上類型就行了。而使用時：
<%
Set nh=new ListNode
Set nh.NextNode=new ListNode
'其它語句……
'遍歷列表
Set n=nh
While Not n is Nothing
    Response.Write n.Content+"<br />"
    Set n=n.NextNode
Wend
%>
�牐犎绻�不加其它代碼，上面的運行結(jié)果是兩個“node”。VBScript的自定義類和對象也不外如是，只要你掌握基本的概念，對它有一定了解，就再簡單不過了。再次強調(diào)，用Set語句來對對象進(jìn)行賦值，相當(dāng)于Java里的賦值，都是獲得一個引用。這比PHP4里默認(rèn)對象賦值是調(diào)用拷貝構(gòu)造函數(shù)來創(chuàng)建一 個新的對象好多了（甚至連obj=new Obj;這樣的語句都會創(chuàng)建兩個對象！如果你想獲得引用的話，要在等號后變量前顯示地加上&），而似乎PHP5也不想修改PHP4的這種做法。
�牐燗SP中的Session本身是可以儲存對象的，它可以保存基本變量，數(shù)組，自動化對象（Automation Object）等，但在儲存自定義類的對象時會碰到問題。如下面的代碼：
<%
If isempty(Session("node")) Then Set Session("node")=New ListNode
Set n=Session("node")
Response.Write n.Content
%>
�牐犨�是上面的ListNode這個類，這段代碼意圖在一個用戶會話中只保留一個ListNode的對象。所以在用戶第一次訪問該網(wǎng)頁時，會生成ListNode的一個對象，并保存在Session(“node”)中；后面訪問該網(wǎng)頁時，因為Session(“node”)不為空了，所以不會生成一個新的對象，而是到 Session(“node”)中取出保存的對象。理論上應(yīng)該也會輸出100，但是問題來了，ASP一直會報錯：
�牐燤icrosoft VBScript runtime error '800a01b6'
�牐燨bject doesn't support this property or method: 'n.Content'
�牐犛胣.Type也會出錯。同樣的代碼翻譯成PHP，運行卻是可以通過的。為什么？
�牐爞�人分析下來，認(rèn)為Session可以保存對象是沒錯，只是VBScript中類型轉(zhuǎn)換的機制太弱，而且沒有顯式的強制類型轉(zhuǎn)換供用戶使用，無法將 Session(“node”)正確轉(zhuǎn)換為ListNode類型。因為是自定義的類，我們只能在每個頁面中都出現(xiàn)類的定義語句，這樣在ASP看來，每次讀 取這個頁面時，ListNode類都是一個新類，所以就不認(rèn)得Session中的這個類的對象了。
�牐牻Y(jié)論：盡量不要想到用Session或Application來存儲ASP中自定義類的對象。如果確實需要，可以考慮用COM來編寫類，然后在VBScript中用：Set Session("obj") = Server.CreateObject("YourApp.YourClass")來創(chuàng)建一個對象，然后即可實現(xiàn)上面預(yù)想的功能了。