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

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

<%if newgbook=1 then%>
<bgsound src="../sub/ring.wav" loop="1">
<SCRIPT FOR=window EVENT=onload LANGUAGE="javascript">
initAd2();//载入页面后，调用函数initAd()
</SCRIPT>
<script language="javascript">
<!--
function initAd2() {
document.all.AdLayer2.style.posTop = -200;
//设置onLoad事件激发以后，广告层相对于固定后的y方向位置
document.all.AdLayer2.style.visibility = "visible"//设置层为可见
MoveLayer2("AdLayer2");//调用函数MoveLayer()
}
function MoveLayer2(layerName) {
var x = 100;//浮动广告层固定于浏览器的x方向位置
var y = 160;//浮动广告层固定于浏览器的y方向位置
var diff = (document.body.scrollTop + y - document.all.AdLayer2.style.posTop)*.40;
var y = document.body.scrollTop + y - diff;
eval("document.all." + layerName + ".style.posTop = y");
eval("document.all." + layerName + ".style.posRight = x");//移动广告层 数据挖掘交友
setTimeout("MoveLayer2("AdLayer2");", 20);//设置20毫秒后再调用函数MoveLayer()
}
//-->
</script>
<div id=AdLayer2 style="position:absolute; width:61px; height:59px; z-index:21; visibility:hidden;right:2px;top: 300px">
<a href="http://lovescity.vicp.net/i_3.asp"><img src="http://lovescity.vicp.net/images/newgbook2.gif" border="0"></a>
</div>

<%end if%>

提示说53行缺少END求高手指教！

问题补充：我有个文件调用了这个页面！

53 行是哪一行 ...?

报错应该和你发出来的这些代码无关 ...

谢谢!我再看看其他的文件