admin_setup.asp

秘密网源代码 传闻拉了 100W风投

<!-- #include file="Setup.asp" -->
<%
if RequestCookies("Userpass")="" or RequestCookies("Userpass")<>session("pass") then Response.Write ("<script>top.location.href='login.asp';</script>")
if UserRoleID <> 1 then Alert("您没有权限进入后台")
select case Request("menu")
	case "Showbanner"
		Showbanner
	case "Showbanner2"
		Showbanner2
	case "Showbanner3"
		Showbanner3
	case "Showbanner4"
		Showbanner4
	case "variable"
		variable
	case "SiteSettingsUp"
		SiteSettingsUp
	case "SiteSettingsUp2"
		SiteSettingsUp2
	case "SiteSettingsUp3"
		SiteSettingsUp3
	case "SiteSettingsUp4"
		SiteSettingsUp4
	case "SiteInfo"
		SiteInfo
	case "UserAgreement"
		UserAgreement
end select

Sub variable
%>
<script language="JavaScript">
function VerifyInput() {
	if (document.form.SiteName.value == "")
	{
		alert("请输入站点名称");
		return false;
	}
	if (document.form.DefaultSiteStyle.value == "")
	{
		alert("默认风格不能没有设置");
		return false;
	}
}
</SCRIPT>

<form method="POST" action="?menu=SiteInfo" onsubmit="return VerifyInput();" name=form>
<table cellspacing=0 cellpadding=0 width=100%>
  <tr height=22 style="text-align:center">
    <td class=PannelOn id=PannelHeader0 onclick="ShowPannel(0,8)">普通配置</td>
    <td class=PannelOff id=PannelHeader1 onclick="ShowPannel(1,8)">首页显示</td>
    <td class=PannelOff id=PannelHeader6 onclick="ShowPannel(6,8)">窝友注册</td>
    <td class=PannelOff id=PannelHeader7 onclick="ShowPannel(7,8)">群组设置</td>
    <td class=PannelOff id=PannelHeader2 onclick="ShowPannel(2,8)">上传设置</td>
    <td class=PannelOff id=PannelHeader4 onclick="ShowPannel(4,8)">邮件设置</td>
    <td class=PannelOff id=PannelHeader5 onclick="ShowPannel(5,8)">过滤设置</td>
    <td class=PannelOff id=PannelHeader8 onclick="ShowPannel(8,8)">验证码设置</td>
    <td class=PannelOff id=PannelHeader3 onclick="ShowPannel(3,8)">积分和经验设置</td>
    <td width=50 class="TableRight">　</td>

  </tr>
</table>

<table id="Pannel0" style="display:" cellspacing=0 cellpadding=0 width=100% class="PannelBody">
	<tr>
		<td width="30%"><a class="helpicon" title='群组名称，显示在每个页面上'><img src="../images/spacer.gif" border="0"></a><b>站点名称</b></td>
		<td><input size="30" name="SiteName" value="<%=SiteConfig("SiteName")%>"></td>
	</tr>


	<tr>
		<td><a class="helpicon" title='键入简短的网页说明。如果网站访问者在您的网站或万维网上搜索内容，则会在搜索结果中看到此说明。'><img src="../images/spacer.gif" border="0"></a><b>META标签-描述信息</b></td>
		<td><input size="60" name="MetaDescription" value="<%=SiteConfig("MetaDescription")%>" /></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='键入描述网页内容的一个或多个关键字（用一个逗号和一个空格分隔）。一些 Internet 搜索引擎使用这些关键字来确定网页是否满足搜索查询条件。'><img src="../images/spacer.gif" border="0"></a><b>META标签-关键字</b></td>
		<td><input size="60" name="MetaKeywords" value="<%=SiteConfig("MetaKeywords")%>" /></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='默认:20'><img src="../images/spacer.gif" border="0"></a><b>统计窝友在线时间（分钟）</b></td>
		<td><input size="20" value="<%=SiteConfig("UserOnlineTime")%>" name="UserOnlineTime"></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='默认:60'><img src="../images/spacer.gif" border="0"></a><b>脚本超时时间（秒）</b></td>
		<td><input size="20" value="<%=SiteConfig("Timeout")%>" name="Timeout"></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='指定 ../skin/ 目录下的目录名即可 [默认:default]'><img src="../images/spacer.gif" border="0"></a><b>默认风格目录</b></td>
		<td><input size="20" value="<%=SiteConfig("DefaultSiteStyle")%>" name="DefaultSiteStyle"></td>
	</tr>

	<tr>
		<td><a class="helpicon" title='请输入公司/组织名称'><img src="../images/spacer.gif" border="0"></a><b>公司/组织名称</b></td>
		<td><input size="30" name="CompanyName" value="<%=SiteConfig("CompanyName")%>"></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='请输入公司/组织网址'><img src="../images/spacer.gif" border="0"></a><b>公司/组织网址</b></td>
		<td><input size="30" value="<%=SiteConfig("CompanyURL")%>" name="CompanyURL"></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='维护期间可设置关闭网站'><img src="../images/spacer.gif" border="0"></a><b>网站状态</b></td>
		<td><input type="radio" name="SiteDisabled" value=1 <%if SiteConfig("SiteDisabled")=1 then%>checked<%end if%>>关闭 <input type="radio" name="SiteDisabled" value=0 <%if SiteConfig("SiteDisabled")=0 then%>checked<%end if%>>打开</td>
	</tr>
</table>

<table id="Pannel1" style="display:none" cellspacing=0 cellpadding=0 width=100% class="PannelBody">
	<tr>
		<td width="30%"><a class="helpicon" title='在首页上显示“窝友在线信息”部分'><img src="../images/spacer.gif" border="0"></a><b>显示在线窝友</b></td>
		<td>
		<input type="radio" name="DisplayWhoIsOnline" value=1 <%if SiteConfig("DisplayWhoIsOnline")=1 then%>checked<%end if%>>是 
		<input type="radio" name="DisplayWhoIsOnline" value=0 <%if SiteConfig("DisplayWhoIsOnline")=0 then%>checked<%end if%>>否 
		</td>
	</tr>	
	<tr>
		<td><a class="helpicon" title='在首页上显示“统计信息”部分'><img src="../images/spacer.gif" border="0"></a><b>显示统计信息</b></td>
		<td>
		<input type="radio" name="DisplayStatistics" value=1 <%if SiteConfig("DisplayStatistics")=1 then%>checked<%end if%>>是 
		<input type="radio" name="DisplayStatistics" value=0 <%if SiteConfig("DisplayStatistics")=0 then%>checked<%end if%>>否 
		</td>
	</tr>
	<tr>
		<td><a class="helpicon" title='在首页上显示“今天过生日的窝友”部分'><img src="../images/spacer.gif" border="0"></a><b>显示今天的生日榜</b></td>
		<td>
		<input type="radio" name="DisplayBirthdays" value=1 <%if SiteConfig("DisplayBirthdays")=1 then%>checked<%end if%>>是 
		<input type="radio" name="DisplayBirthdays" value=0 <%if SiteConfig("DisplayBirthdays")=0 then%>checked<%end if%>>否 
		</td>
	</tr>
	<tr>
		<td><a class="helpicon" title='在首页上显示“友情链接”部分'><img src="../images/spacer.gif" border="0"></a><b>显示友情链接</b></td>
		<td>
		<input type="radio" name="DisplayLink" value=1 <%if SiteConfig("DisplayLink")=1 then%>checked<%end if%>>是 
		<input type="radio" name="DisplayLink" value=0 <%if SiteConfig("DisplayLink")=0 then%>checked<%end if%>>否 
		</td>
	</tr>
</table>

<table id="Pannel2" style="display:none" cellspacing=0 cellpadding=0 width=100% class="PannelBody">
	<tr><td colspan="2"><font size=4 color="#C0C0C0"><b>上传组件选择</b></font></td></tr>

	<tr>
		<td width="40%"><a class="helpicon" title='根据 服务支持的组件 选择上传组件'><img src="../images/spacer.gif" border="0"></a><b>选择上传组件</b></td>
		<td>
		<select name="UpFileOption" size="1" onchange="IsObjInstalled('IsUpFileInstalled',this.options[this.selectedIndex].value)">
		<option value="">关闭</option>
		<option value="ADODB.Stream" <%if SiteConfig("UpFileOption")="ADODB.Stream" then%>selected<%end if%>>ADODB.Stream</option>
		<option value="SoftArtisans.FileUp" <%if SiteConfig("UpFileOption")="SoftArtisans.FileUp" then%>selected<%end if%>>SoftArtisans.FileUp</option>
		</select> <span id="IsUpFileInstalled"></span></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='默认:10 KB'><img src="../images/spacer.gif" border="0"></a><b>允许单个头像文件的大小 (KB)</b></td>
		<td><input size="20" value="<%=SiteConfig("MaxFaceSize")%>" name="MaxFaceSize"></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='默认:1024 KB（1M）'><img src="../images/spacer.gif" border="0"></a><b>允许单个主题附件的大小 (KB)</b></td>
		<td><input size="20" value="<%=SiteConfig("MaxFileSize")%>" name="MaxFileSize"></td>
	</tr>
	<tr>
		<td><a class="helpicon" title='默认:10240 KB（10M）'><img src="../images/spacer.gif" border="0"></a><b>设置窝友上传文件夹的最大容量 (KB)</b></td>
		<td><input size="20" value="<%=SiteConfig("MaxPostAttachmentsSize")%>" name="MaxPostAttachmentsSize"></td>
	</tr>
	
	
	<tr>
		<td><a class="helpicon" title='例如：gif|jpg|png|bmp|swf|txt|mid|doc|xls|zip|rar'><img src="../images/spacer.gif" border="0"></a><b>允许上传的附件类型（请用“|”分隔）</b></td>
		<td><input size="60" value="<%=SiteConfig("UpFileTypes")%>" name="UpFileTypes"></td>
	</tr>	
	
	
	<tr><td colspan="2"><font size=4 color="#C0C0C0"><b>水印组件选择</b></font></td></tr>
	<tr>
		<td width="30%"><a class="helpicon" title='水印组件设置：关闭/启用'><img src="../images/spacer.gif" border="0"></a><b>水印图片组件</b></td>
		<td>
		<select name="WatermarkOption" size="1" onchange="IsObjInstalled('IsWatermarkInstalled',this.options[this.selectedIndex].value)">
		<option value="">关闭</option>
		<option value="Persits.Jpeg" <%if SiteConfig("WatermarkOption")="Persits.Jpeg" then%>selected<%end if%>>Persits.Jpeg</option>
		</select> <span id="IsWatermarkInstalled"></span>
		</td>
	</tr>
	<tr>
		<td><a class="helpicon" title='请选择：水印效果（只支持JPEG）'><img src="../images/spacer.gif" border="0"></a><b>水印效果</b></td>
		<td><select name="WatermarkType" size="1">
		<option value="0" <%if SiteConfig("WatermarkType")="0" then%>selected<%end if%>>水印文字</option>
		<option value="1" <%if SiteConfig("WatermarkType")="1" then%>selected<%end if%>>水印图片</option>
		</select></td>
	</tr>
	
	
	<tr>
		<td><a class="helpicon" title='水印水平位置'><img src="../images/spacer.gif" border="0"></a><b>水印水平位置</b></td>
		<td>
		<input type="radio" name="WatermarkWidthPosition" value="left" <%if SiteConfig("WatermarkWidthPosition")="left" then%>checked<%end if%>>左
		<input type="radio" name="WatermarkWidthPosition" value="center" <%if SiteConfig("WatermarkWidthPosition")="center" then%>checked<%end if%>>中
		<input type="radio" name="WatermarkWidthPosition" value="right" <%if SiteConfig("WatermarkWidthPosition")="right" then%>checked<%end if%>>右
		</td>
	</tr>

	<tr>
		<td><a class="helpicon" title='水印垂直位置（此项只针对图片）'><img src="../images/spacer.gif" border="0"></a><b>水印垂直位置</b></td>
		<td>
		<input type="radio" name="WatermarkHeightPosition" value="top" <%if SiteConfig("WatermarkHeightPosition")="top" then%>checked<%end if%>>上
		<input type="radio" name="WatermarkHeightPosition" value="center" <%if SiteConfig("WatermarkHeightPosition")="center" then%>checked<%end if%>>中
		<input type="radio" name="WatermarkHeightPosition" value="bottom" <%if SiteConfig("WatermarkHeightPosition")="bottom" then%>checked<%end if%>>下
		</td>
	</tr>	
	
	
	<tr><td colspan="2"><font size=4 color="#C0C0C0"><b>水印文字</b></font></td></tr>
	<tr>
		<td><a class="helpicon" title='该文字将显示于窝友上传的图片上'><img src="../images/spacer.gif" border="0"></a><b>水印文字</b></td>
		<td><input size="30" value="<%=SiteConfig("WatermarkText")%>" name="WatermarkText"></td>
	</tr>
	

	<tr>
		<td><a class="helpicon" title='用于设置水印文字字体名称'><img src="../images/spacer.gif" border="0"></a><b>水印文字字体</b></td>
		<td>
		<SELECT name="WatermarkFontFamily">
		<option value="<%=SiteConfig("WatermarkFontFamily")%>" selected><%=SiteConfig("WatermarkFontFamily")%></option>
		<option value="宋体">宋体</option>
		<option value="黑体">黑体</option>
		<OPTION value="Arial">Arial</OPTION> 
		<OPTION value="Arial Black">Arial Black</OPTION> 
		<OPTION value="Times New Roman" >Times New Roman</OPTION>
		<OPTION value="Garamond">Garamond</OPTION>
		<OPTION value="Lucida Handwriting">Lucida Handwriting</OPTION>
		<OPTION value="Verdana">Verdana</OPTION>
		</SELECT>
		</td>
	</tr>
	<tr>