为什么这小段代码不能在 "person web server" 运行?

dl_zgq 2004-12-02 09:14:49
<%@ LANGUAGE = VBScript %>
　　<HTML>
　　<HEAD>
　　　　 <TITLE>用ASP提供的浏览器性能组件来辨别客户浏览器</TITLE>
　　 </HEAD>
　　 <BODY BGCOLOR="White" topmargin="10" leftmargin="10">
　　　　<font size="4" face="Arial, Helvetica">
　　　　<b>用ASP提供的浏览器性能组件来辨<br>别客户浏览器</b></font><br>
　　　　<hr size="1" color="#000000">
　　　　 <!-- 定义并创建浏览器性能对象 -->
　　　　 <%
　　　　　 Dim bc
　　　　　 Set bc = Servsr.CreateObject("MSWC.BrowserType")
　　　　 %>
　　　　 <!-- 在表格中描述客户浏览器的信息 -->
　　　　 <Table border=1>
　　　　　　 <tr>
　　　　　　 <td>Browser Name</td>
　　　　　　 <td> <%=bc.Browser %> </Td>
　　　　　　 <tr>
　　　　　　 <td>Browser Version</td>
　　　　　　 <td> <%=bc.Version %> </Td>
　　　　　　 <tr>
　　　　　　 <td>Major Version</td>
　　　　　　 <td> <%=bc.Majorver %> </Td>
　　　　　　 <tr>
　　　　　　 <td>Minor Version</td>
　　　　　　 <td> <%=bc.Minorver %> </Td>
　　　　　　 <tr>
　　　　　　 <td>Frame Support</td>
　　　　　　 <td> <%=bc.Frames %> </Td>
　　　　　　 <tr>
　　　　　　 <td>Table Support</td>
　　　　　　 <td> <%=bc.Tables %> </Td>
　　　　　　 <tr>
　　　　　　 <td>Cookie Support</td>
　　　　　　 <td> <%=bc.Cookies %> </Td>
　　　　　　 <tr>
　　　　　　 <td>Background Sound Support</td>
　　　　　　 <td> <%=bc.BackgroundSounds %> </Td>
　　　　　　 <tr>
　　　　　　 <td>VBScript Support</td>
　　　　　　 <td> <%=bc.VBScript %> </Td>
　　　　　　 <tr>
　　　　　　 <td>JavaScript Support</td>
　　　　　　 <td> <%=bc.JavaScript %> </Td>
　　　　 </table>
　　 </BODY>
</HTML>

==========================================================



错误提示:
Microsoft VBScript 编译器错误 错误 '800a0408'

无效字符

/browser.asp, 行12

　　　　　 Dim bc

...全文
56 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
legend1970 2004-12-02
  • 打赏
  • 举报
 回复
Set bc = Servsr.CreateObject("MSWC.BrowserType")

低级的书写错误，Servsr写错了！！！应该是：

Set bc = Server.CreateObject("MSWC.BrowserType")
dl_zgq 2004-12-02
  • 打赏
  • 举报
 回复
<%@ LANGUAGE = VBScript %>
<HTML>
<HEAD>
<TITLE>用ASP提供的浏览器性能组件来辨别客户浏览器</TITLE>
</HEAD>
<BODY BGCOLOR="White" topmargin="10" leftmargin="10">
<font size="4" face="Arial, Helvetica">
<b>用ASP提供的浏览器性能组件来辨<br>别客户浏览器</b></font><br>
<hr size="1" color="#000000">
<!-- 定义并创建浏览器性能对象 -->
<%
Dim bc
Set bc = Servsr.CreateObject("MSWC.BrowserType")
%>
<!-- 在表格中描述客户浏览器的信息 -->
<Table border=1>
<tr>
<td>Browser Name</td>
<td> <%=bc.Browser %> </Td>
<tr>
<td>Browser Version</td>
<td> <%=bc.Version %> </Td>
<tr>
<td>Major Version</td>
<td> <%=bc.Majorver %> </Td>
<tr>
<td>Minor Version</td>
<td> <%=bc.Minorver %> </Td>
<tr>
<td>Frame Support</td>
<td> <%=bc.Frames %> </Td>
<tr>
<td>Table Support</td>
<td> <%=bc.Tables %> </Td>
<tr>
<td>Cookie Support</td>
<td> <%=bc.Cookies %> </Td>
<tr>
<td>Background Sound Support</td>
<td> <%=bc.BackgroundSounds %> </Td>
<tr>
<td>VBScript Support</td>
<td> <%=bc.VBScript %> </Td>
<tr>
<td>JavaScript Support</td>
<td> <%=bc.JavaScript %> </Td>
</table>
</BODY>
</HTML>

=========================================
又提示错误:

Microsoft VBScript 运行时错误 错误 '800a01a8'

缺少对象: ''

/browser.asp, 行13


lienzhu 2004-12-02
  • 打赏
  • 举报
 回复
<%
Dim bc
Set bc = Servsr.CreateObject("MSWC.BrowserType")
%>
前面有全角的空格字符
lienzhu 2004-12-02
  • 打赏
  • 举报
 回复
呵呵，前面有一些看不到的特殊符号；

<%@ LANGUAGE = VBScript %>
<HTML>
<HEAD>
<TITLE>用ASP提供的浏览器性能组件来辨别客户浏览器</TITLE>
</HEAD>
<BODY BGCOLOR="White" topmargin="10" leftmargin="10">
<font size="4" face="Arial, Helvetica">
<b>用ASP提供的浏览器性能组件来辨<br>别客户浏览器</b></font><br>
<hr size="1" color="#000000">
<!-- 定义并创建浏览器性能对象 -->
<%
Dim bc
Set bc = Servsr.CreateObject("MSWC.BrowserType")
%>
<!-- 在表格中描述客户浏览器的信息 -->
<Table border=1>
<tr>
<td>Browser Name</td>
<td> <%=bc.Browser %> </Td>
<tr>
<td>Browser Version</td>
<td> <%=bc.Version %> </Td>
<tr>
<td>Major Version</td>
<td> <%=bc.Majorver %> </Td>
<tr>
<td>Minor Version</td>
<td> <%=bc.Minorver %> </Td>
<tr>
<td>Frame Support</td>
<td> <%=bc.Frames %> </Td>
<tr>
<td>Table Support</td>
<td> <%=bc.Tables %> </Td>
<tr>
<td>Cookie Support</td>
<td> <%=bc.Cookies %> </Td>
<tr>
<td>Background Sound Support</td>
<td> <%=bc.BackgroundSounds %> </Td>
<tr>
<td>VBScript Support</td>
<td> <%=bc.VBScript %> </Td>
<tr>
<td>JavaScript Support</td>
<td> <%=bc.JavaScript %> </Td>
</table>
</BODY>
</HTML>
mikespook 2004-12-02
  • 打赏
  • 举报
 回复
你看看Dim bc前后是否有特殊字符~~~保险期间，你将这句删掉，用NOTEPAD从新录入~~
30、关于kie-server代码请求方式JSON，XML
Kie-server 是什么，请参考：tomcat下安装kie-server请求kie-server 常用的有两种请求方式，一种是JSON，另一种是XML方式。在项目中，这个是经常会用到的，下面我们通过代码，将这两种方式做一个简单的说明：XML方式：  webservicecxf.webservicecxf.Person person=new webservicecxf.webservicecx...
Java代码优化提点
页前导语        代码优化是指对程序代码进行等价（指不改变程序的运行结果）变换。程序代码可以是中间代码，也可以是目标代码。等价的含义是使得变换后的代码运行结果与变换前代码运行结果相同。优化的含义是最终生成的目标代码更加轻松自如（运行时间更短、占用空间更小）地工作，时空效率优化。       代码调优属于性能优化的范畴，制定代码优化的目标是什么才不会偏离优化的本质。如果开始编码的时候就将大
Servlet---详细讲解servlet（附简单实例代码）
1. 什么是Servlet Servlet（Server Applet），全称Java Servlet。是用Java编写的服务器端程序，其主要功能在于交互式地浏览和修改数据，生成动态Web内容。狭义的Servlet是指Java语言实现的一个接口，广义的Servlet是指任何实现了这个Servlet接口的类，一般情况下，人们将Servlet理解为后者。 Servlet运行于支持Java的应用服务器中。从实现上讲，Servlet可以响应任何类型的请求，但绝大多数情况下，Servlet只用来扩展基于HTTP协
python web后端，笔试面试题四
本文参考自: 原文地址 1.以下不能创建一个字典的语句是? A、dict={}  B、dict2={3:5} C、dict3={[1,2,3]:"uestc"}----答案 D、dict4={(1,2,3):"uestc"} 2.下列代码的运行结果是多少?  class Person: def __init__ (self): pass def getAge(self...
单页WEB应用（六），WebServer Node.js 之 Express
前言（罗里吧嗦）：有一段时间没记录点东西了，主要公司最近有两个新 IPTV 项目上线，问题很多，每天都在忙着处理BUG，对该书的阅读暂停了一会。本篇为第六篇，至于第五篇为什么没有，因为还没写，书和代码研究过了，只是还没记录下来，加上第五篇涉及代码比较多，因此先跳过，来学习下服务器的部分了，第五篇待有空会补上。开始正题1 创建简单服务器最简单的 Node 服务器端程序// 引用 http 模块 var
ASP

28,391

社区成员

357,060

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章