一道简单的ASP代码，可是错了，不知道怎么办啊，求帮助
//好像有好几个错误，什么末结束字符串，无效的script
<%@ language=vbscript %>
<% script language="jscript" %>
<!--
function check()
{
var notnull
notnull=true
if(document.login.UID value="")
{
window.altert("请输入账号")
notnull=flase
}
if(document.login.PWD value="")
{
window.altert"请输入密码"
notnull=flase
}
if(document.login.Nickname value="")
{
window.altert"请输入昵称"
notnull=flase
}
return notnull
}
//-->
</script>
<html>
<body>
<%
dim onlineusers
set rs=server.createobject("adodb.recordset")
mysql="select *from onlineuser"
rs.open mysql,"DSN=char",1,3
if not rs.bof then
rs.movelast
onlineusers=rs.recordcound
else
onlineusers=0
end if
rs.close
set rs=nothing
%>
<table width="820" border="0" bordercolor="#000000">
<tr>
<td colspan="2" bgcolor="#000000"> </td>
</tr>
<tr>
<td height="25" colspan="2" bgcolor="#3399CC"><div align="right"><span class="STYLE1"><a href="usermanage.asp">管理员登录</a><a href="reg.asp"> 新用户注册 </a></span></div></td>
</tr>
<tr>
<td height="100" colspan="2" background="1-3.jpg"><div align="center">
<p><span class="STYLE2">无忧</span>聊吧</p>
</div></td>
</tr>
<tr>
<td height="55" colspan="2"><form name="login" method="post" action="inlasp">
账号:
<label>
<input name="UID" type="text" id="UID" size="16">
</label>
密码:
<label>
<input name="PWD" type="text" id="PWD" size="16">
</label>
昵称
<label>
<input name="Nickname" type="text" id="Nickname" size="10">
</label>
<input type="submit" name="Submit" value="进入">
<label></label>
<input type="submit" name="Submit2" value="取消">
<span class="STYLE3"><a href="reg.asp">新用户注册</a></span>
</form> </td>
</tr>
<tr>
<td height="31"> 当前聊天室情况</td>
</tr>
<%
dim howmanyrooms
set myrecord=server.createobject("adodb",recordest")
mysql="select * from roominfo"
myrecord.Open mysql,"DSN=char",1,3
%>
<tr>
<td><table width="600" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#E7F0E6">
<tr>
<td height="25" align="center">房间ID</td>
<td height="25" align="center">聊天房间</td>
<td height="25" div align="center">狂聊话题</td>
<td height="25" div align="center">当前人数</td>
</tr>
<%
do while myrecord.eof
onlineusers=onlineusers+int(myrecord("onlineusers"))
%>
<tr>
<td width="%15" hight="25" align="center"><%=myrecord("RoomID") %></td>
<td width="%15" hight="25" align="center"><%=myrecord("RoomName") %></td>
<td width="%15" hight="25" align="center"><%=myrecord("topic") %></td>
<td width="%15" hight="25" align="center"><%=myrecord("onlineusers") %></td>
</tr>
<%
myrecord.MoveNext
loop
myrecord.close
%>
<p align="center"><span>当前共有聊天成员:<%=onlineusers%></span><span>当前以有聊天房间:<%=howmanyrooms%></pan></p>
</table>
</td>
</tr>
<td height="50 colspan="3" bgcolor="#50824D" align="center">无忧聊吧</td>
</tr>
</table>
<%
set myrecord=nothing
howmanyrooms=myrecord.recordCount
%>
</body>
</html>
