写COM组件用于ASP/PHP等动态网页
内容导读
互联网集市收集整理的这篇技术教程文章主要介绍了写COM组件用于ASP/PHP等动态网页,小编现在分享给大家,供广大互联网技能从业者学习和参考。文章包含2042字,纯文字阅读大概需要3分钟。
内容图文
![写COM组件用于ASP/PHP等动态网页](/upload/InfoBanner/zyjiaocheng/199/c0d083b9eed64091b67e75770490f514.jpg)
开发COM的工具也就是开发EXE应用程序的工具,VB、VC、Delphi都可以。但VB具有天生的优势,几行代码就可以写出COM来。VB中,COM又叫ActiveX DLL。下面借用一个很简单的示例 ,判断年份是否为闰年。
新建一个ActiveX DLL工程,将工程名命为CheckYear,自动生成的类名命为LeapYear。写下如下代码:
Option ExplicitPublic Function IsLeapYear(yr As Variant) As Boolean If yr Mod 4 = 0 And yr Mod 100 <> 0 Then IsLeapYear = True Else IsLeapYear = FalseEnd Function
咳,简单得有点不适应。就这样COM做好了,生成DLL即可。然后注册它。在运行中输入“regsvr32 H:\checkyear.dll”即可。如果你本机架有IIS或NetBox,可以在ASP网页上调用它了。如果用于服务器,那么上面这件事则需要在服务器上做。ASP调用代码如下:
<% Option ExplicitDim oCheckYear,sDim Year, isleapYearYear=2004Set oCheckYear=CreateObject("CheckYear.LeapYear")isleapyear=oCheckYear.IsLeapYear(Year)Set oCheckYear=Nothing%><% If isleapYear=True Then s="是闰年!" Else s="不是闰年!"%><%=Year%>年<%=s%>COM在EXE应用开发工具中也可以调用。在写复杂的COM时,可以用他们来检测功能。COM注册后,在VB中的“引用”列表中可以看到。例如下面是VB调用它的代码:
Private Sub Command1_Click() Dim c Set c = CreateObject("CheckYear.LeapYear") Dim d As Boolean d = c.IsLeapYear(2004) MsgBox dEnd Sub
COM打开了一扇无限可能的门,下面就是看你发挥了。金蝶、用友等非常擅用此类方法。下面说说我的非主流的用法。WebService想必大家用过,很多门户或厂商以免费的WebService的方式提供天气、股市等信息。我们在程序中直接用URL就可以访问它。这里要说的是一个非公开的、非正式的“服务”,即IP138网站提供的IP信息查询页面,http://iframe.ip138.com/ic.asp,它返回简单的IP和所在地信息,如 “您的IP是:[17.89.9.11] 来自:广东省深圳市 电信”。我的程序中就向它请求信息查询用户所在地,这比自己查数据库省事多了,而且它号称它的地址永远是最新的。这个也可以用到COM中,页面上只要调用COM中提供的方法就可以了。有人要问:这样岂不总是得到服务器的地址信息?所以我们还要用到WinHttpRequest来构建自己的数据包。页面将用户IP传入COM,COM再将用户IP构建在数据包里发给IP138。发送的方法VB中有Inet控件和xmlhttp,更详细的内容自己百度啦。
内容总结
以上是互联网集市为您收集整理的写COM组件用于ASP/PHP等动态网页全部内容,希望文章能够帮你解决写COM组件用于ASP/PHP等动态网页所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错,欢迎将互联网集市网站推荐给程序员好友。
内容备注
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 gblab@vip.qq.com 举报,一经查实,本站将立刻删除。
内容手机端
扫描二维码推送至手机访问。