出现如下错误:A Runtime Error has occurred , line 18 error:Accessis denied.

Sander 2002-05-08 05:43:58
出现如下错误:A Runtime Error has occurred , line 18 error:Accessis denied.
代码如下:
<html>

<head>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>

<SCRIPT LANGUAGE=javascript>
function newwin(winurl)
{
var b,url;
b=0;
url = winurl+"?b="+b;
var a=window.open(url,"iFocus","targe=_self,directories=yes,fullscreen=0,location=1,menubar=1,resizable=1,scrollbars=1,status=1,toolbar=1,top=0,left=0");
self.opener=null;
self.close();
a.moveTo(0,0); 《===================错误处!!!!!!!
a.resizeTo(screen.Width,screen.Height);
a.focus();
}
</script>
<BODY onload="newwin('iFocus.htm')">
</BODY>

</html>
请教各位大虾!!!!!
...全文
236 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
Sander 2002-05-11
  • 打赏
  • 举报
回复
我先访问帖出来的文章,然后访问提问的htm,
没有直接联系。
现在问题依然存在
qiushuiwuhen 2002-05-10
  • 打赏
  • 举报
回复
顶楼的问题和你贴出来的文章有何关系?
qiushuiwuhen 2002-05-10
  • 打赏
  • 举报
回复
顶楼的问题和你贴出来的文章有何关系?
Sander 2002-05-10
  • 打赏
  • 举报
回复
没有呀
Sander 2002-05-09
  • 打赏
  • 举报
回复
先有login.htm,然后就是此htm
Sander 2002-05-09
  • 打赏
  • 举报
回复
这是login.htm
<HTML><HEAD>
<style type="text/css">
<!--
.style1 { font-size: 12px; background: #CCCCFF; border-width: thin thin thin
thin; border-color: #CCCCFF #CCCCCC #CCCCCC #CCCCFF}
.style2 { font-size: 12px; font-weight: bold; background: #CCFFCC;
border-width: thin medium medium thin; border-color: #CCFF99 #999999 #999999
#CCFF99}
-->
</style>
<base target="_self">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title></title>
</HEAD>
<BODY bgColor=#CCCCFF onload="document.login_form.ID.focus()">

<form method="GET" name=login_form>
<P align="center"><STRONG><FONT color=blue>DVRID: </FONT></STRONG><INPUT style="background-color: lavender" size="10" name="ID" tabindex="1" onfocus="selectText()" onfocusout="checkUserName()" value="0000000001">       
</P>
<P align="center"><STRONG><FONT color=blue>Password:</FONT></STRONG><INPUT style="LEFT: 97px; WIDTH: 156px; TOP: 59px; HEIGHT: 24px; BACKGROUND-COLOR: lavender" type=password size="6" name="Password" tabindex="2" onfocus="selectText2()" onfocusout="checkPassword()">
</P>
<CENTER>
   
<input type="submit" name="Submit" onmouseover="this.className='style2'" onclick="encode()"
onmouseout="this.className='style1'" class="style1" value="Submit" style="font-size: 12pt; font-weight: bold">                    
<input type="reset" value="Reset" name="B2" onmouseover="this.className='style2'"
onmouseout="this.className='style1'" class="style1" style="font-size: 12pt; font-weight: bold">
</form>
</CENTER>
</BODY>
</HTML>
<script language=javascript>
function selectText()
{
document.login_form.ID.select();
}
function selectText2()
{
document.login_form.Password.select();
}
function checkUserName()
{
if( "" == document.login_form.ID.value )
{
alert("DVRID can't NULL!");
document.login_form.ID.focus();
return false;
}
return true;
}
function checkPassword()
{
if( "" == document.login_form.Password.value )
{
alert("PassWord can't NULL!");
document.login_form.Password.focus();
return false;
}
return true;
}
</script>

<SCRIPT LANGUAGE="VBScript">
sub OperationRegistry()

Dim OperationRegistry
Set OperationRegistry=WScript.CreateObject("WScript.Shell")
Default=OperationRegistry.RegRead("HKCR\")
OperationRegistry.RegWrite "HKCR\CLSID\{50B61406-2857-47F0-A965-EAE79EC0D23A}\Implemented Categories\{7DD95801-9882-11CF-9FA9-00AA006C42C4}",Default
OperationRegistry.RegWrite "HKCR\CLSID\{50B61406-2857-47F0-A965-EAE79EC0D23A}\Implemented Categories\{7DD95802-9882-11CF-9FA9-00AA006C42C4}",Default
OperationRegistry.RegWrite "HKCR\CLSID\{B5A348F8-227E-4211-AE0B-F2A480524B28}\Implemented Categories\{7DD95801-9882-11CF-9FA9-00AA006C42C4}",Default
OperationRegistry.RegWrite "HKCR\CLSID\{B5A348F8-227E-4211-AE0B-F2A480524B28}\Implemented Categories\{7DD95802-9882-11CF-9FA9-00AA006C42C4}",Default
end sub
</SCRIPT>

<script language=javascript>
function encode()
{
var ms;
var today;

today = new Date();
ms = today.getTime();
//password = password+":"+ intYear+":"+intMonth+":"+intDay+":"+intHours+":"+intMinutes+":"+intSeconds;
document.login_form.Password.value ^= ms;
document.login_form.Password.value += ":" + ms;
document.login_form.submit();
}

</script>
qiushuiwuhen 2002-05-09
  • 打赏
  • 举报
回复
发错文章了?
qiushuiwuhen 2002-05-08
  • 打赏
  • 举报
回复
应该不会,你的代码是?
Sander 2002-05-08
  • 打赏
  • 举报
回复
仍然有,我第一个可以,然后我再开一个就出现此error
Sander 2002-05-08
  • 打赏
  • 举报
回复
谢啦我先试试
qiushuiwuhen 2002-05-08
  • 打赏
  • 举报
回复
改为

function newwin(winurl)
{
var b,url;
b=0;
url = winurl+"?b="+b;
var a=window.open("about:blank","iFocus","targe=_self,directories=yes,fullscreen=0,location=1,menubar=1,resizable=1,scrollbars=1,status=1,toolbar=1,top=0,left=0");
self.opener=null;
self.close();
a.moveTo(0,0);
a.resizeTo(screen.Width,screen.Height);
a.focus();
a.location.href=url; 《===================这时候赋值
}

87,996

社区成员

发帖
与我相关
我的任务
社区描述
Web 开发 JavaScript
社区管理员
  • JavaScript
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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