关于vb编写组件的两个问题

时间:2021-08-10 13:54:17
1、我看见网上的一片文章:
可是我无法找到引用:Microsoft Transaction Server Type Library
我该怎么办?

用VB6做一个简单的文件上传组件(二) 


  接着上回,新建一个ActiveX DLLs类型的工程,并将缺省的工程名由“Project1”改为“Songbird”(当然你也有权不这样改,呵呵),将缺省的类名由“Class1”改为“FileUp”,至于为什么要这样改,以后你便知道了。 
  要想实现读取上传文件字节数据的功能,势必要涉及到Request对象,可是在VB中该怎么做呢?简单,只需要在工程中加入适当的类型库的参考即可。点击Project菜单选择References,在随之出现的对话框中选中Microsoft Active Server Pages Object项以及Microsoft Transaction Server Type Library项,单击OK,便可以在VB环境中象写ASP代码一样操纵Request、Response等对象了,你会感到非常亲切的。 
  以下便是具体的程序代码: 

  Public Function SaveFile(Pathname As String) As String 
    onError Goto ErrorCode 
    Dim objContext As ObjectContext 
    Dim objRequest As Request 

    'ObjectContext的使用类似于ASP中的Application和Session对象, 
    '可以用关键值对其内部的一些特定的对象实例进行访问, 
    '如ObjectContext("Response") 

    Set objContext=GetObjectContext() 
    Set objRequest=objContext("Request") 

    '以下的一段代码与前文的脚本程序类似, 
    '只不过对变量的定义要严格些 

-----------------------------------------------


问题2:我编写了dll该如何调试,我是指不要生成dll以后再调试,vb本身应该可以调试吧?请详细指点我步骤,非常感谢!!!!!!!!!!!!!!!!!!

7 个解决方案

#1


我是windows2000 prof版
中文,Microsoft Active Server Pages Object我找到了

还看见有 MTS Admin Type Library 不知道是不是Microsoft Transaction Server Type Library?

#2


关注...................

#3


1) Try COM+ Services Type Library

#4


mts, 事务服务器,COM对象,可以动态增加和删除!自动建立分配使用资源
一般的COM,除非停止服务,不能除掉!

#5


_TMG_(Alan): 没有,也没有com+这个名字

 matq2008(能者行) :我是要问如何调试,不是指如何加载、如何注册,因为我编译成dll后用mts加载,只能知道我这个dll是否出错,不能知道中间哪一行写错了,我要问怎么调试的详细步骤。

#6


应该是COM+ SERVICE库。
新版的都改名字了。
windows版本是多少?

#7


找到com+即可,windows2000里面是这样叫法的

#1


我是windows2000 prof版
中文,Microsoft Active Server Pages Object我找到了

还看见有 MTS Admin Type Library 不知道是不是Microsoft Transaction Server Type Library?

#2


关注...................

#3


1) Try COM+ Services Type Library

#4


mts, 事务服务器,COM对象,可以动态增加和删除!自动建立分配使用资源
一般的COM,除非停止服务,不能除掉!

#5


_TMG_(Alan): 没有,也没有com+这个名字

 matq2008(能者行) :我是要问如何调试,不是指如何加载、如何注册,因为我编译成dll后用mts加载,只能知道我这个dll是否出错,不能知道中间哪一行写错了,我要问怎么调试的详细步骤。

#6


应该是COM+ SERVICE库。
新版的都改名字了。
windows版本是多少?

#7


找到com+即可,windows2000里面是这样叫法的