您的位置:寻梦网首页编程乐园Java天地小龙亭之JSP实践之旅
小龙亭之JSP实践之旅
主页入门EJBJ2EE平台JSP编程译文工具JavaAppServerWeb数据库XML手记小亭

Java2实现Applet数字签名
企业级Java介绍
Java之教授篇
Java白皮书
JNDI技术白皮书
Servlet介绍
Servlet2.1规范
Java在C/S结构中的应用
Java中汉字问题分析与对策
利用Java实现视频点播服务器
Java多线程设计
Java反编译
java IDL技术
数据库缓冲池
ASP调用Servlet
Applet介绍
Applet和Servlet 4种通讯方法
Applet调用jdbc
XML+Servlet建在线系统
java数据库查询的表格显示
开发工具篇
Forte for Java介绍
Jbuilder4新功能
Jbuilder介绍
Jbuilder3测试报告
VAJ开发servlets

 

在 ASP 文件中调用 Servlet

  

    asp这个东西实在不是很好,但我们不能漠视国内ASP泛滥的情况,因而发表此文

在ASP中如何调用SERVLET呢,相信各位JSPER们是不太在意的,但有些情况我们不得不证实,项目中也许会遗留一些ASP文件,并且无法移植成JSP,这时在ASP中如何调用SERVLET就很有必要了。具体如下介绍:
  在 WebSphere应用服务器 中的 ASP 支持包括一个用于嵌入 Servlet 的 ActiveX 控制,下面介绍ActiveX 控制AspToServlet 的方法和属性。 该方法说明如下:
  (1) String ExecServletToString(String servletName);执行 ServletName,并将其输出返回到一个字符串中。 
  (2) ExecServlet(String servletName);执行 ServletName,并将其输出直接发送至 HTML 页面。 
 (3) String VarValue(String varName);获得一预置变量值(其它格式)。
 (4) VarValue(String varName, String newVal);设置变量值。变量占据的总大小应小于 0.5 个千字
节(Kbyte)。且仅对配置文件使用这些变量。 
  其属性如下:
在 WebSphere应用服务器 中的 ASP 支持包括一个用于嵌入 Servlet 的 ActiveX 控制,下面介绍ActiveX 控制AspToServlet 的方法和属性。 该方法说明如下:
  (1) String ExecServletToString(String servletName);执行 ServletName,并将其输出返回到一个字符串中。 
  (2) ExecServlet(String servletName);执行 ServletName,并将其输出直接发送至 HTML 页面。 
 (3) String VarValue(String varName);获得一预置变量值(其它格式)。
 (4) VarValue(String varName, String newVal);设置变量值。变量占据的总大小应小于 0.5 个千字
节(Kbyte)。且仅对配置文件使用这些变量。 
  其属性如下: 
   Boolean WriteHeaders;若该属性为真,则 Servlet 提供的标题被写入用户处。缺省值为假。 
   Boolean OnTest;若该属性为真,服务器会将消息记录到生成的 HTML 页面中。缺省值为假。
下列ASP 脚本示例是以 Microsoft Visual Basic Scripting(VBScript)书写的。
<%
  ' Small sample asp file to show the capabilities of the servlets and the ASP GateWay ...
%>
<H1> Starting the ASP->Java Servlet demo</H1> 
<% 
  ' Create a Servlet gateway object and initialize it ...
  Set javaasp = Server.CreateObject("AspToServlet.AspToServlet")
  ' Setting these properties is only for the sake of demo.
  ' These are the default values ...
  javaasp.OnTest = False
  javaasp.WriteHeaders = False
  ' Add several variables ...
  javaasp.VarValue("gal") = "lag" 
  javaasp.VarValue("pico")= "ocip"
  javaasp.VarValue("tal") = "lat" 
  javaasp.VarValue("paz") = "zap"
  javaasp.VarValue("variable name with spaces") = "variable value with spaces"
%>
<BR>
Lets check the variables
<% 
  Response.Write("variable gal = ")
  Response.Write(javaasp.VarValue("gal")) 
%>
<BR>
<% 
  Response.Write("variable pico = " & javaasp.VarValue("pico")) 
%>

<BR>
<HR>
<%
  galout = javaasp.ExecServletToString("SnoopServlet") 
  If javaasp.WriteHeaders = True Then 
%>
Headers were written <%
  Else
%>
Headers were not written <%
  End If 
  Response.Write(galout)
%>
<H1> The End ...</H1>


来自网上,作者不详