OFFICE办公自动化
源代码在线查看: 复件 default.asp
if (document.location!=top.location) top.location=document.location;
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
function CheckData()
{
if(jtrim(document.loginform.LoginName.value)=="")
{
alert("请输入登录用户名。")
document.loginform.LoginName.focus();
return false;
}
//return true;
document.loginform.submit();
}
function jtrim(s)
{
var i,b=0,e=s.length;
for(i=0;i if(i==s.length) return "";
for(i=s.length-1;i>b;i--) if(s.charAt(i)!=' '){e=i;break;}
return s.substring(b,e+1);
}
body {
margin-top: 0px;
}
-->
Errmsg=trim(request("ErrorMessage"))
if Errmsg"" then
response.write "alert('"& ErrMsg &"')"
end if
quit=trim(request("quit"))
if quit="1" then
Session("LoginName") = ""
Session("LoginID") = ""
Session("LoginOK")= false
session.abandon
Errmsg="您已经退出了登录。"
'response.write ""& ErrMsg &""
end if
Change=trim(request("Change"))
if Change="1" then
Session("LoginName") = ""
Session("LoginID") = ""
Session("LoginOK")= false
Errmsg="请输入您要登录的用户名。"
response.write "alert('"& ErrMsg &"')"
end if
%>
用 户
密 码