繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 作一个可以直接和浏览器进行交互的组件
- ASP
- 看人家用使用InstallShield制作ASP安装程序(5)
- 看人家用使用InstallShield制作ASP安装程序(4)
- 看人家用使用InstallShield制作ASP安装程序(3)
- 看人家用使用InstallShield制作ASP安装程序(2)
- 看人家用使用InstallShield制作ASP安装程序(1)
- 取得浏览者的离开时间
- base64编码、解码函数
- 动态显示图片的函数（显示广告条）
- 发送带附件的HTML格式邮件例程可以带附件
- 一种在父窗口中得知window.open()出的子窗口关闭事件的方法
- 一个老个写的无组件上传
- 避免asp的SQL的执行效率低
- 树型结构在ASP中的简单解决
- 无需数据库循环的无级分类代码
- 检查字符串strSource是否为big或big5码
- 有关重复记录的删除(SQL SERVER)
- WINDOWS2000服务器账号登陆身份验证
- 使用VC++6.0制作ASP服务器控件简介
- 利用sql的存储过程实现dos命令的asp程序
- WSH 直接将查询数据结果生成 EXCEL 表
ASP 中的 作一个可以直接和浏览器进行交互的组件
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 101 ::
收藏到网摘: n/a
再传回浏览器，但是有的时候，这样做似乎 有困难，或者不方便,所以今天豆腐就在这里给大家
讲一下如何 作一个可以直接和浏览器进行交互的组件
首先在 VB 制作组件的工程中 添加 asp.dll,然后看完豆腐的代码 你就会 觉得 很简单了
Private objRequest as Request
Private objResponse as Response
Private objServer as Server
Private objSession as Session
Private objApplication as Application
Public Sub onstartpage(sc As ScriptingContext)
' 创建 asp 对象,这样下面的 objRequest...就可以和在 vb 中一样简单了
Set objRequest = sc.Request
Set objResponse = sc.Response
Set objServer = sc.Server
Set objSession = sc.Session
Set objApplication = sc.application
End Sub
Public Sub WriteCopyright()
objResponse.Write "豆腐制作，都是精品<br>"
objResponse.Write "<a href=http://www.asp888.net>豆腐技术站</a>"
End Sub
然后生成这个组件，给他起个工程名字 testCom,在 asp 中做如下调用
<html>
<%
Set testCom = createObject("testCom.testWrite")
testCom.WriteCopyright
%>
</html>
ok 我们就作好了 ，有兴趣的话 大家可以类似的 多做几个 例子
评论 (0) All
