📄 install.asp
字号:
<!-- #include file="setup.asp" -->
<%
youip="127.0.0.1" '您本机的IP地址
if adminpassword<>"" and remoteaddr<>youip then
error("<li>为了安全起见，请编辑 <font color=red>install.asp</font> 内本机的IP地址<li>请把它设置成 <font color=red>"&remoteaddr&"</font>")
end if
if Request("menu")="ok" then
if Request("administrators")<>"" then
administrators2="|"&replace(Request("administrators"),"||","|")&"|"
master=split(administrators2,"|")
for i = 1 to ubound(master)-1
sql="select * from user where username='"&HTMLEncode(master(i))&"'"
rs.Open sql,Conn
if rs.eof and master(i)<>"" then
message=message&"<li>"&master(i)&"的用户资料还未<a target=_blank href=register.asp?username="&master(i)&">注册</a>"
error(""&message&"")
end if
rs.close
next
end if
rs.Open "clubconfig",Conn,1,3
if rs("administrators")<>"" then
master=split(rs("administrators"),"|")
for i = 1 to ubound(master)-1
conn.execute("update [user] set membercode=1 where username='"&HTMLEncode(master(i))&"'")
next
end if
administrators2="|"&replace(Request("administrators"),"||","|")&"|"
rs("administrators")=replace(administrators2,"||","|")
rs("adminpassword")=Request("adminpassword")
rs("clubname")=Request("clubname")
rs("cluburl")=Request("cluburl")
rs.update
if rs("administrators")<>"" then
master=split(rs("administrators"),"|")
for i = 1 to ubound(master)-1
conn.execute("update [user] set membercode=5 where username='"&HTMLEncode(master(i))&"'")
next
end if
rs.close
succtitle="安装成功"
message=message&"<li><a href=admin.asp>返回社区管理</a><li><a href=Default.asp?menu=listtitle>返回论坛首页</a>"
succeed(""&message&"<meta http-equiv=refresh content=3;url=admin.asp>")
end if
top
%>
<HTML><META http-equiv=Content-Type content="text/html; charset=gb2312">
<link href=images/skins/<%=Request.Cookies("skins")%>/bbs.css rel=stylesheet>
<title>安装BBSXP...</title><br><form method="post"><input type="hidden" value="ok" name="menu"> </div>
<center><table cellSpacing="0" cellPadding="3" width="160" border="0">
<tr>
<td width="626" bordercolor="#FFFFFF">
<table width=435 cellpadding="1" cellspacing="1" border="0" class=a2><tbody>
<tr>
<td align=center width=460 colspan="2" height="25" class=a1><p><b>安装BBSXP</b></p></td>
</tr>
<tr class=a3>
<td align=right width=80 height="20">社区名称：</td>
<td width=300 height="20">
<input name=clubname size=20 value="<%=clubname%>"></td>
</tr>
<tr class=a4>
<td align=right width=80 height="20">社区 URL：</td>
<td width=300 height="20">
<input name=cluburl size=40 value="<%=cluburl%>"></td>
</tr>
<tr class=a3><td align=right width=80 height="20">社区区长：</td>
<td width=300 height="20">
<input name=administrators size="20" value="<%=administrators%>"> 多区长添加请用“|”分隔</td></tr>
<tr class=a4><td align=right width=80 height="20">社区密码：</td>
<td width=300 height="20">
<input name=adminpassword type=password size="20"> <input type="submit" value=" 下一步 "></td></tr>
</tbody></table>
</td></tr></table></FORM>
注：<a target="_blank" href="register.asp">如果区长用户名还没有注册请点击这里进行注册</a>
<%htmlend%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -