<!--#include file="Setup.asp"-->
<!-- #include file="inc/MD5.asp" -->
<!--#include file="Pet/PetSetup.asp"-->
<%
Call Top
if CookieUserName=empty then error("<li>您还未<a href=login.asp>登录</a>社区")

If Request("Action")="Install" then
session("pass")=md5(""&Request.Form("pass")&"")

if SiteSettings("AdminPassword")<>session("pass") then
error2("社区管理密码错误")
else
ConnPet.Execute("Update [PetSetup] Set PetMaster='"&Request("PetMaster")&"'")
response.write "<script>alert('永恒宠物安装成功,建议您在安装结束后删除此程序')</script>"
end if

end if
ShowPetTop("永恒宠物(EternalPet)安装程序")

response.write "<form action='?Action=Install' method=post>"
response.write "<table width=100% align=center cellpadding=4 cellspacing=1 class=a2>"
response.write "<tr class=a3>"
response.write "<td align=right width=200><b>宠物管理员</b>:</td>"
response.write "<td><input name='PetMaster' style='width:300px'></td>"
response.write "<td>如设置多个管理员，请用|'隔开</td>"
response.write "<tr class=a3>"
response.write "<td align=right width=200><b>论坛后台密码</b>:"
response.write "<td><input name='pass' type='password' style='width:300px'></td><td>验证论坛后台密码,防止非站长修改</td></tr>"
response.write "<tr class=a3><td colspan=3 align=center><span class=petbutton style=cursor:hand; onclick='submit()'>安装永恒宠物(EternalPet)</span></td></tr></table>"
response.write "</form>"


ShowPetBottom
htmlend
%>

