QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 11190|回复: 2
打印 上一主题 下一主题

Asp中调用VB编写的DLL

[复制链接]
字体大小: 正常 放大
韩冰        

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2004-10-6 09:53 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
作者:   慈勤强
5 }4 T. @1 i* l+ S( D7 MEmail : cqq1978@Gmail.com, Q$ [% D3 U- \! x5 j
描述: Asp自身提供的几大对象在有些时候并无法满足我们的需要,这时候就需要我们
' F6 h- L0 |9 ~7 ?, p$ o      自己动手编写组件,然后在Asp中调用 + |( O4 q5 Y1 Q) {
最后修改: 2004-10-02
3 r- n( k: r3 }  g**/
5 ^8 W, W7 t' H2 @' ~<>    在用ASP做网站的时候,经常发现有些功能是Asp本身所无法实现的,就必须借助于
7 c/ h5 M$ O0 O; ]# A) c. B+ C# C: ~% K
第三方的组件。 比如说发送Email,文件上传等等。
2 H1 y; J: |3 N  m4 ]# m+ q</P>$ u. T4 _( c$ \+ T# E! I
<>    今天就以VB为例,简单的制作一个我们自己的组件,然后在Asp中调用它。</P>7 O6 H, B. g: f8 e, e0 ]$ E0 R" p& h2 O; N
<>    首先,打开VB,在新建工程类型里面,我们选择ActiveX Dll,如果您的组件需要/ l) |$ I  ?, ^6 Z8 q
$ r5 H) ?. K- c
界面,也可以选择ActiveX控件。</P>
0 B/ r- `3 z$ s4 G<>    然后,系统默认生成一个类模块Class1,我们可以改成我们需要的名称,比如FirstClass。
. q+ C# o# B$ e
) Q" {" E; X7 \0 O" u3 N% W. V" C说明一下,我们在Asp中调用对象的时候,是这么写的:
5 E; w$ T; i: \3 e. E1 t/ {- K
& M& O& J" k1 Z" ~2 q5 a    Set obj = Server.CreateObject("AdoDB.Connection")# @' ~$ e% K5 {2 c

) t1 F9 R2 D: E7 p    我们都知道,AdoDB是一个对象库,里面有好多个对象,而Connection是其中的一个对象。
1 U  O5 O3 O" P9 Z
5 a0 _. O9 J- ^/ l4 i5 s% _  u    所以,我们在上面创建的类模块,其实就是具体的对象,与Connection的地位是一样的。- J) V5 G" c8 j4 T9 H9 ^
</P>
5 `  @9 v$ [7 T( L" H( d, Q<>    下面,我们就可以给我们创建的对象FirstClass编写代码,实现我们的功能了。5 _$ k6 N- p3 j7 @

9 l) X9 X8 ]4 b/ F    我们写个很简单的方法,就是返回一个字符串
" [4 S  G- @9 `4 S! r* c</P>
  Z. l) @+ W1 i8 F  h<>    Public Function getVersion() as String* q3 P# @- t2 v9 Y
3 X0 H6 p5 g  c
            getVersion = "我的第一个DLL,版本1.0"
$ P" X. S% h; I7 x+ S2 J
0 |  n& k; _5 k9 n    End Function</P>
2 g% S( l% B1 e  R/ M3 \<>    写好之后,我们就要确定类库的名字,就像上面的AdoDB一样。 我们在工程菜单,工程属性( R/ K  R% o7 G! |. ]

$ [. |. Z! k& ]' K1 w$ M* P    界面,可以看到一个工程名称,默认是”工程1“,这就是我们需要修改的地方,比如我们改成CqqLib3 O- p2 T- s0 o7 P
</P>
0 l1 ?/ p: W8 r7 M9 B<>    好了,生成相应的Dll, 这个时候系统就自动把这个组件注册到系统中了。 如果要用在其它$ `, p; X4 T1 G5 B$ m
3 m: L; Z% Y# r# r( I! i5 |' N
    的电脑上,需要先注册, 就是在命令行下输入 regsvr32 a.dll 就可以了。! }! d$ j/ G9 |6 s  }( C, U
</P>) I8 ^$ ~* r6 S# i' B
<>    下面,我们看看在Asp中怎样使用这个Dll,很简单:
# z9 L0 p4 o6 \* c
0 h! u. E! ?% ^2 L    &lt;%
# I# x3 O" r" p    Set obj = Server.CreateObject("CqqLib.FirstClass")
+ r2 ~. Z6 m& U/ Q" M    response.write obj.getVersion3 @; C2 V; [- j- S
     %&gt;/ s8 W4 S1 p/ k3 v" M9 m
* n* n8 P7 ~3 ~3 L6 l

. b$ U! [) E: o, x7 v- \( Y     就可以看到输出结果了,也就是 "我的第一个DLL,版本1.0"</P>
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信

30

主题

3

听众

2324

积分

升级  10.8%

  • TA的每日心情
    奋斗
    2023-6-21 14:13
  • 签到天数: 17 天

    [LV.4]偶尔看看III

    自我介绍
    200 字节以内&amp;lt;br /&amp;gt;
    不支持自定义 Discuz! 代码

    邮箱绑定达人 新人进步奖 元老勋章 原创写作奖

    回复

    使用道具 举报

    absdswor        
    头像被屏蔽

    0

    主题

    5

    听众

    218

    积分

    升级  59%

  • TA的每日心情
    开心
    2013-11-28 06:02
  • 签到天数: 34 天

    [LV.5]常住居民I

    自我介绍
    斌晗溪言星
    提示: 作者被禁止或删除 内容自动屏蔽
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2026-9-20 01:43 , Processed in 0.498757 second(s), 62 queries .

    回顶部