您当前的位置: 首页 > 网站编程 > ASP教程 > 遭遇ASP类的事件设计

遭遇ASP类的事件设计

作者:不详 来源:网络 发布时间: 2011-03-11 10:25 点击:
我之所以还是要宣扬用MVC来开发ASP,只是想让面向过程的思考方式变成面向对象的思考方式,这个对于任何一种语言的开发员来说都是有好处的。 MVC是个标准模型,ASP要实现似乎真的是很困难,但是标准是标准,运用是运用,既然ASP要实现这个模型很难,那可以尝试着将MVC模

遭遇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来说更为严谨一些

分享到:
本文"遭遇ASP类的事件设计"由远航站长收集整理而来,仅供大家学习与参考使用。更多网站制作教程尽在远航站长站。
顶一下
(0)
0%
踩一下
(0)
0%
[点击 次] [返回上一页] [打印]
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
表情:
用户名: 密码: 验证码:
关于本站 - 联系我们 - 网站声明 - 友情连接- 网站地图 - 站点地图 - 返回顶部
Copyright © 2007-2013 www.yhzhan.com(远航站长). All Rights Reserved .
远航站长:为中小站长提供最佳的学习与交流平台,提供网页制作与网站编程等各类网站制作教程.
官方QQ:445490277 网站群:26680406 网站备案号:豫ICP备07500620号-4