推薦：用ASP製作餅圖、柱狀圖等我們工作中經常需要將數據轉化成柱狀圖，餅圖等，以方便直觀的分析數據， 這裡給大家介紹一個ASP中製作餅圖、柱狀圖的組件：csDrawGraph，csdgt.zip,因為是組件，所以我們在使用之前需要用REGSV
面向對象的程序設計
隨著程序的設計的複雜性增加，結構化程序設計方法又不夠用了。不夠用的根本原因是代碼重用的時候不方便。面向對象的方法誕生了，它通過繼承來實現比較完善的代碼重用功能。很多學生在應聘工作，面試的時候，常被問及一個問題你來談談什麼是面向對象的程序設計，學生無言，回來問我，這個問題應該怎麼回答。我告訴他，你只要說一句話就夠了面向對象程序設計是對數據的封裝；範式（模板）的程序設計是對算法的封裝。後來再有學生遇到了這個問題，只簡單的一句對答，對方就對這個學生就刮目相看了（學生後來自豪地告訴我的）。為什麼那？因為只有經過徹底的體會和實踐才能提煉出這個精華。
面向對象的設計方法和思想，其實早在70年代初就已經被提出來了。其目的就是：強製程序必須通過函數的方式來操縱數據。這樣實現了數據的封裝，就避免了以前設計方法中的，任何代碼都可以隨便操作數據而因起的BUG，而查找修改這個BUG是非常困難的。那麼你可以說，即使我不使用面向對象，當我想訪問某個數據的時候，我就通過調用函數訪問不就可以了嗎？是的，的確可以，但並不是強制的。人都有惰性，當我想對i 加1的時候，幹嗎非要調用函數呀？算了，直接i 多省事呀。呵呵，正式由於這個懶惰，當程序出BUG的時候，可就不好捉啦。而面向對像是強制性的，從編譯階段就解決了你懶惰的問題。
巧合的是，面向對象的思想，其實和我們的日常生活中處理問題是吻合的。舉例來說，我打算丟掉一個茶杯，怎麼扔那？太簡單了，拿起茶杯，走到垃圾桶，扔！注意分析這個過程，我們是先選一個對象------茶杯，然後向這個對象施加一個動作-扔。每個對象所能施加在它上面的動作是有一定限制的：茶杯，可以被扔，可以被砸，可以用來喝水，可以敲它發出聲音......；一張紙，可以被寫字，可以撕，可以燒......。也就是說，一旦確定了一個對象，則方法也就跟著確定了。我們的日常生活就是如此。但是，大家回想一下我們程序設計和對計算機的操作，卻不是這樣的。拿DOS的操作來說，我要刪除一個文件，方法是在DOS提示符下：c:> del 文件名<回車>。注意看這個過程，動作在前（del），對像在後(文件名),和麵向對象的方法正好順序相反。那麼只是一個順序的問題，會帶來什麼影響那？呵呵，大家一定看到過這個現象：File not found. 啊~~~，我錯了，我錯了，文件名敲錯了一個字母，於是重新輸入：c:> del 文件名2<回車>。不幸又發生了，計算機報告：File read only. 哈哈，痛苦吧:)。所以DOS的操作其實是違反我們日常生活中的習慣的（當然，以前誰也沒有提出過異議），而現在由於使用了面向對象的設計，那麼這些問題，就在編譯的時候解決了，而不是在運行的時候。 obj.fun()，對於這條語句，無論是對象，還是函數，如果你輸入有問題，那麼都會在編譯的時候報告出來，方便你修改，而不是在執行的時候出錯，害的你到處去捉蟲子。
同時，面向對象又能解決代碼重用的問題-繼承。我以前寫了一個狗的類，屬性有（變量）：有毛、4條腿、有翹著的尾巴（耷拉著尾巴的那是狼）、鼻子很靈敏、喜歡吃肉骨頭......方法有（函數）：能跑、能聞、汪汪叫......如果它去抓耗子，人家叫它多管閒事。好了，狗這個類寫好了。但在我實際的生活中，我家養的這條狗和我以前寫的這個狗類非常相似，只有一點點的不同，就是我的這條狗，它是：捲毛而且長長的，鼻子小，嘴小......。於是，我派生一個新的類型，叫哈巴狗類在狗類的基礎上，加上新的特性。好了，程序寫完了，並且是重用了以前的正確的代碼-這就是面向對象程序設計的好處。我的成功只是站在了巨人的肩膀上。當然，如果你使用VC的話，重用最多的代碼就是MFC的類庫。
============================================================
OK，那麼看看我們如何使用ASP的。
大家一般都是使用IIS的默認腳本語言VbScript作為ASP的服務器端執行語言的，在起初基本都是將該VBS腳本和HTML摻合在一起，實現著某些功能。比如需要在當前頁顯示最新的5條記錄了，就可以這樣。
1、先定義數據庫的連接，如：
| 以下為引用的內容： db_path = ../database/cnbruce2005.mdb Set conn= Server.CreateObject(ADODB.Connection) connstr = Provider=Microsoft.Jet.OLEDB.4.0;Data Source=&Server.MapPath(db_path) conn.Open connstr |
2、然後建立數據庫記錄集合，提取相關信息
| 以下為引用的內容： Set rs = Server.CreateObject (ADODB.Recordset) sql = Select top 5 * from [news] order by n_id desc rs.Open sql,conn,1,1 |
3、最後通過循環的方法將數據顯示出來
| 以下為引用的內容： do while not rs.eof response.write rs(n_title) rs.movenext loop '還有最後的關閉和釋放操作 rs.close set rs=nothing |
那麼就是在response.write rs(n_title) 這裡，為了最終的網頁設計的需要，在它的前前後後，估計還是需要加入一些其他的HTML標籤元素的。於是很自然的，VBS腳本和HTML摻合了。
再來看，如果說有很多頁都需要顯示這5條記錄，那是不是每個頁都要這樣去設置，當然最主要的只是每個頁的設計樣子不同。那這就是重複。重複在那裡？那裡可以不要重複？
1、針對數據庫的連接，都直接建立了一個數據庫連接文件conn.asp，內容即如上。
2、那麼只要是需要使用數據庫的，需要建立連接的，直接包含引用該數據庫連接文件，即可了事。
<!--#include file=conn.asp-->
那麼上面是省去的什麼重複？每次數據庫連接的重複。這是對於通用的某些共用的代碼的防重複。接著來看，如果說我要這個頁面顯示5條，那個頁面顯示6條，又該如何？很顯然，這只能是對當前頁中的SQL語句進行簡單的修改，比如原來是top 5 的修改為top 6。
OK，繼續看，是不是還有重複？有，除了SQL查詢定義的不同，其他的都是重複。
於是，繼續想辦法：可不可以自己來定義提取的條數？就是我想提取幾條就幾條，但程序只需要寫一個。那麼這時候，函數的就派上用場了啊。比如我定義這樣的函數：
| 以下為引用的內容： Function topnews(tnum) Set rs = Server.CreateObject (ADODB.Recordset) sql = Select top &tnum& * from [news] order by n_id desc rs.Open sql,conn,1,1 do while not rs.eof response.write rs(n_title) rs.movenext loop rs.close set rs=nothing End Function |
那麼，就可以使用topnews(5) 或者topnews(6) 來完成需要了
……咋一看，似乎ASP用上函數這就算最終的完成了。因為主要的程序功能做成了函數模塊，需要在前台頁面使用該功能時，直接調用一下，必要時修改下函數參數值就是一個完美的結局/。
那麼，ASP中怎麼又引入了類？這類是什麼？又是如何應用？
在ASP的腳本語言中，VBscript裡有個Class關鍵字，用它可來聲明一個自定義類。比如
| 以下為引用的內容： Class name statements End Class |
這裡statements裡可以聲明公有或私有的成員，包括函數、成員和屬性。
而Javascript則是用一個函數來聲明類，然後在該函數里通過this.prototype 定義屬性，this.func 定義方法。
哪個簡單揀哪個。在定義了類也就是class 的名稱name 後，這裡面可以做些什麼東西呢？
第一個。 MSDN文檔：在Visual Basic 6.0 中，在創建和毀壞類模塊時，類模塊使用Initialize 和Terminate 事件來執行所有必要的操作。當在New 語句之後第一次遇到對象時，會引發Initialize 事件，當釋放對象的最後一個引用時，會立即引發Terminate 事件。但是，可在執行期間隨時直接調用這些事件方法。
所以經常會看到這樣的例子：
Class cnbruce '聲明一個名為cnbruce的類
| 以下為引用的內容： Private cnrose Private Sub Class_Initialize cnrose=My Name is cnrose. End Sub Private Sub Class_Terminate() End Sub End Class |
喏，這也就是一個初始化。
此外，asp類中具有let和get方法。比如在以上代碼的Class cnbruce ... End Class之間加入：
| 以下為引用的內容： Public Property get YName YName=cnrose End Property |
即變成了：
Class cnbruce '聲明一個名為cnbruce的類
| 以下為引用的內容： Private cnrose Private Sub Class_Initialize cnrose=My Name is cnrose. End Sub Private Sub Class_Terminate() End Sub Public Property get YName YName=cnrose End Property End Class |
那麼如何將該值提取呢，比如
| 以下為引用的內容： Set aaa=New cnbruce response.write aaa.YName |
注意aaa.YName已經有些感覺了。 aaa即為定義為cnbruce類的對象，最終輸出顯示為該類對像中的YName get值，其值內容為變量cnrose的值，並且該值已經被初始化，所以，最終的結果是My Name is cnrose.
這是get ，直接提取已經封裝好的類的內部的東西，那麼let 呢？即是外部對類的交互訪問操作。比如我現在外部定義的值應用到類中。即先定義：
| 以下為引用的內容： public property let MName(nnn) cnrose=nnn end property |
它的意思很簡單，參數nnn的值將隨著外部不同的值而賦到變量cnrose上。那麼OK結合上的程式，即最中輸出顯示的內容，也就是顯示的變量cnrose的內容，不是初始化的內容，而是由let 外部應用的不定值。那如何應用let 呢。
aaa.MName=sdasdasd
直接定義值就可以了。那麼現在看看全部程序：
| 以下為引用的內容： <% Class cnbruce Private cnrose Private Sub Class_Initialize cnrose=My Name is cnrose. End Sub Public Property get YName YName=cnrose End Property public property let MName(nnn) cnrose=nnn end property End Class Set aaa=New cnbruce aaa.MName=hahahoho response.write aaa.YName %> |
雖然定義的是aaa.MName的值為hahahoho，但根據public property let MName(nnn)，其值到變量cnrose，SO在輸出aaa.YName的時候，根據Public Property get YName，結果的值是什麼也就不奇怪了。 /
至於功能型的程式，則在類中定義為函數Function，或者子程序Sub 了。
SO，總的說來，就只是功能的封裝，以及在應用的時候好寫好看（直接類名.方法、類名.屬性-_-!），但不要指望它像Java 或.Net那樣具有面向對象的思想服務。
時間有限，虎頭蛇尾將就一下了。
分享：利用ASP將HTML格式數據傳輸給Excel 的技巧學習如何建立ASP頁面將HTML數據流傳送到Execl電子表格，並且在IE中顯示Execl電子表格。到目前為止，有好幾種方法可以使用ASP技術來創立Excel數據表格，你還可以利用服務器端Excel 8.0 VBA組