由本人第一次尝试制作的录像视频教程,由于电脑速度较慢,播放时间较慢,请谅解。 本录像讲解最基础的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中打开此文件,屏幕显示:
2023-10-04 19:33:58 6.3MB VB ASP 课件 教程
1
VB6.0 使用libmySQL.dll 连接MYsql数据库的方法 包含 libmySQL.dll 文件 不使用ODBC 连接 查询 修改 删除mysql数据库 比较全面 适合初学者
2023-10-04 18:11:53 157KB mysql 数据库
1
摘要:VB源码,字符处理,记事本
  记事本源码,VB源代码下载,学习一下菜单的创建和定义、字体对话框的使用、使用With语句设置RichTextBox控件的各种属性、定义菜单的单击事件、保存对话框等小技巧,
2023-10-04 14:15:02 6KB 记事本 VB源码 源码中心 字符处理
1
可以很方便的打印普通单一窗体中指定richtextbox中的内容,而不需要设置当前子窗体。 只需要在当前窗体中添加打印组件printdocument然后修改一下要打印的标题和richtextbox的控件名就OK
2023-10-04 13:58:33 3KB VB.NET 打印 RichTextBox
1
里面用Winsock控件编写的一种聊天软件。 可供大家学习
2023-09-30 09:52:36 9KB VB 聊天器 winsock
1
使用Winsock,代码简洁易懂 包含注释
2023-09-30 09:29:11 56KB VB
1
如何用VB编写OPC客户端程序,用于OPC客户端程序开发代码。
2023-09-29 23:58:42 1.03MB VB OPC客户端
1
opc s7-200 vb 编程应用,编程简单,容易学习
2023-09-29 23:57:11 1.32MB opc
1
VB读写EXCEL表: 能获取到表的行数的代码:xlSheet2.UsedRange.Rows.Count VB本身提自动化功能可以读写EXCEL表,其方法如下
2023-09-29 12:57:26 1KB VB EXCEL
1
vb中操作excel的打开,更改,新建,打印等基本操作,适合新手迅速找到合用的函数,都经过自己验证和简化
2023-09-29 12:56:52 46KB vb excel 文件
1