ASP网站制作之阿里西西原创-asp封装dll教程

asp可以使用微软的activeX使得网页功能无比强大，不过安全性也较差，而且是基于的windows服务器，所以性能稳定性也一般阿里西西|教程|原创|asp封装阿里西西原创视频教程下载地点:http://www.alixixi.com/Down/eBook/vb/2007/2007122192320.html
由自己第一次实验制造的录相视频教程，因为电脑速率较慢，播放工夫较慢，请体谅。

本录相解说最基本的VB封装ASP代码天生DLL的制造教程，合适低级进修者参考。也是自己进修VB制造ASP组件的第一个实验，录相基础乐成。

用vb编写asp组件(dll)示例

上面,将演示怎样利用vb制造asp的dll组件...

1.启动你的vb,选择activexdll图标,然后在点击菜单的工程>>援用,接
着在弹出的"援用"窗口从当选择
microsoftactiveserverpagesobjectlibrary.

2.给工程和类重定名,在asp中挪用时,就端赖它了^_^!我们的工程名改
为aspdll,类名为demo.在asp中挪用的办法是:
setobjreference=server.createobject("工程名.类名")
本例挪用的响应代码以下:
setobjreference=server.createobject("aspdll.demo")
挪用的办法和一样平常罕见的,好比fso等组件的办法千篇一律.
心动了吧,呵呵,上面我们持续....

3.接着,我们入手下手编写代码,翻开我们方才新建工程类窗口,第一步,先声
明我们要用到的变量.次要是在vb声明替换asp几年夜工具的变量名,界说这
asp的几年夜工具后,我们就能够像在asp情况中挪用相似request,server等
如许的几年夜工具了.(声明的变量名完整能够和asp工具名一样)代码以下:

**********************************************
privatemyscriptingcontextasscriptingcontext
privatemyapplicationasapplication
privatemyrequestasrequest
privatemyresponseasresponse
privatemyserverasserver
privatemysessionassession
**********************************************

4.声明完变量后,我们必需在类中写onstartpage子函数.本函数的感化是
当用户会见一个带有本组件的asp文件时,iis就会把scriptingcontext传
送给我们vb组件工具.这个scriptingcontext包含了全体的asp办法和属性
.如许,就使得我们有才能会见一切asp的工具.代码以下:

*****************************************************************
publicsubonstartpage(passedscriptingcontextasscriptingcontext)
setmyscriptingcontext=passedscriptingcontext
setmyapplication=myscriptingcontext.application
setmyrequest=myscriptingcontext.request
setmyresponse=myscriptingcontext.response
setmyserver=myscriptingcontext.server
setmysession=myscriptingcontext.session
endsub
*****************************************************************

经由过程下面的函数,我们在asp中挪用本组件后,下面的几年夜工具就完整能够
像平常我们在asp利用一样了,举个例子:

在asp中完成吸收提交的表单值并输入屏幕:

<%
formvalue=request.form("username")
response.write("你提交的用户名是"&myformvalue&",接待您!")
%>

在vb中完成办法是:

formvalue=myrequest.form("username")
myresponse.write("你提交的用户名是"&myformvalue&",接待您!")

5.绝对应于onstartpage函数,我们还要编写一个封闭onstartpage中工具
的onendpage函数,代码以下:

*********************************
publicsubonendpage()
setmyscriptingcontext=nothing
setmyapplication=nothing
setmyrequest=nothing
setmyresponse=nothing
setmyserver=nothing
setmysession=nothing
endsub
********************************

6.经由过程编写下面的代码,我们在vb中编写asp组件实例的情况已具有了,
上面,我就实验写两个与asp中基础相相似的函数,也就是说,关头部位就在
这里了,你完整能够把你一切的asp源码封装在这里...

先写个最复杂的输入屏幕信息函数:
********************************************
publicsubwelcomeinfo()
myresponse.write("阿里西西_web开辟,接待访www.alixixi.com!")
endsub
********************************************

再写个带参数传送及显现now()如今工夫的函数:
**********************************
publicsubsetinfo(contentasstring)
myresponse.writecontent&"<br>"
myresponse.write"如今的工夫是:"&now()
endsub
**********************************

经由过程下面的asp代码实例,你会发明实在这和asp源码基础没有区分^_^

7.好了,全部类就编写完了,我们入手下手打包封装成dll.我们先保留工程,
这里我们保留到e:vbdll,接着选择菜单上的文件>>天生aspdll.dll,很
快的dll组件就封装并天生终了了.

8.天生dll文件后,我们入手下手调试和利用.在体系运转栏输出cmd,进进dos
命令行形态,我们要注册方才天生的dll组件,注册办法是能够间接输出
regsvr32e:vbdllaspdll.dll,为了安装便利,你同时能够写个批处置
文件,这里纷歧一举例了...好,注册乐成!

9.注册完dll组件后,我们针对方才的组件,依照下面先容过的办法编写一
个asp文件来调试.代码以下:

<%
setredll=server.createobject("aspdll.demo")
redll.welcomeinfo
response.write"<hr/>"
redll.setinfo("传送参数到服务器组件,并前往值及以后日期now()!")
response.write"<hr/>"
setredll=nothing
%>
在iis中翻开此文件,屏幕显现:

阿里西西_web开辟,接待访www.alixixi.com!
------------------------------------------------------------
传送参数到服务器组件,并前往值及以后日期now()!
如今的工夫是:xxxx-xx-xx-xx:xx:xx

ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段，极大地提高了开发的效果。在讨论ASP的安全性问题之前，让我们来看看ASP是怎么工作的。

最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件)

代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。

Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点)

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件)