繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 作一个可以直接和浏览器进行交互的组件
- ASP
- IIS 错误 Server Application Error 详细解决方法
- On Error Resume Next 语句
- ASP常用函数:CStrIP()
- ASP常用函数:CLngIP()
- ASP常用函数:XMLEncode
- 查看所有的Server Variables的环境变量
- 随机提取N条记录 推荐
- 一个可以自动创建多级目录的函数
- ASP常用函数收藏乱七八糟未整理版
- ASP常用函数:HTMLDecode
- 15种ASP技巧
- ASP常用函数:IIF()
- ASP常用函数:ArrayToxml
- ASP常用函数:ReplaceHTML
- 改进性能和样式的24个ASP 技巧
- 如何将长的标题用省略号收尾
- 如何保持数据库输出格式不变
- 学习ASP和编程的28个观点
- Asp实现假静态
- 初学asp者必看
ASP 中的 作一个可以直接和浏览器进行交互的组件
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 73 ::
收藏到网摘: 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
