根据分辩率控制层的位置问题！急！

[kenny8023]

我在页面中用到了两个层，不同分辩率下位置不同，于是写了
<script language="VB" runat="server">
public sub Page_Load()
Select case Request.SERVERVARIABLES("HTTP_UA_PIXELS")
　　　　　Case "800X600"
　　　　　　　　Layer1.style.left = "160"
Layer1.style.top = "85"
Layer2.style.left = "157"
Layer2.style.top = "90"
　　　　　Case "1024X768"
　　　　　　　　Layer1.style.left = "193"
Layer1.style.top = "86"
Layer2.style.left = "189"
Layer2.style.top = "90"
　　End Select
end sub
</script>
可是老是报错：
编译错误
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。

编译器错误信息: BC30451: 名称“Layer1”未声明。

源错误:



行 23： Select case Request.SERVERVARIABLES("HTTP_UA_PIXELS")
行 24： Case "800X600"
行 25： Layer1.style.left = "160"
行 26： Layer1.style.top = "85"
行 27： Layer2.style.left = "157"


源文件: E:\dejavu\Product.aspx 行: 25

麻烦大家给看一下这是为什么，我的层名称完全没有错啊！真是急死人了！