说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何用VB6写COM组件(二)

HTML文档下载 WORD文档下载 PDF文档下载
VB如何用VB6写COM组件(二)
如果你的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内置对象一样简单了。
VB编写键盘拦截程序 VB常见问题解答(1) VB程序中处理随机事件 VB的多媒体控件VBPLAY.VBX简介 VB技巧点滴 VB技巧汇编 (一) VB剪贴板的用法 VB开发CAI软件的小经验 VB软件设计中的几个问题 VB新手常见问题解答 VB修改注册表一特例 VB与VC混合编程中处理消息的方法 VB中的进制转换是怎样的? VB中调用带参数存储过程的实现(数据库) VB中感叹号“!”与圆点“.”的用法差异 VB中如何实现注册表的读写 VB中实现“擦视”技术 Visual Basic 2000年问题 Visual Basic 的未来 Visual Basic 命令分类表 Visual Basic三级跳 Visual Basic使用技巧 Visual Basic中的子类处理技术 Visual Basic中软件封面技术探秘 VisualBasic 软件设计中的几个问题 Windows 95/NT 运行了多长时间 -VB资料 Windows 的登录资料库 -VB资料 把回车键变成TAB键-VB资料 把文件置入到Text或RichText中 -VB资料 避免按 [ENTER] 回车键产生的“嘀”声 -VB资料 避免使用全局变量-VB资料 80分求救 C++Builder开发程序登录问题? 请问GridBagConstraints(有源码) 如何动态更换列表控件前面的小图标? 关于记录修改 用sdk编程怎样加入toolbar? table里的查询字段为什么不会显示数据? c#与interbase请教 C语言的大小问题都在这里面? 不要编译,你猜猜这个程序会有几个类型匹配的警告? 不要编译,你猜猜这个程序会有几个类型匹配的警告? 高分解问,请教高手!关天GIS! 如何判断窗体中的某个控件是textbox控件?或判断窗体中textbox的个数? 如何调用返回不定字段个数的存储过程 那里能找到rational rose 有关FORM与ACCESS数据库的连接 如何使用photoshop把图像缩小到指定大小? 关于某种文件关联的问题 为什么用net send发送的消息有关不掉,点了好多次确定也没用。 怎么保存到数据库中?急急急! 电脑出问题了。 tomcat4.01+apache2.046组合问题:单个的都能运行,...可以加分.. %u的问题 如何调整对话框上工具栏的状态 关于query控件的一个问题 如何结束一个线程? FastReport怎么将没有记录的地方也画上格子??? 我的oracle9装上去之后怎么有7。2G那么大??并且还连不上MANAGEMENT SERVER只能独立启动??请指教!! Fastreport与quickreport那个更好用? 进者有分. 强烈要求铲除全国所有的收容所!!! 要用什么软件才能将CMOS参数备份到某个文件夹中? 请问怎么在建表代码里定义关键字? 请问把数据写入ListView控件内,有什么办法可以快点? win2k server dns 求助! 我在易趣上竞的一个数码相机,只要250元,但是只能拍26张相。我不知道是真是假? 一个搞不定的恶意网站 cout与printf的问题 没有路由怎样用一台服务器实现300台左右的电脑上网? ResultSet里读出数据的参数问题,马上给分 netvt(唯她 v1.1.1),进来拿你应得的分 如果我的程序中用了VFP,但是用户可能并没有装VFP,有什么好的办法直接替用户解决了这个问题,而不是提醒他自己去装 怎么保存到数据库中?急急急! 我用treeview显示数据库的数据,增加一条新记录后,要怎么样才能马上在treeview显示? 无法传值问题,高手急救!!!!!!!!! 在线等待:怎么为datagrid控件的某一格赋值? 请教如何在input上传筐里面限制文件类型? java的图形设计比如swing有前途吗?大家来讨论下,迷惑中。。。 计算机静电问题!! 错误在那里 请教批量update出错问题 请问串口方面的? 耐磨橡胶衬板主要厂家有哪些? 邱少云在牺牲时夺取的是什么 近五年来,青蛙(田鸡)肉走上餐桌,假如人们大量捕杀这种农田中的青蛙.这样带来的后果是( ).“假如人们大量捕杀这种农田中的青蛙.”中的这种农田是指:水稻,稻螟虫,蚯蚓,蛇,蜜蜂,野 仿写句子如一朵鲜花,点缀不出绚丽的春天 一朵鲜花点缀不出绚丽的春天.仿造例子,再写一句,与其格式相同. cf潘多拉角色有什么优点,比起灵狐怎么样? 下图:三个直径相等的圆.求阴影部分的面积占一个圆面积的几分之几? 一朵鲜花点缀不出绚丽的春天仿写 邱少云哪年牺牲的? wp手机是什么? 西方管理思想产生的背景是什么? We don't do much b()with foreign companies.首字母填空 如图三个直径相等的圆阴影部分的面积占一个圆面积的多少 一个物体放在一个斜面上,这时物体对斜面有压力吗 (生物)有人爱吃青蛙,为此便有人大量捕捉野生青蛙,这种做法会产生什么后果? 如右图:三个直径相等的圆.求阴影部分的面积占一个圆面积的几分之几 有些人爱吃蛙肉,为此便有人大量捕捉野生青蛙,这种做法会产生怎样的后果? 已知点a(1,0)和b(3,-1).若点m是y轴上一点,且满足△abm是直角三角形,则点m的坐标是 爱因斯坦的相对论简单来说究竟是什么 有些人爱吃肉,为此便有人大量捕捉野生青蛙,这种做法会产生怎样的后果? 如图,直线y=kx+6与x轴,y轴分别交于点A、B,△ABO等腰直角三角形. (1)求函数解析式.我会做2)已知点C(4,0),点P是线段AB上的一点,且△POC是以PC为一腰的等腰三角形,求点P的坐标 大家觉得WP系统手机的优点在哪? 圆O1的半径是2cm,圆O2的半径是5cm,圆心距是4cm,则两圆的关系是 A.相交 B.外切 C.外离 D.内切圆O1的半径是2cm,圆O2的半径是5cm,圆心距是4cm,则两圆的关系是A.相交 B.外切 C.外离 D.内切 宇宙飞船在月球着落,宇航员在登上月球后,在月面上用天平测物体的质量,结果是什么 你觉得手机WP操作系统怎么样最近喜欢上了WP操作系统 隐形飞机的隐形原理是什么?如何做到隐形? 海贼王超新星是什么意思 紫荆 打一纺织词语 最新的WP手机操作系统怎么样,有什么新功能呀 隐形飞机为什么能隐形,的原理是什么? 十分徳法 打一纺织词语 金鱼是卵生还是蛋生如题 金鱼是过卵生还是蛋生抚养后代的 已知两个圆的半径分别为3cm和5cm,并且两圆没有公共点,则两圆的圆心距的取值范围是 水泥磨二仓衬板磨平了,影响产量吗 恐龙是怎样从我们的地球蛋生的呢? “有些人爱吃蛙肉,为此便有人大量捕捉野生青蛙,这种做法会产生怎样的后果? Φ3.2x13m 水泥磨三仓钢球级配 带2个负电荷的硫离子的化学式是什么 有些人爱吃蛙肉,为此便有人大量扑捉野生青蛙,这种做法会产生怎么样的后果 什么是水泥磨?水泥磨在安装试车时应该注意哪些事项? 综合知识抢答赛,答对一题加5分,答错一题扣2分.A学生共抢答了20道题,最后得分72分.他答对几道题? 那一天我忘不了 作文 最好的水泥磨厂家?水泥磨哪家好? 人生如絮,飘零在此万紫千红的春天.仿句例句:人生如絮,飘零在此万紫千红的春天.仿句:人生如————————人生如———————— 作文字数:500---600.. 什么是开路粉磨?什么是闭路粉磨?水泥开路粉磨和闭路粉磨的区别? 人生如絮,飘零在万紫千红的春天.相照应的句子 CF潘多拉好吗?我买了,到底有什么好处 怎样用几何图形来表示四字成语:一个三角形没个角里有一个圆 失根的兰花第⑩段中 人生如絮,飘零在此万紫千红的春天 应当怎么理解 人们大量捕杀青蛙会产生怎样的严重后果? 一句关于战争的名言急 人生如絮,飘零在这万紫千红的春天意思 大量扑抓青蛙,后果怎样? 堆焊耐磨板和铸造哪个好为什么堆焊耐磨行性能好能说的具体点嘛!谢谢~ 人生如絮 飘零在此万紫千红的春天 什么修辞 从跳高 等分析我主要玩JU 哪些单位需要堆焊耐磨板 如果人类停止生育,但能长生,这个世界会怎样?长生的感念是:小孩永远是小孩,年轻人永远是年轻人,老人永远是老人,但都没有死亡但出现车祸或别人杀害也就是=世界上就少了一个人例:100-1=99, 如果大量捕杀青蛙,你觉得会造成怎样的后果.简答,100字以内. 埃及前总统穆尔西将受审 拒绝审判无人金华00后女生溜冰场结识男子 旷课5迈克尔杰克逊私人医生刑满出狱 欲再获55岁女子带出骗婚小团队 8个男人相拆反美海报 伊朗要与美国和好?国家公务员考试报名审查结束 浙江8万浙江省质监局:8家桶装水企业连续两次金华8890便民平台开通首日呼入电话安倍窜访土耳其 搅局土中军购“抗衡中国说”凸现安倍“同盟困境”奥巴马医改网站承包商高管是第一夫人同斯诺登曝美国一月内监听西班牙6000英国发生强烈暴风雨天气已致4死 逾6“手机门”困扰德美关系法国总统称新加坡是“战略伙伴”德黑兰“敏感时刻”撤下街头反美海报 波兰前总理在华沙去世 被赞波兰史上最美国政府“秋后”问责 摩根大通掏钱“日抗议中国海警船巡航钓鱼岛 遭驻日公美议员称监听欧洲是“救命”中国将带动全球天然气需求增长用脚踢 小孩都会 用脑踢 才是境界来筠连 泡盐井温泉吃李子两个苏菲姐妹相称“我,成都交警”定制版学生不能用手机 老师吸烟要挨罚只需80元无痛查胃肠成都出川动车 下月起不停达州站狭路相逢勇者胜当美国短跑队遇见加纳长跑队……“没头脑”战平“不争气” 最丑陋的1佩西,还飞吗?脑瓜不够用?美食来“灵光”虎口拔“牙”吃葡萄球该怎样输?鼻屎的诅咒英雄秦开美背后的“非光鲜”一面读者来信南充2.4万人低保资格被取消男子持砍刀夜抢超市 与老板僵持7分钟中国川南商贸城 浙商招商说明会圆满举电子科大全国招生5500人
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘