谁知道哪错了????????急!!!!!!
刘云涛 2003-10-13 12:17:20 我一运行提示:缺少 ; 和缺少对象????/
以下是完整代码!
<%
Dim StrErrMsg
StrErrMsg = ""
Take_Name = request.form("login_name")
Take_Pw = request.form("login_password")
if take_Name <>"1" and Take_Pw<>"1" then
StrErrMsg = "您输入的用户名或密码不正确,您的操作被取消!"
else
session("loginName") = rs("user_name")
' StrErrMsg = "会员你好:您已经成功登陆了本站!"
end if
%>
<html>
<head>
<script language = "javascript">
function login()
{
Var ErrMsg = "<%=StrErrMsg%>"
if (ErrMsg ! = ""){
alert(ErrMsg);
}
else{
opener.location.reload();
}
window.close();
}
</script>
</head>
<body onload = "login();">
</body>
</html>