ASP怎么談到應(yīng)用到類的?_ASP教程

      編輯Tag賺U幣
      教程Tag:暫無(wú)Tag,歡迎添加,賺取U幣!

      推薦:用ASP制作餅圖、柱狀圖等
      我們工作中經(jīng)常需要將數(shù)據(jù)轉(zhuǎn)化成柱狀圖,餅圖等,以方便直觀的分析數(shù)據(jù), 這里給大家介紹一個(gè)ASP中制作餅圖、柱狀圖的組件:csDrawGraph,csdgt.zip,因?yàn)槭墙M件,所以我們?cè)谑褂弥靶枰肦EGSV

      面向?qū)ο蟮某绦蛟O(shè)計(jì)

      隨著程序的設(shè)計(jì)的復(fù)雜性增加,結(jié)構(gòu)化程序設(shè)計(jì)方法又不夠用了。不夠用的根本原因是“代碼重用”的時(shí)候不方便。面向?qū)ο蟮姆椒ㄕQ生了,它通過(guò)繼承來(lái)實(shí)現(xiàn)比較完善的代碼重用功能。很多學(xué)生在應(yīng)聘工作,面試的時(shí)候,常被問(wèn)及一個(gè)問(wèn)題“你來(lái)談?wù)勈裁词敲嫦驅(qū)ο蟮某绦蛟O(shè)計(jì)”,學(xué)生無(wú)言,回來(lái)問(wèn)我,這個(gè)問(wèn)題應(yīng)該怎么回答。我告訴他,你只要說(shuō)一句話就夠了“面向?qū)ο蟪绦蛟O(shè)計(jì)是對(duì)數(shù)據(jù)的封裝;范式(模板)的程序設(shè)計(jì)是對(duì)算法的封裝。”后來(lái)再有學(xué)生遇到了這個(gè)問(wèn)題,只簡(jiǎn)單的一句對(duì)答,對(duì)方就對(duì)這個(gè)學(xué)生就刮目相看了(學(xué)生后來(lái)自豪地告訴我的)。為什么那?因?yàn)橹挥薪?jīng)過(guò)徹底的體會(huì)和實(shí)踐才能提煉出這個(gè)精華。

      面向?qū)ο蟮脑O(shè)計(jì)方法和思想,其實(shí)早在70年代初就已經(jīng)被提出來(lái)了。其目的就是:強(qiáng)制程序必須通過(guò)函數(shù)的方式來(lái)操縱數(shù)據(jù)。這樣實(shí)現(xiàn)了數(shù)據(jù)的封裝,就避免了以前設(shè)計(jì)方法中的,任何代碼都可以隨便操作數(shù)據(jù)而因起的BUG,而查找修改這個(gè)BUG是非常困難的。那么你可以說(shuō),即使我不使用面向?qū)ο螅?dāng)我想訪問(wèn)某個(gè)數(shù)據(jù)的時(shí)候,我就通過(guò)調(diào)用函數(shù)訪問(wèn)不就可以了嗎?是的,的確可以,但并不是強(qiáng)制的。人都有惰性,當(dāng)我想對(duì) i 加1的時(shí)候,干嗎非要調(diào)用函數(shù)呀?算了,直接i 多省事呀。呵呵,正式由于這個(gè)懶惰,當(dāng)程序出BUG的時(shí)候,可就不好捉啦。而面向?qū)ο笫菑?qiáng)制性的,從編譯階段就解決了你懶惰的問(wèn)題。

      巧合的是,面向?qū)ο蟮乃枷耄鋵?shí)和我們的日常生活中處理問(wèn)題是吻合的。舉例來(lái)說(shuō),我打算丟掉一個(gè)茶杯,怎么扔那?太簡(jiǎn)單了,拿起茶杯,走到垃圾桶,扔!注意分析這個(gè)過(guò)程,我們是先選一個(gè)“對(duì)象”------茶杯,然后向這個(gè)對(duì)象施加一個(gè)動(dòng)作——扔。每個(gè)對(duì)象所能施加在它上面的動(dòng)作是有一定限制的:茶杯,可以被扔,可以被砸,可以用來(lái)喝水,可以敲它發(fā)出聲音......;一張紙,可以被寫字,可以撕,可以燒......。也就是說(shuō),一旦確定了一個(gè)對(duì)象,則方法也就跟著確定了。我們的日常生活就是如此。但是,大家回想一下我們程序設(shè)計(jì)和對(duì)計(jì)算機(jī)的操作,卻不是這樣的。拿DOS的操作來(lái)說(shuō),我要?jiǎng)h除一個(gè)文件,方法是在DOS提示符下:c:> del 文件名<回車>。注意看這個(gè)過(guò)程,動(dòng)作在前(del),對(duì)象在后(文件名),和面向?qū)ο蟮姆椒ㄕ庙樞蛳喾础D敲粗皇且粋(gè)順序的問(wèn)題,會(huì)帶來(lái)什么影響那?呵呵,大家一定看到過(guò)這個(gè)現(xiàn)象:File not found. “啊~~~,我錯(cuò)了,我錯(cuò)了,文件名敲錯(cuò)了一個(gè)字母”,于是重新輸入:c:> del 文件名2<回車>。不幸又發(fā)生了,計(jì)算機(jī)報(bào)告:File read only. 哈哈,痛苦吧:)。所以DOS的操作其實(shí)是違反我們?nèi)粘I钪械牧?xí)慣的(當(dāng)然,以前誰(shuí)也沒(méi)有提出過(guò)異議),而現(xiàn)在由于使用了面向?qū)ο蟮脑O(shè)計(jì),那么這些問(wèn)題,就在編譯的時(shí)候解決了,而不是在運(yùn)行的時(shí)候。obj.fun(),對(duì)于這條語(yǔ)句,無(wú)論是對(duì)象,還是函數(shù),如果你輸入有問(wèn)題,那么都會(huì)在編譯的時(shí)候報(bào)告出來(lái),方便你修改,而不是在執(zhí)行的時(shí)候出錯(cuò),害的你到處去捉蟲子。

      同時(shí),面向?qū)ο笥帜芙鉀Q代碼重用的問(wèn)題——繼承。我以前寫了一個(gè)“狗”的類,屬性有(變量):有毛、4條腿、有翹著的尾巴(耷拉著尾巴的那是狼)、鼻子很靈敏、喜歡吃肉骨頭......方法有(函數(shù)):能跑、能聞、汪汪叫......如果它去抓耗子,人家叫它“多管閑事”。好了,狗這個(gè)類寫好了。但在我實(shí)際的生活中,我家養(yǎng)的這條狗和我以前寫的這個(gè)“狗類”非常相似,只有一點(diǎn)點(diǎn)的不同,就是我的這條狗,它是:卷毛而且長(zhǎng)長(zhǎng)的,鼻子小,嘴小......。于是,我派生一個(gè)新的類型,叫“哈巴狗類”在“狗類”的基礎(chǔ)上,加上新的特性。好了,程序?qū)懲炅耍⑶沂侵赜昧艘郧暗恼_的代碼——這就是面向?qū)ο蟪绦蛟O(shè)計(jì)的好處。我的成功只是站在了巨人的肩膀上。當(dāng)然,如果你使用VC的話,重用最多的代碼就是MFC的類庫(kù)。

      ============================================================

      OK,那么看看我們?nèi)绾问褂肁SP的。

      大家一般都是使用IIS的默認(rèn)腳本語(yǔ)言VbScript作為ASP的服務(wù)器端執(zhí)行語(yǔ)言的,在起初基本都是將該VBS腳本和HTML摻合在一起,實(shí)現(xiàn)著某些功能。比如需要在當(dāng)前頁(yè)顯示最新的5條記錄了,就可以這樣。

      1、先定義數(shù)據(jù)庫(kù)的連接,如:

      以下為引用的內(nèi)容:
      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、然后建立數(shù)據(jù)庫(kù)記錄集合,提取相關(guān)信息

      以下為引用的內(nèi)容:
      Set rs = Server.CreateObject ("ADODB.Recordset")
      sql = "Select top 5 * from [news] order by n_id desc"
      rs.Open sql,conn,1,1

      3、最后通過(guò)循環(huán)的方法將數(shù)據(jù)顯示出來(lái)

      以下為引用的內(nèi)容:
      do while not rs.eof
      response.write rs("n_title")
      rs.movenext
      loop
      '還有最后的關(guān)閉和釋放操作
      rs.close
      set rs=nothing

      那么就是在 response.write rs("n_title") 這里,為了最終的網(wǎng)頁(yè)設(shè)計(jì)的需要,在它的前前后后,估計(jì)還是需要加入一些其他的HTML標(biāo)簽元素的。于是很自然的,VBS腳本和HTML摻合了。

      再來(lái)看,如果說(shuō)有很多頁(yè)都需要顯示這5條記錄,那是不是每個(gè)頁(yè)都要這樣去設(shè)置,當(dāng)然最主要的只是每個(gè)頁(yè)的設(shè)計(jì)樣子不同。那這就是重復(fù)。重復(fù)在那里?那里可以不要重復(fù)?

      1、針對(duì)數(shù)據(jù)庫(kù)的連接,都直接建立了一個(gè)數(shù)據(jù)庫(kù)連接文件conn.asp,內(nèi)容即如上。

      2、那么只要是需要使用數(shù)據(jù)庫(kù)的,需要建立連接的,直接包含引用該數(shù)據(jù)庫(kù)連接文件,即可了事。

      <!--#include file="conn.asp"-->

      那么上面是省去的什么重復(fù)?每次數(shù)據(jù)庫(kù)連接的重復(fù)。這是對(duì)于通用的某些共用的代碼的防重復(fù)。接著來(lái)看,如果說(shuō)我要這個(gè)頁(yè)面顯示5條,那個(gè)頁(yè)面顯示6條,又該如何?很顯然,這只能是對(duì)當(dāng)前頁(yè)中的SQL語(yǔ)句進(jìn)行簡(jiǎn)單的修改,比如原來(lái)是 top 5 的修改為 top 6。

      OK,繼續(xù)看,是不是還有重復(fù)?有,除了SQL查詢定義的不同,其他的都是重復(fù)。

      于是,繼續(xù)想辦法:可不可以自己來(lái)定義提取的條數(shù)?就是我想提取幾條就幾條,但程序只需要寫一個(gè)。那么這時(shí)候,函數(shù)的就派上用場(chǎng)了啊。比如我定義這樣的函數(shù):

      以下為引用的內(nèi)容:

      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) 來(lái)完成需要了

      ……咋一看,似乎ASP用上函數(shù)這就算最終的完成了。因?yàn)橹饕某绦蚬δ茏龀闪撕瘮?shù)模塊,需要在前臺(tái)頁(yè)面使用該功能時(shí),直接調(diào)用一下,必要時(shí)修改下函數(shù)參數(shù)值就是一個(gè)完美的結(jié)局/。

      那么,ASP中怎么又引入了類?這類是什么?又是如何應(yīng)用?

      在ASP的腳本語(yǔ)言中,VBscript里有個(gè)Class關(guān)鍵字,用它可來(lái)聲明一個(gè)自定義類。比如

      以下為引用的內(nèi)容:
      Class name
       statements
      End Class

      這里statements里可以聲明公有或私有的成員,包括函數(shù)、成員和屬性。

      而Javascript則是用一個(gè)函數(shù)來(lái)“聲明”類,然后在該函數(shù)里通過(guò) this.prototype 定義屬性,this.func 定義方法。

      哪個(gè)簡(jiǎn)單揀哪個(gè)。在定義了 類也就是 class 的名稱 name 后,這里面可以做些什么東西呢?

      第一個(gè)。MSDN文檔:在 Visual Basic 6.0 中,在創(chuàng)建和毀壞類模塊時(shí),類模塊使用 Initialize 和 Terminate 事件來(lái)執(zhí)行所有必要的操作。當(dāng)在 New 語(yǔ)句之后第一次遇到對(duì)象時(shí),會(huì)引發(fā) Initialize 事件,當(dāng)釋放對(duì)象的最后一個(gè)引用時(shí),會(huì)立即引發(fā) Terminate 事件。但是,可在執(zhí)行期間隨時(shí)直接調(diào)用這些事件方法。

      所以經(jīng)常會(huì)看到這樣的例子:

      Class cnbruce '聲明一個(gè)名為cnbruce的類

      以下為引用的內(nèi)容:

      Private cnrose
      Private Sub Class_Initialize
      cnrose="My Name is cnrose."
      End Sub

      Private Sub Class_Terminate()
      End Sub

      End Class

      喏,這也就是一個(gè)初始化。

      此外,asp類中具有l(wèi)et和get方法。比如在 以上代碼的Class cnbruce ... End Class之間加入:

      以下為引用的內(nèi)容:
      Public Property get YName
      YName=cnrose
      End Property

      即變成了:

      Class cnbruce '聲明一個(gè)名為cnbruce的類

      以下為引用的內(nèi)容:

      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

      那么如何將該值提取呢,比如

      以下為引用的內(nèi)容:
      Set aaa=New cnbruce
      response.write aaa.YName

      注意aaa.YName已經(jīng)有些感覺(jué)了。aaa即為定義為cnbruce類的對(duì)象,最終輸出顯示為該類對(duì)象中的YName get值,其值內(nèi)容為 變量cnrose的值,并且該值已經(jīng)被初始化,所以,最終的結(jié)果是“My Name is cnrose.”

      這是 get ,直接提取已經(jīng)封裝好的類的內(nèi)部的東西,那么 let 呢?即是外部對(duì)類的交互訪問(wèn)操作。比如我現(xiàn)在外部定義的值應(yīng)用到類中。即先定義:

      以下為引用的內(nèi)容:
      public property let MName(nnn)
      cnrose=nnn
      end property

      它的意思很簡(jiǎn)單,參數(shù)nnn的值將隨著外部不同的值而賦到變量cnrose上。那么OK結(jié)合上的程式,即最中輸出顯示的內(nèi)容,也就是顯示的變量cnrose的內(nèi)容,不是初始化的內(nèi)容,而是由let 外部應(yīng)用的不定值。那如何應(yīng)用let 呢。

      aaa.MName="sdasdasd"

      直接定義值就可以了。那么現(xiàn)在看看全部程序:

      以下為引用的內(nèi)容:

      <%
      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",但根據(jù)public property let MName(nnn),其值到變量cnrose,SO在輸出aaa.YName的時(shí)候,根據(jù)Public Property get YName,結(jié)果的值是什么也就不奇怪了。/

      至于功能型的程式,則在類中定義為 函數(shù) Function,或者子程序 Sub 了。

      SO,總的說(shuō)來(lái),就只是功能的封裝,以及在應(yīng)用的時(shí)候好寫好看(直接 類名.方法、類名.屬性-_-!),但不要指望它像Java 或.Net那樣具有面向?qū)ο蟮乃枷敕⻊?wù)。

      時(shí)間有限,虎頭蛇尾將就一下了。

      分享:利用ASP將HTML格式數(shù)據(jù)傳輸給Excel 的技巧
      學(xué)習(xí)如何建立ASP頁(yè)面將HTML數(shù)據(jù)流傳送到Execl電子表格,并且在IE中顯示Execl電子表格。 到目前為止,有好幾種方法可以使用ASP技術(shù)來(lái)創(chuàng)立Excel數(shù)據(jù)表格,你還可以利用服務(wù)器端Excel 8.0 VBA組

      來(lái)源:模板無(wú)憂//所屬分類:ASP教程/更新時(shí)間:2008-08-22
      相關(guān)ASP教程