asp数学函数11种&asp组件初级入门与精通系列

asp数学函数11种&asp组件初级入门与精通系列

ID:10207532

大小:168.00 KB

页数:30页

时间:2018-06-12

asp数学函数11种&asp组件初级入门与精通系列_第1页
asp数学函数11种&asp组件初级入门与精通系列_第2页
asp数学函数11种&asp组件初级入门与精通系列_第3页
asp数学函数11种&asp组件初级入门与精通系列_第4页
asp数学函数11种&asp组件初级入门与精通系列_第5页
资源描述:

《asp数学函数11种&asp组件初级入门与精通系列》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、ASP进阶学习必经之认识数学函数11种函数语法功能AbsAbs(num)返回一个数的绝对值SqrSqu(num)返回一个数的平方根SinSin(num)返回角度的正弦值CosCos(num)返回角度的余弦值TanTan(num)返回角度的正切值AtnAtn(num)返回角度的反正切值LogLog(num)返回一个数的对数值IntInt(num)取整函数,返回小于等于number的第一个整数FormatNumberFormatNumber(num1,num2)转化为指定小数位数(num2)的数字RndRnd

2、()返回一个0到1的随机数UboundUbound(数组名称,维数)返回数组的最大下标数,如数组只有一维,可省略维数Asp组件初级入门与精通系列之一一直以来,想写一些组件方面的应用,这段时间终于可以写一点自己喜欢的东西。希望大家通过这些教程学习后,可以随心所欲的写出自己的组件。每篇文章可能没有关联,只是写一些组件编写过程中出现的问题。欢迎大家批评指正环境:winxp+vb6+sp6+visualinterdev6.0作为第一篇,我们先来写一个比较简单的组件完成的功能是:输入两个数相加,返回相加的结果打开v

3、b6,新建ActivexDll工程。工程名修改为fCom,类名修改为fC1点击菜单->工具->添加过程我们在名称内输入Add,类型选择函数,范围选择公有,然后确定即可生成如下代码,我们继续完善程序代码OptionExplicitPublicFunctionAdd(ByValaAsLong,ByValbAsLong)AsLongAdd=a+bEndFunctionOk,一个简单的组件就写好了,点击菜单->文件->生成fCom.dll文件确定,在目录下就会有fCom.dll文件测试打开visualinterd

4、ev6.0,生成一个asp文件,为什么要使用interdev,因为它有代码提示功能,与vb的ide环境一致,方便书写程序代码<%@Language=VBScript%><%setobj=server.CreateObject("fCom.fC1")'下面这句注意了,因为函数有返回值的,不能按下面的方法写,否则ie中会报错'obj.Add(3,4)

5、'错误类型:'MicrosoftVBScript编译器错误(0x800A0414)'调用子程序时不能使用括号'/xml/fc1.asp,line9,column12'obj.Add(3,4)'下面是正确写法dimcc=obj.Add(3,4)Response.Writec%>配置好虚拟目录,在ie中执行此asp文件,得到结果7第一篇结束了,祝大家学习愉快。Asp组件初级入门与精通系列之二如何注册组件1.regsvr32组件的绝对路径如:程序代码regsvr32c:testf

6、c1.dll因为组件只要注册就可以使用了,所以与组件的位置无关。2.在COM+组件管理器中注册什么时候需要这种注册:组件在使用了COM+的服务后需要注册后才能正常的执行。如果该组件仅仅regsvr32注册,仍然无法使用如何使用组件程序代码setobj=server.createobject(“工程名.类名”)然后调用其方法属性如何卸载组件1.regsvr32组件的绝对路径如:程序代码regsvr32c:testfc1.dll/uu参数反注册组件2.COM+组件管理器中删除组件即可Asp组件初级入门与精

7、通系列之三如何使用属性打开vb6,新建ActivexDll工程。工程名修改为fCom,类名修改为fC2点击菜单->工具->添加过程我们在名称内输入myName,类型选择属性,范围选择公有,然后确定再次操作:在名称内输入Age,类型选择属性,范围选择公有,然后确定再次操作:在名称内输入peopleInfo,类型选择函数,范围选择公有,然后确定即可代码如下:程序代码OptionExplicit'保持属性值的局部变量,只能在类中使用PrivatemvarmyNameAsStringPrivatemvarAgeA

8、sInteger'Let写属性(Let属性:该过程给一个属性赋值。)PublicPropertyLetAge(ByValvDataAsInteger)mvarAge=vDataEndProperty'Get读属性(该过程获取一个属性的值。)PublicPropertyGetAge()AsIntegerAge=mvarAgeEndPropertyPublicPropertyLetmyName(ByValvDataAsString

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。