我怎样调用lei类模块，dll等
举个实例！

如何用VB6写COM组件

　　 所幸的是，我们可以用COM组件来在最大程度上扩展ASP的功能。你可知道，任何可以用诸如VB，VC和VJ以及其它的一些程序语言所写出来的东西，都可以被应用到你的网站的开发中去，这就是COM（组件对象模型）。COM能够用来编写能够被ASP所调用的对象。当在VB等编程环境中完成了组件的编制后，就可以放在ASP页面中被ASP所调用了。在这篇文章中，我们将看到如何使用VB6来编写一个COM对象，如何将其注册在服务器上，并在ASP页面中对其进行调用。但在开始之前，让我先来简单的介绍一写关于COM的小知识。 

　　 COM对象通常表现为一个.dll文件，是一个编译好了的可执行程序。这意味着COM的运行速度要比纯ASP代码要快的多。在调用COM对象之前，必须在运行IIS服务器的机器上对其进行注册，而且不能通过ASP代码来注册COM组件，这也就是说你必须有对服务器的使用权限。 

　　 现在来看一看我们要实现的任务：我们需要创建一个组件，当你对它传递一个年份的时候，它能够告诉你这一年是否为闰年。当然，这个任务可以用VBScript来实现的。这儿是用这个简单的例子，只是为了程序的简便起见，从而能够把更多的注意力放在如何创建组件以及如何同ASP进行交互上面。实际上如同上面所说的那样，你可以使用VB的任何功能来创建这个组件。 

　　 首先要做的当然是编写ActiveX dll组建，至于到底如何在ASP中调用它，我们会在后面提及。打开Visual Basic，一个对话框会提示你选择一种新建工程类型，在这儿当然选择“ActiveX DLL”。 

　　 如果工程浏览器没有被打开，可以通过选择菜单栏上面的“视图|工程浏览器”来打开它。如果属性窗口也没有打开，同样的方法，可以打开属性窗口。 

　　 现在在工程浏览器中点击Project1，然后可以在属性窗口中看到工程的name 属性为Project1，把它改为CheckYear。当然如果你很懒的话，你也可保留这些缺省的设置，只需在后边在ASP中调用它的时候，也使用相应的工程名和类名就好了。 

　　 现在在工程中，已经预建了一个缺省的类，你可以按你自己的喜好来重新对其命名。在这儿把类命名为LeapYear。 

　　 在类中填写入如下的代码： 

　　 Option Explicit 

　　 注释：用来判断一个年份是否为闰年的函数 

　　 Public Function IsLeapYear(yr As Variant) As Boolean 

　　 注释：如果年份能够被4整除并且不能被100整除,或者能够被400整除 

　　 注释：那么它就是闰年 

　　 If (yr Mod 4 = 0 And yr Mod 100 < > 0) Or yr Mod 400 = 0 Then 

　　 IsLeapYear = True 

　　 Else 

　　 IsLeapYear = False 

　　 End If 

　　 End Function 

　　 上面就是所需要的全部代码了，其实很简单。下面所要做的，就是把它编译成一个dll文件。在“文件”菜单中选择“建立CheckYear.dll...”，再选择要文件要保存的路径。一般的，可以在在服务器上的InetPub目录下面建一个Server Components目录，专门用来存放所有用于ASP中的组件。但这不是必须的，无论你把dll文件保存在什么地方，在编译的过程中，编译程序都会自动的在系统中对组件进行注册 
　　 如果你的VB和WEB服务器不是在一台电脑上，那么在把dll文件拷贝到服务器上后，如果要让组件能够被使用，就必须手工对其进行注册。 

　　 首先你需要把.dll文件从你开发它的机器上，发送到你的服务器上。一般在www服务器上可以为所有的为ASP写的组件建立一个目录，把那个.dll文件拷贝到那个目录中。比如在InetPUB下建立一个Server Components目录。在完成拷贝后，就可以运行Regsvr32.exe来注册这个组件了。在“开始”菜单中选这“运行”，然后在“运行”对话框中输入regsvr32 和要注册的组件的名称和其完整路径。例如： 

　　 Regsvr32 "C:InetPubServer ComponentsMyComponent.dll" 

　　 就这么简单，在注册成功之后，你会得到一个成功注册的信息。然后，你就可以在ASP页面中引用这个COM对象了。当然，要完成这些你需要有服务器的访问权限，你可以直接在服务器上注册或者通过诸如pcAnywhere之类的软件实现远程注册。 

　　 然后，我们就可以在ASP中调用这个组件了。建立一个ASP页面，并添入下面的代码： 

　　 < % Option Explicit 

　　 Dim oCheckYear 

　　 Dim IsLeapYear 

　　 Dim Year 

　　 Year = 1900 注释：用来检测组件的年份 

　　 注释：建立一个对刚才那个组件的引用 

　　 Set oCheckYear = CreateObject("CheckYear.LeapYear") 

　　注释：调用组件中的IsLeapYear函数,并报存结果 

　　 IsLeapYear = oCheckYear.IsLeapYear(Year) 

　　 注释：清除对组件的引用,好的编程习惯 

　　 Set oCheckYear = Nothing 

　　 % > 

　　 < HTML > 

　　 < HEAD > 

　　 < TITLE >例子< /TITLE > 

　　 < /HEAD > 

　　 < BODY > 

　　 < % 

　　 注释：打印输出 

　　 If IsLeapYear = True Then 

　　 Response.Write "< P >< b >" & Year & "< /b >是闰年< /P >" 

　　 Else 

　　 Response.Write "< P >< b >" & Year & "< /b >不是是闰年< /P >" 

　　 End If 

　　 % > 

　　 < /BODY > 

　　 < /HTML > 

　　 代码很简单，唯一需要解释的，就是在ASP中如何建立对自建对象的引用。它的语法是：CreateObject("Projectname.Classname")。你应该还记得吧，在前面我们把工程命名为CheckYear而把类命名为LeapYear，因而在这儿的语句就是：CreateObject("CheckYear.LeapYear")。一旦你建立了对对象的引用，你就可以在ASP页面中访问其所有的公有元素了。剩下的，就如同调用其它任何ASP内置对象一样简单了。


       以上代码来自： 源代码数据库(SourceDataBase)
           当前版本： 1.0.446
               作者： Shawls
           个人主页： Http://Shawls.Yeah.Net
             E-Mail： ShawFile@163.Net
                 QQ： 9181729

对象组件技术COM+

早在1997年，MICROSOFT已经宣布了COM+的一些概貌，但是在这近两年的时间里，我们一直都不清楚COM+的真正面貌。随着Windows2000的发布，COM+作为融合在操作系统中的组件技术将会在以后越来越被广泛使用。 
COM+并不是COM的简单升级，COM+的底层结构仍然以COM为基础，它几乎包容了COM的所有内容，COM+综合了COM、DCOM和MTS这些技术要素，它把COM组件软件提升到应用层而不再是底层的软件结构，它通过操作系统的各种支持，使组件对象模型建立在应用层上，把所有组件的底层细节留给操作系统，因此，COM+与操作系统的结合更加紧密。 
COM+不再局限于COM的组件技术，它更加注重于分布式网络应用的设计和实现。COM+继承了COM几乎全部的优势，同时又避免了COM实现方面的一些不足，把COM、DCOM和MTS的编程模型结合起来，继承了它们的绝大多数特性，在原有的特性上增加了新的功能： 
如COM+扩充了MTS安全模型，它允许开发人员或管理员指定到方法级的安全控制，通过COM+对象环境信息，使得COM+的安全模型更为有效细致； 
COM+支持MTS的事务语义，不仅可以通过SetAbort或SetComplete完成事务操作，而且COM+还支持BYOT(BringYourOwnTransaction)，即允许COM+组件参与非MTS事务处理环境管理的事务；COM+继承了MTS对象池的概念，并且真正实现了对象池的功能。 
     COM+不仅继承了原有的多数特性，而且还增加了一些服务，比如负载平衡、队列服务、内存数据库、事件服务等。 
      队列服务对于分布式应用非常有意义，特别是在现在网络速度很慢的情况下，这种机制可以保证应用系统能够可靠地运行。在应用系统包含大量节点但服务器又繁忙的情况下，客户应用程序可以把它们的请求放到队列中，当服务器负载比较轻的时候再处理这些请求； 
      又如COM+提供了负载平衡服务，它可以实现动态负载平衡，而且COM+应用程序的负载平衡特性并不需要编写代码来支持，客户程序和组件程序都可以按通常的方式实现。获得负载平衡特性并不是用程序设计的方式来实现的，而是通过配置实现分布式应用程序的负载平衡，如上所讲的队列服务，其实也反映了一种负载平衡。 
      那么，在COM+中怎样来进行管理呢？在COM+中采用了一种称为MMC标准界面环境管理程序。它类似于MTS的管理程序，但并不完全一样，每一个COM+应用可以包括一个或多个COM+组件以及与应用有关的角色信息。通过COM+管理程序，我们可以设置COM+应用和COM+组件的属性信息，比如组件的事务特性、安全特性等等。 
     COM+把大多数的组件信息保存在COM+目录中。COM+目录把COM和MTS的注册模型统一起来，并提供了一个专门针对组件的管理环境。我们既可以通过COM+管理程序检查或设置COM+目录信息，也可以在程序中通过COM+提供的一组COM接口访问COM+目录信息。 
COM+也继承了MTS的安全模型，支持说明性编程模型，也就是说，开发人员可以按尽可能通用的方式开发组件程序，把一些细节留到配置时刻再确定。 
利用COM+的服务和管理工具以及其它开发工具，开发一个COM+组件要比开发一个COM组件容易得多，因为COM+组件本身是建立在COM+系统服务基础上的应用程序，而COM+系统服务本身也满足多层应用的一些基本要求，为应用提供了许多新特性，我们可以直接利用这些系统服务，避免了底层的细节处理，减少开发成本，降低代码量，同时也减小了犯错误的可能性；而且我们也可以通过系统服务来访问底层的系统资源，而不用直接跟底层打交道，使得应用程序更加可靠和健壮；通过COM+系统服务，我们在获得可靠性的同时，也可以使我们的组件或者应用程序更趋于标准化。如下图表示了利用COM组件技术和利用COM+编写组件的一些不同之处： 
         图：利用COM和COM+编写组件的不同之处 
---- COM+推出之后，它的开发模式也会有一些转变，尤其对于C++程序员，在编译时刻程序员可以在代码中使用一些说明性的语句来设置COM+组件的属性，比如CLSID、ProgID、线程模型以及双接口等，如果不指定这些属性，编译器将使用缺省值。而以前我们为了使COM组件支持某些非缺省的特性，我们必须通过编写代码来实现这些特性，所以程序员一定要对各种特性了解得非常清楚才能够编写出正确的代码来，这也是实现COM组件的一个难点。 
      而基于属性的编程模型将直接把COM+组件的属性信息写到C++源代码中，指导编译器产生COM+组件，这样可以使程序员不必编写底层的处理代码，因为这些代码对于几乎所有的组件都差不多，因此让开发工具直接产生这些代码可避免重复劳动，这种方式比MFC的宏以及ATL的模板类来的更为直接。 
    虽然COM+仍然以COM和MTS为底层基础，但是COM+增加了很多新的技术，我们可以利用这些新的技术更快、更方便地来编写组件或应用程序。与COM相比较，COM+与Windows操作系统结合得更为紧密，集成了很多底层的、繁琐的工作；与MTS相比较，COM+更加适合于分布式应用的开发，它提供了许多大型分布式应用系统才可能用到的一些功能，COM+将使得企业应用直接进入分布式应用领域。  


       以上代码来自： 源代码数据库(SourceDataBase)
           当前版本： 1.0.446
               作者： Shawls
           个人主页： Http://Shawls.Yeah.Net
             E-Mail： ShawFile@163.Net
                 QQ： 9181729


面向VB编程人员的COM+综述

面向VB编程人员的COM+综述 
浏览： 2409 次 
概述：COM+ 和 Windows 2000 Server 为开发分布式应用软件提供了一个复杂的基础组织构造。这一篇文章解释并且帮您确定您所需要掌握的关键技术，这些技术将会用来为Windows 2000 Server建造大规模的信息系统。 

　　就这样，一个千年结束了，而另一个千年刚刚开始。这种变化会给您作为职业开发人员的生活带来多少的冲击呢？当然，当所有的闹钟都指向了零时，总会在这儿或哪儿产生一些暂时的波折。一些陈旧过时的系统不得不被送到它们最终应该安息的地方。但是，我们的工业作为一个整体并不会经历像一些媒介预言的那种所谓世界末日的场面。这对我们当中那些想要开发基于近几十年来所开发的操作系统和开发工具上的应用软件的人来说尤其如此。当您回首这一切，您会觉得很好笑。关于您公司的信息系统会崩溃的所有谣言显然是大大的夸张了。 

　　那么，又要问一句，那些新闻媒介真的知道在工业领域所进行的一切吗？他们搞错了一个事实，那就是这只不过是一个百年问题，并不真正是千年虫。这个问题根源就在于我们只使用两个字符表示日期而不是用四个字符。如果人类在一百年前就已经有了同样的技术，那么我们将会在1899的新年之夜面对同样的问题。然而，千年虫听起来更使人觉得耳顺，因此也售出了更多的报纸和杂志。 

　　记得在几年前，新闻界预言所有的东西都将用Java 改写，包括美国宪法和Magna Carta ？现在有关Java 的闹哄哄的声音平息了，我们把Java 看成了一个年轻的和有前景的语言，有其优点和缺点。它并没有席卷整个工业。它只不过是一个在一些环境中适用而在其它环境下却不行的语言。 

　　现在，人人都在讨论XML，把它当成能解救一切的技术。我知道，当XML成熟了，我们会发现它更多的用途。它将解决许多非常难并且也非常现实的问题。但是，XML 永远也不会代替其它技术，例如COM, Corba, and Java, 还有其它人们所知的技术。重要的是，我们应当对所有这些新兴技术抱长远的观点。对一项新技术能解决在今后几年会遇到的难题抱过分乐观的态度是有害的。 


       以上代码来自： 源代码数据库(SourceDataBase)
           当前版本： 1.0.446
               作者： Shawls
           个人主页： Http://Shawls.Yeah.Net
             E-Mail： ShawFile@163.Net
                 QQ： 9181729


DCOM技术谈

软件部件(SoftwareComponent)的应用可使系统维护或开发变得简单易行。但是,由于一直没有 统一的编程语言,原有的程序库也不能轻易移植。因此软件部件的设想一直无法真正实现。Java 语言出现之后,解决了多平台及各种编程语言的不兼容性,软件部件技术才真正用于加快大型型程序的开发进程。 

微软在其ActiveX技术中蕴含了"软件部件"的概念,而且进一步将这种技术拓展为DCOM技术。。DCOM是 原COM技术的延续,主要是增加了远程调用COM部件的功能。另外,由于它结合原来COM中的ActtiveX技术, 使得原有的各种ActiveX部件,也因DCOM的兼容性而变成可被远程调用的部件。 

因为DCOM派生于ActiveX技术,所以它可以支持现有的TCP/IP、HTTP等网络协议,还对Java语蜒约 容。 同时,微软也授权在UNIX、SOLARIS等其他操作系统平台上使用这种技术。 

DCOM的技术特点在于每个程序模块无需存储各客户端,更无需下载程序本身在客户端运行。种 要在 服务器内存放一份DCOM部件,不同地方的用户即可通过网络来访问这一DCOM部件。当然DCOM技 不只是节省了存储空间。而且,使用DCOM部件构成的大型程序,可以把处理相同工作的部分分分割? 来交给一个专门的软件模块完成。而其他程序或其他DCOM部件只需对其进行调用,即可获得需信息。 当程序流程发生变化时,程序员只要对变更的部分进行修改 ,即可同时对其他单位的程序更新,有效地提高了整个系统的灵活性。 
以现在人们谈及最多的2000年计算机时钟问题为例,如果程序是由DCOM部件组成的,那么只需需对期模块进行更改。而其他界面部分由于只是调用日期模块来计算时间差,因此就不会出现这种资料规模制订错误而导致的不便。而资料规模的制订,往往是程序设计中最困难的部分,稍有误便会使程序无法运行。而且,问题还经常在很长一段时间之后才被发现,使得程序难于修正因而,采用DCOM技术设计程序才是解决这类问题的较好方法。 
通过Internet的通用HTTP协议,客户端程序能在极小的投资下达到更大的效益。因为客 只需稍加整理,便能从DCOM部件内调用网络上的众多公用信息。由于DCOM经常会透过网络来创资料,因此系统的安全性则至关重要。目前,Internet上除了提供身份认证以外,还增加了原在NT上使用的调度安全结构,以

COM编程模型上

概述 
如果你用ASP做开发, 你可能已经在你的ASP页面中用过COM了.但是,在你自己开发一个COM部件或阅读一本详细介绍COM的书之前,你很可能并没有完全理解COM,因而不能充分利用它来创建你的ASP页面.同时,你也不能很好的理解那些随COM部件带来的使用文档.如果你知道COM的标准和限制,你就可以很快的学会开发其他的COM部件. 
在这个教程里,我们将学到COM是怎样工作的,你还将学到精通COM的知识. 

本教程的读者 
本教程将给那些已经使用过VBscript 语言的,特别是用过ADO但是不知道那就是COM的人详细描述COM模型.他将告诉你: 

1.属性和方法的区别 
2.属性需要参数吗 
3.只读属性是什么意思 
4.什么是集合对象 
5.每个集合对象都有些什么属性 
6.不调用方法如何对集合排序 
7.在一个DLL中可以有多少个COM部件. 

基础知识 
COM是一个对象接口的标准.定义一个COM对象只需要定义方法和属性,没有其他的接口.从一个程序员的观点来看,属性和方法之间没有太大的区别.方法可以带参数,属性不能.属性可以读写,方法如果要返回值的话,是只读的. 

尽管从编程角度看,属性和方法没有太大的区别,但是部件开发者用他们完成不同的功能.属性通常代表一个对象的状态,但是调用方法可以完成任何想完成的任务,不管他包含对象的状态与否. 

属性 
属性不需要参数,用来描述或设置对象的状态.所有的属性返回一个值,有些属性是只读的,有些是可读可写的.下面是VBscript中读取属性的表达式例: 

例 1: 

value = object.property 


注意这里没有用括号.例二是设置属性例: 

例 2: 

object.property = value 


方法 
方法可以带参数,可以返回值.通常用来初始化一个对象的事件.当给方法传递参数时,方法可以用来设置值.如果方法只返回值,不设置值的话,表达式如下: 

例 3: 

value = object.method() 


注意例3中用了括号.调用方法来返回值时必须用括号.例如,对象Connection有一个Execute方法返回一个Recordset对象.例: 

例 4: 

Set RS = Conn.Execute("SELECT * FROM TABLE") 


不用返回值,不用参数的方法,如Connection对象的Close方法: 

例 5: 

Conn.Close 


参数 
方法可以带一个或多个参数,或一个也不要.但是,参数并不是必需的. 一旦一个参数是可选的,其后的参数都是可选的.例如,参数一和参数二是必需的,参数三是可选的,则参数四必定是可选的.一个很好的例子是Connection对象的Open方法.他有八个可选的参数.前三个用来传递数据库和等录的信息.你可以像例6那样调用Open方法: 

例 6: 

Conn.Open "DSN","sa","" 


为了提供DSN名,用户名,口令为空,你也可以想例7那样调用: 

例 7: 

Conn.Open "driver=SQL Server;server=yourServerName;uid=someUID;" &_ 
"pwd=somePWD;database=someDatabase;" 


注意在例6中我们用了三个参数,在例7中只用了一个,结果是一样的. 

调用方法时,以逗号分隔,让可选的参数空着,将给该参数传递空值, 
在例6中,可选参数用缺省值,在例八中用空值. 

例 8: 

Conn.Open "DSN","sa","", , , , 





       以上代码来自： 源代码数据库(SourceDataBase)
           当前版本： 1.0.446
               作者： Shawls
           个人主页： Http://Shawls.Yeah.Net
             E-Mail： ShawFile@163.Net
                 QQ： 9181729


COM编程模型中

集合 
集合是本身包含了许多对象的对象集,所有的集合都包含一些预定义的方法和属性.一个集合有一个Item方法,一个Count属性,一个 _NewEnum方法.集合有建立类型与他相同的对象的能力.换句话说,如果一个对象可以被包含进一个集合中,那么,哎,这句话好难,我不翻了,给出原文吧.( In other words, if a particular object can be group in a set then that object will have a collection object that can create an instance of an object within the set. For instance, a Drives collection object will contain a set of drives that might represent all the drives on a particular computer). 

Count属性返回一个代表集合中元素个数的长整型值.给Item方法传递一个长整数(当然应在1和Count之间),就返回集合中这个索引所指向的对象.就像数组那样.(原文此处混乱,稍做调整) 

例 9(1): 

Set Object = Collection.Item(2) 

因为Item是缺省方法,所以你也可以如下调用: 

例 9(2): 

Set Object = Collection(2) 



_NewEnum 方法可以反复调用, 

例 9: 

For Each Object in Collection 

Next Object 

(以下不译) 
Notice that the _NewEnum method is not referenced within the syntax of the 
statement in example 6. This is because the _NewEnum method has a special 
index that Visual Basic recognizes as being used for the For Next statement. As a 
little background, all methods and properties in a COM object are indexed and 
certain indexes are used for particular tasks. For example the zero index is used 
for the default method or property. 
The Default Method or Property 
The method or property that has the COM index of zero is called the default 
property. Visual Basic allows the programmer to not use the regular 
method/property syntax when calling the default value, you can leave the 
syntactical call to the method/property off all together. For example, the default 
method in all collections is the Item method. If you where going to call the Item 
method, you could do it like it in example 9. 



为了在ASP中建立一个COM对象,你可以: 

例 11: 

Set Object Server.CreateObject("SMUM.XCheck.1") 


给Server的CreateObject方法只传递了一个参数,就是一个ID值,这是一个由COM部件提供者给出的,唯一地标识一个COM对象的符号.为了创建一个COM对象的实例,你必须知道该对象的ID值. 

有另外一种方法可以获得一个对象的实例,你可以用一个已经存在的对象实例来创建一个新的对象实例,事实上使用集合时就是这样工作的,你调用Item方法,返回了一个对象实例. 

例 12: 

Set Object = Collection.Item(2) 


例11和例12有一点是一样的,那就是都是从别的对象创建对象,区别是,CreateObject可以创建任何类型的对象,而Item只能返回集合中的对象.就像先有鸡,还是先有蛋的问题一样,你可能要问,Server对象又是怎么来的呢?事实上,这是内置对象.他存在于ASP当中. 


内置对象 
ASP中有六个内置对象,他们是: 
Server 
Request 
Response 
ObjectContext 
Application 
Session 
这些对象与其他对象唯一不同的是,不需要创建实例.他们与其他对象表现得一样,有自己的方法和属性.因为他们是内置的,所以你不需知道他们的ID,事实上,你根本不需调用CreateObject去创建他们. 

对象ID 
如果你创建对象的主要方法就是调用 CreateObject 的话,知道对象的ID就非常重要了COM部件提供者在他们的文档里回提供对象的ID的. 




       以上代码来自： 源代码数据库(SourceDataBase)
           当前版本： 1.0.446
               作者： Shawls
           个人主页： Http://Shawls.Yeah.Net
             E-Mail： ShawFile@163.Net
                 QQ： 9181729




COM编程模型下

(以下不译) 
The Documentation 
Now that we have established the understanding between methods and properties 
along with their different attributes, we need to understand how the documentation 
for the objects represents these attributes. For examples, we are going to look at 
15 Seconds' component section, which is in the same format as the IIS 4.0 
component documentation. 
Read and Write Properties 
A good example of a read/write property is that of the PhoneTranslate property of 
the XCheck object, shown here in example 11: 

Example 13 
object.PhoneTranslate[= value] 
Notice the value syntax, this is the indication of a property that can be written to. 
The brackets denote that the property is optional, in other words you do not need 
to set the property to use the object. Click here to view the full documentation. 
Read Only Properties 
A good example of a read only property is the Expires property of the ASPMail 
object. 

Example 14 
object.Expires 
Notice that unlike example 11 there is not an equal symbol, indicating this is read 
only. Click here to view the full documentation. 
Optional Method Arguments 
A good example of the optional arguments is the SendX method of the OCXMail 
object. The documentation syntax can be seen here in example 12: 

Example 12 
object.SendX(mailserver[, fromName[, fromAddress[, priority[, 
returnReceipt[, toAddressList[, ccAddressList[, bccAddressList[, 
attach[, messageSubject[, messageText]]]]]]]]]]) 
Notice that the only required argument is the mailserver argument. All the rest, 
noted by the brackets are optional. Click here to view the full documentation. 
Summary 
With a fundamental understanding of COM and it's abilities, coupled with good 
documentation you can expand the flexibility of your Active Server page 
programming. Take the information that you already know about programming IIS 
objects, like Session objects and AD