由本人第一次尝试制作的录像视频教程，由于电脑速度较慢，播放时间较慢，请谅解。 本录像讲解最基础的VB封装ASP代码生成DLL的制作教程，适合初级学习者参考。也是本人学习VB制作ASP组件的第一个尝试，录像基本成功。 用vb编写asp组件(dll)示例 下面,将演示如何使用vb制作asp的dll组件... 1. 启动你的vb,选择activex dll图标,然后在点击菜单的工程>>引用,接 着在弹出的"引用"窗口从中选择 microsoft active server pages object library. 2. 给工程和类重命名,在asp中调用时,就全靠它了^_^!我们的工程名改 为aspdll,类名为demo.在asp中调用的方法是: set objreference = server.createobject("工程名.类名") 本例调用的相应代码如下: set objreference = server.createobject("aspdll.demo") 调用的方法和一般常见的,比如fso等组件的方法一模一样. 心动了吧,呵呵,下面我们继续.... 3. 接着,我们开始编写代码,打开我们刚才新建工程类窗口,第一步,先声 明我们要用到的变量.主要是在vb声明替代asp几大对象的变量名,定义这 asp的几大对象后,我们就可以像在asp环境中调用类似request,server等 这样的几大对象了.(声明的变量名完全可以和asp对象名一样)代码如下: '********************************************** private mys criptingcontext as s criptingcontext private myapplication as application private myrequest as request private myresponse as response private myserver as server private mysession as session '********************************************** 4. 声明完变量后,我们必须在类中写onstartpage子函数.本函数的作用是 当用户访问一个带有本组件的asp文件时,iis就会把s criptingcontext传 送给我们vb组件对象.这个s criptingcontext包括了全部的asp方法和属性 .这样,就使得我们有能力访问所有asp的对象.代码如下: '***************************************************************** public sub onstartpage(passeds criptingcontext as s criptingcontext) set mys criptingcontext = passeds criptingcontext set myapplication = mys criptingcontext.application set myrequest = mys criptingcontext.request set myresponse = mys criptingcontext.response set myserver = mys criptingcontext.server set mysession = mys criptingcontext.session end sub '***************************************************************** 通过上面的函数,我们在asp中调用本组件后,上面的几大对象就完全可以 像平时我们在asp使用一样了,举个例子: 在asp中实现接收提交的表单值并输出屏幕: <% formvalue=request.form("username") response.write ("你提交的用户名是"&myformvalue&",欢迎您!") %> 在vb中实现方法是: formvalue=myrequest.form("username") myresponse.write ("你提交的用户名是"&myformvalue&",欢迎您!") 5. 相对应于onstartpage函数,我们还要编写一个关闭onstartpage中对象 的onendpage函数,代码如下: '********************************* public sub onendpage() set mys criptingcontext = nothing set myapplication = nothing set myrequest = nothing set myresponse = nothing set myserver = nothing set mysession = nothing end sub '******************************** 6.通过编写上面的代码,我们在vb中编写asp组件实例的环境已经具备了, 下面,我就尝试写两个与asp中基本相类似的函数,也就是说,关键部位就在 这里了,你完全可以把你所有的asp源码封装在这里... 先写个最简单的输出屏幕信息函数: '******************************************** public sub welcomeinfo() myresponse.write ("阿里西西_web开发,欢迎访www.alixixi.com!") end sub '******************************************** 再写个带参数传递及显示now()现在时间的函数: '********************************** public sub setinfo(content as string) myresponse.write content & "
" myresponse.write "现在的时间是:" & now() end sub '********************************** 通过上面的asp代码实例,你会发现其实这和asp源码基本没有区别^_^ 7. 好了,整个类就编写完了,我们开始打包封装成dll.我们先保存工程, 这里我们保存到e:\vbdll,接着选择菜单上的文件>>生成aspdll.dll,很 快的dll组件就封装并生成完毕了. 8. 生成dll文件后,我们开始调试和使用.在系统运行栏输入cmd,进入dos 命令行状态,我们要注册刚才生成的dll组件,注册方法是可以直接输入 regsvr32 e:\vbdll\aspdll.dll ,为了安装方便,你同时可以写个批处理 文件,这里不一一举例了...好,注册成功! 9.注册完dll组件后,我们针对刚才的组件,按照上面介绍过的方法编写一 个asp文件来调试.代码如下: <% set redll = server.createobject("aspdll.demo") redll.welcomeinfo response.write "

---

" redll.setinfo("传递参数到服务器组件,并返回值及当前日期now()!") response.write "

---

" set redll = nothing %> 在iis中打开此文件,屏幕显示:

c++基础 c++中级 c++信息竞赛及算法 c++信息竞赛进级 1 初识C++2 数据类型3 程序结构4 条件分支5 switch6 while7 for8 初识数组第9讲. 循环嵌套第10讲 一维数组第11讲 字符串第12讲 二维数组第13讲 函数第14讲 链表第15讲 数据结构与算法第1讲 指针第2讲 栈第3讲 队列第4讲 高精度数第5讲 排序1第6讲 排序2第7讲 递推第8讲 递归第9讲 文件操作第10讲 深度优先广度优先第11讲 图第12讲 图的优先遍历第13讲 预处理器第14讲 多线程第1讲 贪心算法 (1)第2讲 贪心算法第3讲 模拟第4讲 递归第5讲 字符串第6讲 查找算法第7讲 二分图第8讲 搜索第9讲 计算几何第10讲 动态规划第11讲 网络流第12讲 数论数学第13讲 图论第14讲 排序算法第15讲 线性结构第16讲 树形结构第1讲 初等代数第2讲 实数处理第3讲 动态规划第4讲 搜索剪枝第5讲 子序列第6讲 资源分配第7讲 区间第8讲 组合数学 (1)第9讲 二分答案第10讲 二项式系数第11讲 欧几里得原理第12讲 广搜第13讲 二次展开式第14讲 滚动数组.

51单片机原理及应用二版课件教程，有利于查找51单片基本模块，有利于初学51者

大学优秀PPT课件教程：数据库系统设计.ppt

大学优秀PPT课件教程：分布式数据库.ppt

大学优秀PPT课件教程：面向对象数据库.ppt

大学优秀PPT课件教程：互联网分布式系统的数据资源存储与管理---KeyValue存储模式.ppt

大学优秀PPT课件教程：云计算简介教案.ppt

大学优秀PPT课件教程：Hadoop中的数据库技术.ppt

（3）使用Director制作界面的交互 新建文件，大小为1024*768，背景色为黑色。 设置精灵帧数为3 导入main.swf,片头，主界面，二级界面，背景音乐。