遭遇ASP類的事件設計
我之所以還是要宣揚用mvc來開發asp,只是想讓面向過程的思考方式變成面向對象的思考方式,這個對于任何一種語言的開發員來說都是有好處的。
mvc是個標準模型,asp要實現似乎真的是很困難,但是標準是標準,運用是運用,既然asp要實現這個模型很難,那可以嘗試著將mvc模型變形成適合自己的模型。
“不管白貓黑貓能逮到耗子的就是好貓。”而對于我們開發者來說,不管是什么模型,能正確的指引我們的思路,完美完成項目的模型就是好模型。畢竟用戶最終用是我們的程序而不是我們的模型。
這段時間由于接觸到mvc,也知道了class的運用方式,遭遇到了事件的設計。
其實具體的事件設計方式我也不是很明白,在qq里newskyline跟我說了,asp沒辦法作class的事件,
只能模擬。而我呢。算是為達目的不則手段(寫程序而以)的,認為模擬也好,非模擬也行,只要達到我想要的效果就是好東西。
模擬事件的方式有兩種:
第一種:借用了execute/eval,用一個屬性收取函數名的字符,然后使用execute/eval來運行函數。
如:
obj.ondataupdatestart="checkdata"
其構造為:
public property let ondataupdatestart(byval a_strvalue)
''在此省略了對a_strvalue的一些嚴謹的驗證代碼。
p_strondataupdatestart=a_strvalue
end property
事件是觸發為:
public sub dataupdate()
''...忽略過程...
execute(p_strondataupdatestart & "(參數變量一,參數變量二)")
''...忽略過程...
end sub
稍微提一下execute和eval的不同點。
同樣的“x=y”。execute("x=y")的結果是將y值賦給x,而eval("x=y")則會返回一個boolean值,表示x與y的測試結果,如x等于y則返回true,反之返回false。
第二種:借用函數指針getref,在vbs手冊的解釋上來看就是綁定事件專用的函數。具體解釋如下:
“返回一個指向一過程的引用,此過程可綁定某事件。”
具體運用例子,如:
obj.ondataupdatestart="checkdata"
其構造則改為:
public ondataupdatestart ''其實可以使用get/let模式,想偷懶了,所以直接聲明一個公開變量來傳遞了。
事件觸發則改為:
public sub dataupdate()
''...忽略過程...
set me.ondataupdatestart=getref(ondataupdatestart)
me.ondataupdatestart("參數變量一","參數變量二")
''...忽略過程...
end sub
以上兩種方式可以實現事件綁定,但是,從解釋上來說,我比較推崇第二種,相對于execute/eval來說更為嚴謹一些。
mvc是個標準模型,asp要實現似乎真的是很困難,但是標準是標準,運用是運用,既然asp要實現這個模型很難,那可以嘗試著將mvc模型變形成適合自己的模型。
“不管白貓黑貓能逮到耗子的就是好貓。”而對于我們開發者來說,不管是什么模型,能正確的指引我們的思路,完美完成項目的模型就是好模型。畢竟用戶最終用是我們的程序而不是我們的模型。
這段時間由于接觸到mvc,也知道了class的運用方式,遭遇到了事件的設計。
其實具體的事件設計方式我也不是很明白,在qq里newskyline跟我說了,asp沒辦法作class的事件,
只能模擬。而我呢。算是為達目的不則手段(寫程序而以)的,認為模擬也好,非模擬也行,只要達到我想要的效果就是好東西。
模擬事件的方式有兩種:
第一種:借用了execute/eval,用一個屬性收取函數名的字符,然后使用execute/eval來運行函數。
如:
obj.ondataupdatestart="checkdata"
其構造為:
public property let ondataupdatestart(byval a_strvalue)
''在此省略了對a_strvalue的一些嚴謹的驗證代碼。
p_strondataupdatestart=a_strvalue
end property
事件是觸發為:
public sub dataupdate()
''...忽略過程...
execute(p_strondataupdatestart & "(參數變量一,參數變量二)")
''...忽略過程...
end sub
稍微提一下execute和eval的不同點。
同樣的“x=y”。execute("x=y")的結果是將y值賦給x,而eval("x=y")則會返回一個boolean值,表示x與y的測試結果,如x等于y則返回true,反之返回false。
第二種:借用函數指針getref,在vbs手冊的解釋上來看就是綁定事件專用的函數。具體解釋如下:
“返回一個指向一過程的引用,此過程可綁定某事件。”
具體運用例子,如:
obj.ondataupdatestart="checkdata"
其構造則改為:
public ondataupdatestart ''其實可以使用get/let模式,想偷懶了,所以直接聲明一個公開變量來傳遞了。
事件觸發則改為:
public sub dataupdate()
''...忽略過程...
set me.ondataupdatestart=getref(ondataupdatestart)
me.ondataupdatestart("參數變量一","參數變量二")
''...忽略過程...
end sub
以上兩種方式可以實現事件綁定,但是,從解釋上來說,我比較推崇第二種,相對于execute/eval來說更為嚴謹一些。