📄 fs_ds_syspara.asp

📁 后台目录:qwbAdmin/Login.asp 登陆用户名:admin 登陆密码:admin
💻 ASP
📖 第 1 页 / 共 2 页
字号:
上一页 12
        否 </td>
    </tr>
    <tr class="hback" style="display:">
      <td align="right">是否使用DownID：</td>
      <td><input type="radio" name="FileNameRule_DownID" value="1" <%if ubound(FileNameRuleArray)>=6 then if FileNameRuleArray(6)="1" then Response.Write("checked")%> onClick="clearAll('FileNameRule_Rnd','FileNameRule_UseWord')">
        是
        <input type="radio" name="FileNameRule_DownID" value="0" <%if Ubound(FileNameRuleArray)>=6 then if FileNameRuleArray(6)="0" then Response.Write("checked")%> onClick="checkIt('FileNameRule_Rnd','FileNameRule_UseWord')">
        否 </td>
    </tr>
    <tr class="hback">
      <td align="right">目录生成规则：</td>
      <td><input name="FileDirRule" type="radio" value="0" onClick="show_FileDirRule_Detail(this.value);" <%if fileDirRule=0 then Response.Write("checked")%>>
        规则1
        <input type="radio" name="FileDirRule" value="1" onClick="show_FileDirRule_Detail(this.value)" <%if fileDirRule=1 then Response.Write("checked")%>>
        规则2
        <input type="radio" name="FileDirRule" value="2" onClick="show_FileDirRule_Detail(this.value)" <%if fileDirRule=2 then Response.Write("checked")%>>
        规则3
        <input type="radio" name="FileDirRule" value="3" onClick="show_FileDirRule_Detail(this.value)" <%if fileDirRule=3 then Response.Write("checked")%>>
        规则4
        <input type="radio" name="FileDirRule" value="4" onClick="show_FileDirRule_Detail(this.value)" <%if fileDirRule=4 then Response.Write("checked")%>>
        规则5
        <input type="radio" name="FileDirRule" value="5" onClick="show_FileDirRule_Detail(this.value)" <%if fileDirRule=5 then Response.Write("checked")%>>
        规则6
        <input type="radio" name="FileDirRule" value="6" onClick="show_FileDirRule_Detail(this.value)" <%if fileDirRule=6 then Response.Write("checked")%>>
        规则7 &nbsp;&nbsp;<span id="span_FileDirRule" style="color:blue"></span> </td>
    </tr>
    <tr class="hback">
      <td align="right">首页生成规则：</td>
      <td><input name="ClassSaveType" type="radio" value="0" onClick="show_ClassSaveType_Detail(this.value)" <%if classSaveType=0 then Response.Write("checked")%>>
        规则1
        <input type="radio" name="ClassSaveType" value="1" onClick="show_ClassSaveType_Detail(this.value)" <%if classSaveType=1 then Response.Write("checked")%>>
        规则2
        <input type="radio" name="ClassSaveType" value="2" onClick="show_ClassSaveType_Detail(this.value)" <%if classSaveType=2 then Response.Write("checked")%>>
        规则3 &nbsp;&nbsp;<span id="span_ClassSaveType" style="color:blue"></span> </td>
    </tr>
    <tr class="hback">
      <td align="right">文件扩展名：</td>
      <td><input type="radio" name="FileExtName" value="0" <%if fileExtName=0 then Response.Write("checked")%>>
        Html
        <input name="FileExtName" type="radio" value="1" <%if fileExtName=1 then Response.Write("checked")%>>
        HTM
        <input type="radio" name="FileExtName" value="2" <%if fileExtName=2 then Response.Write("checked")%>>
        Shtml
        <input type="radio" name="FileExtName" value="3" <%if fileExtName=3 then Response.Write("checked")%>>
        shtm
        <input type="radio" name="FileExtName" value="4" <%if fileExtName=4 then Response.Write("checked")%>>
        asp</td>
    </tr>
    <tr class="hback">
      <td align="right">首页文件名：</td>
      <td><input name="IndexPage_Name" type="text" id="IndexPage_Name" size="50" maxlength="10" value="<%=IndexPageArray(0)%>"
	   onFocus="Do.these('IndexPage_Name',function(){return isEmpty('IndexPage_Name','span_IndexPage_Name_Alert')});" onKeyUp="Do.these('IndexPage_Name',function(){return isEmpty('IndexPage_Name','span_IndexPage_Name_Alert')});">
        <span id="span_IndexPage_Name_Alert"></span>* </td>
    </tr>
    <tr class="hback">
      <td align="right">首页扩展名：</td>
      <td><select name="IndexPage_ExtName" id="IndexPage_ExtName">
          <option value="html" <%if IndexPageArray(1)="html" then Response.Write("selected")%>>html</option>
          <option value="htm" <%if IndexPageArray(1)="htm" then Response.Write("selected")%>>htm</option>
          <option value="shtml" <%if IndexPageArray(1)="shtml" then Response.Write("selected")%>>shtml</option>
          <option value="shtm" <%if IndexPageArray(1)="shtm" then Response.Write("selected")%>>shtm</option>
          <option value="asp" <%if IndexPageArray(1)="asp" then Response.Write("selected")%>>asp</option>
        </select>
      </td>
    </tr>
    <tr class="hback">
      <td align="right">发布是否需审核：</td>
      <td><input name="NewsCheck" type="radio" value="1" <%if NewsCheck=1 then Response.Write("checked")%>>
        是
        <input type="radio" name="NewsCheck" value="0" <%if NewsCheck=0 then Response.Write("checked")%>>
        否 </td>
    </tr>
    <tr  class="hback">
      <td colspan="4"><table border="0" width="100%" cellpadding="0" cellspacing="0">
          <tr>
            <td align="center"><input type="submit" value=" 保存 "  onClick="SetIPList();" />
              &nbsp;
              <input type="reset" value=" 重置 " />
            </td>
          </tr>
        </table></td>
    </tr>
  </form>
</table>
<%
End Sub
set DS_Rs = Nothing
Conn.close
%>
<script language="JavaScript">
function AddIPList()
{
	var BeginIPStr=document.Form.BeginIP.value,EndIPStr=document.Form.EndIP.value;
	if (CheckIP(BeginIPStr))
	{
		if (CheckIP(EndIPStr))
		{
			if (CheckBeginAndEndIP(BeginIPStr,EndIPStr))
			{
				var TempStr=BeginIPStr+'-'+EndIPStr;
				AddList(document.Form.IPSelectList,TempStr,TempStr);
				document.Form.BeginIP.value='';
				document.Form.EndIP.value='';
			}
		}
		else
		{
			alert('结束IP地址不对');
			document.Form.EndIP.focus();
			document.Form.EndIP.select();
		}
	}
	else
	{
		alert('开始IP地址不对');
		document.Form.BeginIP.focus();
		document.Form.BeginIP.select();
	}
}
function DelIPList()
{
	DelList(document.Form.IPSelectList);
}
function SetIPList()
{
	var flag1=isEmpty("IndexPage_Name","span_IndexPage_Name_Alert");
	var flag2=isEmpty("DownDir","span_DownDir_Alert");
	var flag4=isEmpty("IndexTemplet","span_IndexTemplet_Alert");
	if(flag1&&flag2&&flag4)
	{
		var TempStr='',Obj=document.Form.IPSelectList;
		for(var i=0;i<Obj.length;i++)
		{
			if (TempStr=='') TempStr=Obj.options(i).value;
			else TempStr=TempStr+'$'+Obj.options(i).value;
		}
		document.Form.IPList.value=TempStr;
		document.Form.submit();
	}
}
function CheckBeginAndEndIP(BeginIPStr,EndIPStr)
{
	return true;
}
function CheckIP(IPAddress)
{
	var re = IPAddress.split(".");
	var check = function(v){try{return (v<=255 && v>=0)}catch(x){return false}};
	var ip = (re.length==4)?(check(re[0]) && check(re[1]) && check(re[2]) && check(re[3])):false;
	return ip;
}
function AddList(SelectObj,Lable,LableContent)
{
	var i=0,AddOption;
	if (!SearchOptionExists(SelectObj,Lable))
	{
		AddOption = document.createElement("OPTION");
		AddOption.text=Lable;
		AddOption.value=LableContent;
		SelectObj.add(AddOption);
		//SelectObj.options(SelectObj.length-1).selected=true;
	}
}
function SearchOptionExists(Obj,SearchText)
{
	var i;
	for(i=0;i<Obj.length;i++)
	{
		if (Obj.options(i).text==SearchText)
		{
			Obj.options(i).selected=true;
			return true;
		}
	}
	return false;
}
function DelList(SelectObj)
{
	var OptionLength=SelectObj.length;
	for(var i=0;i<OptionLength;i++)
	{
		if (SelectObj.options(SelectObj.length-1).selected==true) SelectObj.options.remove(SelectObj.length-1);
		//OptionLength=SelectObj.length;
	}
}
show_FileDirRule_Detail(<%=FileDirRule%>);
//显示相应目录生成规则的格式
function show_FileDirRule_Detail(param)
{
	if(isNaN(param))
	{
		return;
	}
	switch(parseInt(param))
	{
		case 0:document.getElementById("span_FileDirRule").innerHTML="格式：[ 行业英文/2006-6-9 ]";break
		case 1:document.getElementById("span_FileDirRule").innerHTML="格式：[ 行业英文/2006/6/9/ ]";break
		case 2:document.getElementById("span_FileDirRule").innerHTML="格式：[ 行业英文/2006/6-9/ ]";break
		case 3:document.getElementById("span_FileDirRule").innerHTML="格式：[ 行业英文/2006-6/9/ ]";break
		case 4:document.getElementById("span_FileDirRule").innerHTML="格式：[ 行业英文/文件名 ]";break
		case 5:document.getElementById("span_FileDirRule").innerHTML="格式：[ 行业英文/2006/6/ ]";break
		case 6:document.getElementById("span_FileDirRule").innerHTML="格式：[ 行业英文/200669/ ]";break
	}
}
show_ClassSaveType_Detail(<%=ClassSaveType%>);
function show_ClassSaveType_Detail(param)
{
	if(isNaN(param))
		return;
	switch(parseInt(param))
	{
		case 0:document.getElementById("span_ClassSaveType").innerHTML="格式：[ 栏目英文/index.html ]";break
		case 1:document.getElementById("span_ClassSaveType").innerHTML="格式：[ 栏目英文/栏目英文.html ]";break
		case 2:document.getElementById("span_ClassSaveType").innerHTML="格式：[ 为栏目英文.html ]";break
	}
}
function clearAll(radio,check)
{
	var RadioArray=document.all(radio);
	for(var i=0;i<RadioArray.length;i++)
	{
		RadioArray[i].checked=false;
	}
	document.all(check).checked=false;
}
checkIt('FileNameRule_Rnd','FileNameRule_UseWord')
function checkIt(radio,check)
{
	var RadioArray=document.all(radio);
	var checkedTF=false;
	for(var i=0;i<RadioArray.length;i++)
	{
		if("<%=FileNameRuleArray(2)%>"==(2+i).toString())
		RadioArray[i].checked=true;
	} 
	if("<%=FileNameRuleArray(3)%>"=="1")
		document.all(check).checked=true;
	for(var i=0;i<RadioArray.length;i++)
	{
		if(RadioArray[i].checked)
		{
			checkedTF=true;
		}
	}
	if(!checkedTF)RadioArray[2].checked=true;
}
</script>
<!-- Powered by: FoosunCMS4.0系列,Company:Foosun Inc. -->
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -