admin_setup.asp

来自「电子备课系统」· ASP 代码 · 共 653 行 · 第 1/3 页

      <td width="348" height="25" > <p>新用户注册是否需要管理员认证：<br>
          </p></td>
      <td> <% Call EchoRadio("a18","","",ac(18))%></td>
    </tr>
    <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25" > <p>邮件地址唯一：</p></td>
      <td> <% Call EchoRadio("a22","","",ac(22))%></td>
    </tr>
    <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25" > <p>昵称不允许重复：</p></td>
      <td> <% Call EchoRadio("a47","","",ac(47))%></td>
    </tr>
    <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25" > <p>博客名称不允许重复：</p></td>
      <td> <% Call EchoRadio("a48","","",ac(48))%></td>
    </tr>
      <td height="25" class="topbg"><a name="log"></a><strong>日志选项</strong></td>
      <td class="topbg1"><a href="#top"><img src="images/ico_top.gif" border=0></a>&nbsp;<a href="#formbottom"><img src="images/ico_bottom.gif" border=0></a>&nbsp;</td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''" style="display:''">
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">单篇日志允许最多字数：</td>
      <td><% Call EchoInput("a34",10,10,ac(34))%>
        字(英文字符) </td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">单篇日志允许最多TAG数：</td>
      <td><% Call EchoInput("a73",10,10,ac(73))%>
         </td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">单篇日志允许最多引用通告数：</td>
      <td><% Call EchoInput("a74",10,10,ac(74))%>
         </td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">发表日志，系统日志分类是否为必须：</td>
      <td><% Call EchoRadio("a25","","",ac(25))%></td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">是否允许日志全文搜索(建议关闭)：</td>
      <td> <% Call EchoRadio("a26","","",ac(26))%></td>
    </tr>
      <td width="348" height="25">日志自动保存为草稿的时间（默认2分钟）：</td>
      <td><% Call EchoInput("a7",10,10,ac(7))%>分&nbsp;<font color="#FF0000">（数值不要太小，否则极耗费资源）</font></td>
    </tr>
	 <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25" >系统自动清理多少天以前的回收站日志：<br>
        </td>
      <td> <% Call EchoInput("a87",10,10,ac(87))%>天  （建议设置三个月以上 即 100 系统默认最小为 60 天）</td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">全站更新每更新<%=P_BLOG_UPDATEPAUSE%>篇日志暂停的时间：</td>
      <td><% Call EchoInput("a28",10,10,ac(28))%>秒&nbsp;（0为不暂停，最大为60，一般设置为10即可）</td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">页面数据载入时显示字符：</td>
      <td><% Call EchoInput("a41",30,50,ac(41))%></td>
    </tr>
    <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25">图片自动缩小宽度（为零不缩放）：</td>
      <td><% Call EchoInput("a43",10,10,ac(43))%>像素</td>
    </tr>
    <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25" >图片是否随鼠标滚轮缩放：</td>
      <td> <% Call EchoRadio("a44","","",ac(44))%></td>
    </tr>
    <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25" >部分显示日志是否使用htm标记强化过滤：<br>
        </td>
      <td> <% Call EchoRadio("a45","","",ac(45))%>（若选择此项，所有除图片以外的标记都将被过滤掉）</td>
    </tr>
	 <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25" >日志文件名为空时默认为：<br></td>
      <td><% Call EchoRadio("a23","日志ID自动编号","日志发表时间",ac(23))%></td>
    </tr>
    <tr>
      <td height="25" class="topbg"><a name="cmt"></a><strong>评论与留言</strong></td>
      <td height="22" class="topbg1"><a href="#top"><img src="images/ico_top.gif" border=0></a>&nbsp;<a href="#formbottom"><img src="images/ico_bottom.gif" border=0></a>&nbsp;</td>
    </tr>

    <tr class="tdbg" onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#BFDFFF'">
      <td width="348" height="25">是否允许游客发表评论及留言：</td>
      <td> <% Call EchoRadio("a27","","",ac(27))%></td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td height="25" >留言与回复是否默认通过审核：</td>
      <td> <% Call EchoRadio("a50","","",ac(50))%></td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">评论排序方式：</td>
      <td><% Call EchoRadio("a40","倒序","正序",ac(40))%></td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">评论及留言允许最多字数：</td>
      <td><% Call EchoInput("a35",10,10,ac(35))%>
        字(英文字符) </td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">留言，评论的时间间隔：</td>
      <td><% Call EchoInput("a32",10,10,ac(32))%>秒 </td>
    </tr>
    <tr>
      <td height="25" class="topbg"><a name="group"></a><strong>圈子选项</strong></td>
      <td height="22" class="topbg1"><a href="#top"><img src="images/ico_top.gif" border=0></a>&nbsp;<a href="#formbottom"><img src="images/ico_bottom.gif" border=0></a>&nbsp;</td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td height="25" >申请圈子是否需要审核：</td>
      <td> <% Call EchoRadio("a49","","",ac(49))%></td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">圈子名：</td>
      <td><% Call EchoInput("a69",10,10,ac(69))%>&nbsp;<font color="#FF0000">（建议设置为两个字，如圈子，群组等）</font> </td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">圈子管理者名：</td>
      <td><% Call EchoInput("a70",10,10,ac(70))%> </td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">圈子人数上限：</td>
      <td><% Call EchoInput("a71",10,10,ac(71))%> </td>
    </tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td width="348" height="25">日志同时发布到圈子数目上限：</td>
      <td><% Call EchoInput("a72",10,10,ac(72))%></td>
    </tr>
    <tr>
    <tr class="tdbg" onMouseOver="this.style.backgroundColor='#BFDFFF'" onMouseOut="this.style.backgroundColor=''">
      <td colspan="2">&nbsp;</td>
    </tr>
    <tr>
      <td height="40" colspan="2" align="center" class="tdbg"> <a name="formbottom"></a><input name="Action" type="hidden" id="Action" value="saveconfig">
        <input name="cmdSave" type="submit" id="cmdSave" value=" 保存设置 " > </td>
    </tr>
  </table>
</form>
		</div>
	</div>
	<ul class="main_end">
		<li class="main_end_left left"></li>
		<li class="main_end_right right"></li>
	</ul>
</div>
</body>
</html>
<script language="JavaScript">
//定位时区的选项
var TimeZoneObject
TimeZoneObject = document.getElementsByTagName('option');
for (var i = 0;i < TimeZoneObject.length ; i ++ ){
	if (TimeZoneObject[i].value =='<%=ac(68)%>'){
		TimeZoneObject[i].selected=true;
	}
}
</script>
<%
Set rs = Nothing
End Sub

Sub Saveconfig()
	If Request.QueryString <>"" Then Exit Sub
	Dim rs, i,sOpt
	Dim arrayList
	ReDim arrayList(C_Items)
  	For i=1 To C_Items
  		sOpt=sOpt & "$$" & Replace(Trim(Request.Form("a"&i)),"$","")
		arrayList(i) = Replace(Trim(Request.Form("a"&i)),"$","")
  	Next
	Dim arrayDir
	arrayDir = Oblog.SysDir
	For i = 0 To UBound(arrayDir)
		if LCase(arrayList(56)) = arrayDir(i) Then
			oblog.ShowMsg "请勿选用系统目录作为上传目录",""
		End If
	Next
	On Error Resume Next
	'判断目录是否存在，如果不存在则自动创建
	Dim oFso
	Set oFso=Server.CreateObject(oblog.CacheCompont(1))
	If oFso.FolderExists(Server.Mappath(blogdir & LCase(arrayList(80)))) =False Then
		oFso.CreateFolder(Server.Mappath(blogdir & LCase(arrayList(80))))
	End If
	Set oFso=Nothing
	If Err Then
		Err.Clear
		oblog.ShowMsg "广告目录创建失败，请手工创建",""
	End if
  	sOpt=Now&sOpt
    If Not IsObject(conn) Then link_database
    Set rs = Server.CreateObject("adodb.recordset")
    rs.Open  "select * From oblog_config Where Id=1",conn,1,3
    If rs.Eof Then rs.AddNew
    rs("ob_value")=sOpt
    rs.Update
    rs.Close
    Set rs = Nothing
    oblog.ReloadCache
	EventLog "进行修改网站信息配置的操作!",""
    Set oblog=Nothing
    Response.Redirect "admin_setup.asp"
End Sub
%>
<script language="javascript">
function CheckRadio()
{
	var obj = document.getElementsByTagName("input");
	for (var i = 0;i<obj.length ;i++ ){
		var e = obj[i];
		if (e.type == 'radio'){
			if (e.value !=1 &&e.value!=0 &&e.value!=2){
				alert('请确认每对单选按钮至少选中了一个选项');
				return false;
			}
		}
	}
}
</script>