【VBScript系列】工厂设计模式【原创】更新于2009年12月2日

zzxxbb112

【VBScript系列经典讲座】 ==定期更新== 【原创】

本次更新 2009年12月2日

【VBS系列讲座 7】== 工厂设计模式 ==


也欢迎大家直接访问我博客主页：http://blog.csdn.net/zzxxbb112

VBS系列讲座	讲座地址
【VBScript基础讲座 01】变量显示声明	http://blog.csdn.net/zzxxbb112/archive/2009/11/08/4787692.aspx
【VBScript基础讲座 02】Function 与 Sub	http://blog.csdn.net/zzxxbb112/archive/2009/11/10/4795908.aspx
【VBScript基础讲座 03】类的组成	http://blog.csdn.net/zzxxbb112/archive/2009/11/13/4805618.aspx
【VBScript基础讲座 04】Dictionary 对象	http://blog.csdn.net/zzxxbb112/archive/2009/11/18/4830732.aspx
【VBScript基础讲座 05】函数指针	http://blog.csdn.net/zzxxbb112/archive/2009/11/22/4853008.aspx
【VBScript基础讲座 06】单例模式	http://blog.csdn.net/zzxxbb112/archive/2009/11/26/4879692.aspx
【VBScript基础讲座 07】工厂设计模式	http://blog.csdn.net/zzxxbb112/archive/2009/12/02/4925633.aspx

如果大家在学习中碰到任何问题，可以直接在博客上进行评论也可以直接EMAIL（zzxxbb112@163.com）

[ 本帖最后由 zzxxbb112 于 2009-12-2 18:07 编辑 ]

骄阳似火

学习中，先谢了

commalee

谢谢LZ

dulein

顶顶顶~！正是想学习的，谢谢~！

TerryLin

一片空白啊

shanxi

了解

你的尝试是对vbs语言的进步一挖掘    希望能更进一步 达到更高的层次。

heqingbluesky

就是把对象实例化后，用字典的方法存贮它的的方法或者属性。

zzxxbb112

Ls您好，感谢您的支持，上一篇是用标志位实现单例没错，这一篇是使用字典实现工厂模式，单例还是原来的实现方法只是我没这些SINGLETON类都写出来，注释都标注着


Select Case sChannelType
            Case "excel"
                '创建一个EXCEL的SINGLETON类
                Set oNewChannel = New ExcelWrapper
            Case "fso"
                '创建一个FSO的SINGLETON类
                Set oNewChannel = New fsoWrapper
            Case "DB"
                '创建一个ADO的SINGLETON类
                Set oNewChannel = New DBWrapper
        End Select

这些NEW的类都是SINGLETON类，这些类才是用上一章的方法实现的单例类，只不过我不写出来了~

shanxi

上一篇 你用标志位实现 单例

这一篇 你又用字典实现单例  混淆着看不清楚你的意图是干嘛

zzxxbb112

2009 .12.2  更新完毕

tomtang

楼主的文章写得很好，佩服。

yujie6832

呵呵，不错的东西，楼主的精神值得鼓励，继续加油~写出更多的好文章