|
作者的blog: http://blog.csdn.net/oyiboy/
我之所以還是要宣揚(yáng)用MVC來開發(fā)ASP，只是想讓面向過程的思考方式變成面向?qū)ο蟮乃伎挤绞�，這個對于任何一種語言的開發(fā)員來說都是有好處的。
MVC是個標(biāo)準(zhǔn)模型，ASP要實現(xiàn)似乎真的是很困難，但是標(biāo)準(zhǔn)是標(biāo)準(zhǔn)，運用是運用，既然ASP要實現(xiàn)這個模型很難，那可以嘗試著將MVC模型變形成適合自己的模型。
“不管白貓黑貓能逮到耗子的就是好貓�！倍鴮τ谖覀冮_發(fā)者來說，不管是什么模型，能正確的指引我們的思路，完美完成項目的模型就是好模型。畢竟用戶最終用是我們的程序而不是我們的模型。
這段時間由于接觸到MVC，也知道了Class的運用方式，遭遇到了事件的設(shè)計。
其實具體的事件設(shè)計方式我也不是很明白，在QQ里newskyline跟我說了，ASP沒辦法作Class的事件，
只能模擬。而我呢。算是為達(dá)目的不則手段(寫程序而以)的，認(rèn)為模擬也好，非模擬也行，只要達(dá)到我想要的效果就是好東西。
模擬事件的方式有兩種:
第一種：借用了execute/eval，用一個屬性收取函數(shù)名的字符，然后使用execute/eval來運行函數(shù)。
如：
obj.OnDataUpdateStart="CheckData"
其構(gòu)造為：
public property let OnDataUpdateStart(byval A_strValue)
'在此省略了對A_strValue的一些嚴(yán)謹(jǐn)?shù)尿炞C代碼。
p_strOnDataUpdateStart=A_strValue
end property
事件是觸發(fā)為：
public sub DataUpdate()
'...忽略過程...
execute(p_strOnDataUpdateStart & "(參數(shù)變量一,參數(shù)變量二)")
'...忽略過程...
end sub
稍微提一下execute和eval的不同點。
同樣的“x=y”。execute("x=y")的結(jié)果是將y值賦給x，而eval("x=y")則會返回一個Boolean值，表示x與y的測試結(jié)果，如x等于y則返回true，反之返回false。
第二種：借用函數(shù)指針GetRef，在vbs手冊的解釋上來看就是綁定事件專用的函數(shù)。具體解釋如下：
“返回一個指向一過程的引用，此過程可綁定某事件�！�
具體運用例子，如：
obj.OnDataUpdateStart="CheckData"
其構(gòu)造則改為：
public OnDataUpdateStart '其實可以使用get/let模式，想偷懶了，所以直接聲明一個公開變量來傳遞了。
事件觸發(fā)則改為：
public sub DataUpdate()
'...忽略過程...
set me.OnDataUpdateStart=GetRef(OnDataUpdateStart)
me.OnDataUpdateStart("參數(shù)變量一","參數(shù)變量二")
'...忽略過程...
end sub
以上兩種方式可以實現(xiàn)事件綁定，但是，從解釋上來說，我比較推崇第二種，相對于execute/eval來說更為嚴(yán)謹(jǐn)一些。
經(jīng)典論壇討論帖：
http://www.95time.cn/bbs/NewsDetail.asp?id=2467752
出處：藍(lán)色理想
責(zé)任編輯：moby
◎進(jìn)入論壇網(wǎng)絡(luò)編程版塊參加討論
|
