一个错误，请各位大侠帮帮忙，感激不尽，在线等待！

sjp7977 2003-12-03 11:02:57
请问如下错误是为什么
1、
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

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

缺少对象: 'Application(...)'

/email/default.asp，行10


2、
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

服务器对象 错误 'ASP 0177 : 800401f3'

Server.CreateObject 失败

/email/create.asp，行13

无效的 ProgID。 若要获取关于此消息的更多的信息，请访问 Microsoft 联机支持站点: http://www.microsoft.com/contentredirect.asp 。


...全文
76 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
sjp7977 2003-12-03
  • 打赏
  • 举报
 回复
default.asp
<% Response.Expires=0 %>

<%
un = trim(request("username"))
pw = trim(request("password"))
Response.Cookies("name") = ""

if un <> "" and pw <> "" then
dim ei
set ei = Application("em")
Session("wem") = ""

if ei.CheckPassWord(un, pw) = true then
Session("wem") = un
set ei = nothing

Response.Redirect "welcome.asp"
else
set ei = nothing
Response.Write "密码错误！请再次输入。<br>"
end if
end if

Session("wem") = ""
%>

<html>
<head>
<META HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80">
<style><!--
body,p,td,a{font-size:12pt;}
-->
</style>

<SCRIPT LANGUAGE=javascript>
<!--
function window_onload() {
f1.username.focus();
}
//-->
</SCRIPT>
</head>

<body LANGUAGE=javascript onload="return window_onload()" bgcolor="#FFFFEF">
<p align="center">　</p>
<form name="f1" method="post" action="default.asp">
<div align="center">
<table width="60%" border="1" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" bordercolorlight="#000000" height="276">
<tr bgcolor="#CCCCFF">
<td colspan="5" height="25">
</td>
</tr>
<tr>
<td height="227" colspan="5">
<div align="center">
<table width="52%" border="1" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" bordercolorlight="#000000" height="39">
<tr>
<td height="25" width="29%">
<div align="center">用户名</div>
</td>
<td height="25" colspan="5" width="71%">
<div align="center">
<input type="text" name="username" maxlength="64">
</div>
</td>
</tr>
<tr>
<td height="25" width="29%">
<div align="center">密　码</div>
</td>
<td height="25" colspan="5" width="71%">
<div align="center">
<input type="password" name="password" maxlength="32">
</div>
</td>
</tr>
<tr>
<td height="25" colspan="6">
<div align="center"><font size="2">
<input type=submit value=" 确 定 " style='cursor:hand;'>
</font></div>

</td>
</tr>
</table>
</div>
<p align="center"></p>
<div align="center">

<table width="190" border="1" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" bordercolorlight="#000000" height="39">
<tr>
<td height="25" colspan="5" width="186">
<div align="center"><font size="2">如果您是第一次使用请先</font><font size="2"><br>
</font><a href="xeyi.htm">申请邮箱</a></div>
</td>
</tr>
</table> </div>

</td>
</tr>
</table>
</div>
<p align="center"> </p>
<div align="center">
<table width="625" border="0">
<tr>
<td width="98">
</td>
<td width="5">
</td>
<td width="183">
</td>
<td width="9">
</td>
<td width="245">
</td>
<td width="4">
</td>
<td width="79">
<a href="http://172.20.5.50" target="_top"><font size="2">返回首页</font></a>
</td>
</tr>
</table>
</div>
</form>
<HR align=center color=#ffa500 width="95%" size="1">

<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width="498">
<TBODY>
<TR>
</TR>
<TR>
<TD align="center" width="496">
<table width="487">
<tr>
<td align="left" height="21" width="479">

</td>
</tr>
<tr>
<td align="left" height="21" width="479">

</td>
</tr>
</table>
</TD></TR>
<TR>
<TD width="496"></TD></TR>
</TBODY></TABLE>
</body>
</html>
monkeys 2003-12-03
  • 打赏
  • 举报
 回复
建议你将代码贴出来，方便大家找问题
aspczlover 2003-12-03
  • 打赏
  • 举报
 回复
1、
if .. then
...
...
end if

2、
组件是否注册？
yeno 2003-12-03
  • 打赏
  • 举报
 回复
首先你所调用的Application变量肯定没有赋值，其次在ASP中if与end if一定要成对使用
if .. then
...
...
end if
pzk 2003-12-03
  • 打赏
  • 举报
 回复
第一个好象是没有进行赋值就直接读取吧
选赋值试一下:
application("a")="test"
response.write application("a")

第二个应该是试图建立一个服务器上没有注册的对象
你是不是打算建一个发邮件的对象(如Jmail什么的)
最好看一个服务器上有没有这个组件. 没有的话可以自已选按装上.
云帆 2003-12-03
  • 打赏
  • 举报
 回复
把代码贴出来看看啊，光看这怎么知道错误在哪呢！
possible_Y 2003-12-03
  • 打赏
  • 举报
 回复
1、看看你的代码
2、你的组件是否注册了？
sjp7977 2003-12-03
  • 打赏
  • 举报
 回复
什么？
vivisogood 2003-12-03
  • 打赏
  • 举报
 回复
看看代码啊！
贴出来
luken 2003-12-03
  • 打赏
  • 举报
 回复
十有八九事你的com 组件注册的问题。你是着把你的组件在windows 的com 中注册后再看看。
DeltaCat 2003-12-03
  • 打赏
  • 举报
 回复
Application("em") 是什么？
sjp7977 2003-12-03
  • 打赏
  • 举报
 回复
怎么没有人回答我了呢？？？？
c语言编译不出来,求助，各位大哥帮帮忙，我的C语言编译不出来啊
求助，各位大哥帮帮忙，我的C语言编译不出来啊，错误很多，请各位大侠指正，小弟感激不尽！#include #include#define uchar unsigned char#define uintunsigned int#define datain P1sbit datainkj = P1^5;sbit ...
各位大侠，通过php 读取字符串 求帮忙
$str="谢姣 毕丹丹 马朝莉 李欣 李萍"; ...有这么一段字符串 通过php处理字符串，得到 一个新的数组（名字，count值）；...比如生成 $ars=array('0'=>'谢姣','0'=>'毕丹丹','0'=>'马朝莉',...求各大侠帮帮忙，感激不尽
关于序列化的问题！！！哪位大侠帮帮忙？？？
 最近在做一个港口物流中提箱翻箱的通信系统。  大体上是这样的：这个系统是由四个Agent组成的，它们之间互相通信，是运用TCP通信协议的，通信的消息通过一个消息类来保存。  它们相互通信的原理...
MATLAB等参数线法,求助用L曲线法确定正则化参数
各位大侠好，我昨天找个一个正则化工具箱，打开一看却不会用，看不懂需要输入什么参数，请各位帮帮忙。程序如下。我理解是包含四种方法，我现在只需要用第一种‘Tikh’,求一个线性方程组‘Ax=B’，不明白这里的U,sm,...
vb与mysql实现登录界面_VB连接SQL数据库做用户登录窗口
我要做一个VB+SQL的图书管理系统,但是在用户登录窗口处被卡住了,求各位大虾们帮帮忙!界面上只用输入用户名和密码,数据库是tsglxt_Data,表名为user,表中用户名是userName,密码是passwo...我要做一个VB+SQL的图书管理...
ASP

28,407

社区成员

356,948

社区内容

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

加载中

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

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

+ 用AI写文章