知识大全 Asp组件初级入门与精通系列之五

Posted 2022-07-17 文件

篇首语：愿君学长松，慎勿作桃李。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 Asp组件初级入门与精通系列之五相关的知识，希望对你有一定的参考价值。

Asp组件初级入门与精通系列之五 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　经常我们可以看到在连接数据库打开记录集的时候如下　　　　rs Open strsql conn adOpenDynamic adLockPessimistic　　　　在键入的时候后面会出现一个游标类型或者锁类型列表可以供选择　　　　有时候我们为了简化直接rs open strsql conn 　　　　第一种方法是不是更加专业一些我们来看看asp中如何实现　　　　　　　　打开vb 新建Activex Dll工程工程名修改为fCom 类名修改为fC 　　　　Option Explicit　　　　定义枚举类型　　　　Public Enum Interfacedig　　　　　 icfirst = 　　　　　 icsecond = 　　　　　 icthree = 　　　　　 icfour = 　　　　　 icfive = 　　　　　 icsix = 　　　　　 icserven = 　　　　　 iceight = 　　　　End Enum　　　　　　　　定义函数　　　　Public Function CallDat(ByVal idig As Integer ByVal ics As Interfacedig) As Variant　　　　CallDat = idig * ics　　　　End Function　　　　　　　　Ok 一个组件就写好了点击菜单 >文件 >生成fCom dll文件　　　　确定在目录下就会有fCom dll文件　　　　　　　　测试　　　　打开visual interdev 生成一个asp文件　　　　　　　　<%@ Language=VBScript %>　　　　　　　　　　　　<%　　　　定义还可以把这一部分放到一个文件中就像ado的记录集 #include file= adovbs inc >　　　　　 const icfirst = 　　　　　 const icsecond = 　　　　　 const icthree = 　　　　　 const icfour = 　　　　　 const icfive = 　　　　　 const icsix = 　　　　　 const icserven = 　　　　　 const iceight = 　　　　set obj=server CreateObject( fCom fc )　　　　这里可以使用iceight或者但是前者使代码具有更好的可读性　　　　a= obj CallDat( iceight)　　　　　Response Write a　　　　Response Write 　　　　a= obj CallDat( )　　　　　Response Write a　　　　%>　　　　　　　　　　　　　　　　配置好虚拟目录在ie中执行此asp文件得到结果如下:　　　　　　　　 cha138/Article/program/net/201311/13070