?? act.diy.asp
字號:
<!--#include file="../ACT.Function.asp"-->
<!--#include file="../include/ACT.F.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="../Images/css1/css.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/javascript" src="../../act_inc/Prototype.js"></script>
<script language="JavaScript" type="text/javascript" src="../../act_inc/ActHelp.js"></script>
<title>個性化定制</title>
</head>
<body>
<%
dim ActCMS_D,ModeID
ModeID = ACTCMS.ChkNumeric(Request("ModeID"))
IF Request.QueryString("Action") = "ACTCMS" Then
Dim DIY_Article,i
For I=0 To 24
DIY_Article=DIY_Article& Replace(Replace(request.Form("ActCMS_D" & I &""),"§","") & "§",",","")
Next
Call AF.ActCMS_DIY_F(ModeID,2,DIY_Article)
Response.Redirect("?ModeID="&ModeID&"")
response.end
Else
If Trim(AF.ActCMS_DIY_F(ModeID,1,""))="1" Then
' ActCMS_D=Split("§0§0-1-0-1§0§actcms§0§§0§§0§§0§Simple§§§0§0§0§0§0§0§","§")
ActCMS_D=Split("§0§0-1-0-1§0§actcms§0§§0§§0§§0§Simple§§§0§0§0§1§0§1§0§"&ACTCMS.ActCMS_Sys(3)&"templets/article/ClassIndex.htm§"&ACTCMS.ActCMS_Sys(3)&"templets/article/Class.Htm§"&ACTCMS.ActCMS_Sys(3)&"templets/article/Content.Htm§","§")
Else
ActCMS_D=Split(AF.ActCMS_DIY_F(ModeID,1,""),"§")
End If
End If
%>
<form name="Set_Act_Type_DiY" method="post" action="?Action=ACTCMS&ModeID=<%=ModeID%>">
<table width="98%" border="0" align="center" cellpadding="2" cellspacing="1" class="table">
<tr>
<td colspan="4" class="bg_tr">
您現在的位置：后臺管理 >> <a href="ACT.MX.asp">模型列表</a> >> 自定義顯示</td>
</tr>
<tr>
<td height="38" align="right">完整標題 ：</td>
<td> <input name="ActCMS_D0" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(0) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_001',this)">幫助</span> </td>
<td colspan="2">
<input <% IF ActCMS_D(1) = "0" Then Response.Write "Checked" %> id="ActCMS_D(1)1" type="radio" name="ActCMS_D1" value="0">
<label for="ActCMS_D(1)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(1) = "1" Then Response.Write "Checked" %> id="ActCMS_D(1)2" type="radio" name="ActCMS_D1" value="1">
<label for="ActCMS_D(1)2"><font color="red">關閉 </font></label>
</td>
</tr>
<tr>
<td height="38" align="right">文章屬性 ：</td>
<td> <input name="ActCMS_D2" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(2) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_002',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(3) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(3)1" name="ActCMS_D3" value="0">
<label for="ActCMS_D(3)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(3) = "1" Then Response.Write "Checked" %> id="ActCMS_D(3)2" type="radio" name="ActCMS_D3" value="1">
<label for="ActCMS_D(3)2"><font color="red">關閉 </font></label>
</td>
</tr>
<tr>
<td height="38" align="right">關鍵字 ：</td>
<td> <input name="ActCMS_D4" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(4) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_003',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(5) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(5)1" name="ActCMS_D5" value="0">
<label for="ActCMS_D(5)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(5) = "1" Then Response.Write "Checked" %> id="ActCMS_D(5)2" type="radio" name="ActCMS_D5" value="1">
<label for="ActCMS_D(5)2"><font color="red">關閉 </font></label> </td>
</tr>
<tr>
<td height="38" align="right">文章作者 ：</td>
<td> <input name="ActCMS_D6" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(6) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_004',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(7) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(7)1" name="ActCMS_D7" value="0">
<label for="ActCMS_D(7)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(7) = "1" Then Response.Write "Checked" %> id="ActCMS_D(7)2" type="radio" name="ActCMS_D7" value="1">
<label for="ActCMS_D(7)2"><font color="red">關閉 </font></label>
</td>
</tr>
<tr>
<td height="38" align="right">文章來源 ：</td>
<td> <input name="ActCMS_D8" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(8) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_005',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(9) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(9)1" name="ActCMS_D9" value="0">
<label for="ActCMS_D(9)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(9) = "1" Then Response.Write "Checked" %> id="ActCMS_D(9)2" type="radio" name="ActCMS_D9" value="1">
<label for="ActCMS_D(9)2"><font color="red">關閉 </font></label>
</td>
</tr>
<tr>
<td height="38" align="right">文章導讀 ：</td>
<td> <input name="ActCMS_D10" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(10) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_006',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(11) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(11)1" name="ActCMS_D11" value="0">
<label for="ActCMS_D(11)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(11) = "1" Then Response.Write "Checked" %> id="ActCMS_D(11)2" type="radio" name="ActCMS_D11" value="1">
<label for="ActCMS_D(11)2"><font color="red">關閉 </font></label> </td>
</tr>
<tr>
<td height="38" align="right">fckeditor顯示菜單 ：</td>
<td colspan="3"> <input name="ActCMS_D12" id="ActCMS_D12" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(12) %>" size="30">
<select name="select" onchange="document.Set_Act_Type_DiY.ActCMS_D12.value=this.value">
<option selected>-- 請選擇 --</option>
<option value="UserMode">簡潔</option>
<option value="Simple">超簡潔</option>
<option value="Default">默認</option>
</select>自己定義菜單名稱,請手工配置editor/fckeditor/fckconfig.js 文件</td>
</tr>
<tr>
<td height="38" align="right">系統默認內容 ：</td>
<td colspan="3"> <input name="ActCMS_D13" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(13) %>" size="30">
<input class="ACT_btn" type="button" onClick="OpenWindowAndSetValue('../include/print/SelectPic.asp?CurrPath=<%=ACTCMS.ActCMS_Sys(3)%>',500,320,window,document.Set_Act_Type_DiY.ActCMS_D13);" value="選擇默認內容文件...">
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_007',this)">幫助</span>
</td>
</tr>
<tr>
<td height="38" align="right">閱讀權限 ：</td>
<td>
<input name="ActCMS_D14" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(14) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_008',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(15) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(15)1" name="ActCMS_D15" value="0">
<label for="ActCMS_D(15)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(15) = "1" Then Response.Write "Checked" %> id="ActCMS_D(15)2" type="radio" name="ActCMS_D15" value="1">
<label for="ActCMS_D(15)2"><font color="red">關閉 </font></label>
</td>
</tr>
<tr>
<td height="38" align="right">消費點數 ：</td>
<td>
<input name="ActCMS_D16" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(16) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_009',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(17) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(17)1" name="ActCMS_D17" value="0">
<label for="ActCMS_D(17)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(17) = "1" Then Response.Write "Checked" %> id="ActCMS_D(17)2" type="radio" name="ActCMS_D17" value="1">
<label for="ActCMS_D(17)2"><font color="red">關閉 </font></label>
</td>
</tr>
<tr>
<td height="38" align="right">生成文件名 ：</td>
<td>
<input <% IF ActCMS_D(18) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(18)1" name="ActCMS_D18" value="0">
<label for="ActCMS_D(18)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(18) = "1" Then Response.Write "Checked" %> id="ActCMS_D(18)2" type="radio" name="ActCMS_D18" value="1">
<label for="ActCMS_D(18)2"><font color="red">關閉 </font></label>
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_010',this)">幫助</span></td>
<td colspan="2">
</td>
</tr>
<tr>
<td height="38" align="right">除去鏈接 ：</td>
<td>
<input name="ActCMS_D19" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(19) %>" size="30">
默認值
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_011',this)">幫助</span></td>
<td colspan="2">
<input <% IF ActCMS_D(20) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(20)1" name="ActCMS_D20" value="0">
<label for="ActCMS_D(20)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(20) = "1" Then Response.Write "Checked" %> id="ActCMS_D(20)2" type="radio" name="ActCMS_D20" value="1">
<label for="ActCMS_D(20)2"><font color="red">關閉 </font></label>
</td>
</tr>
<tr>
<td height="38" align="right">上傳文件 ：</td>
<td>
<input <% IF ActCMS_D(21) = "0" Then Response.Write "Checked" %> type="radio" id="ActCMS_D(21)1" name="ActCMS_D21" value="0">
<label for="ActCMS_D(21)1"><font color="green">正常 </font></label>
<input <% IF ActCMS_D(21) = "1" Then Response.Write "Checked" %> id="ActCMS_D(21)2" type="radio" name="ActCMS_D21" value="1">
<label for="ActCMS_D(21)2"><font color="red">關閉 </font></label>
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_021',this)">幫助</span></td>
<td colspan="2">
</td>
</tr>
<tr>
<td height="38" align="right">欄目頁模板預設值 ：</td>
<td colspan="3"> <input name="ActCMS_D22" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(22) %>" size="30">
<input class="ACT_btn" type="button" onClick="OpenWindowAndSetValue('../include/print/SelectPic.asp?CurrPath=<%=ACTCMS.ActCMS_Sys(3)%>',500,320,window,document.Set_Act_Type_DiY.ActCMS_D22);" value="選擇默認模板...">
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_022',this)">幫助</span>只在添加欄目的時候有效
</td>
</tr>
<tr>
<td height="38" align="right">列表頁模板預設值 ：</td>
<td colspan="3"> <input name="ActCMS_D23" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(23) %>" size="30">
<input class="ACT_btn" type="button" onClick="OpenWindowAndSetValue('../include/print/SelectPic.asp?CurrPath=<%=ACTCMS.ActCMS_Sys(3)%>',500,320,window,document.Set_Act_Type_DiY.ActCMS_D23);" value="選擇默認模板...">
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_023',this)">幫助</span>只在添加欄目的時候有效
</td>
</tr>
<tr>
<td height="38" align="right">內容頁模板預設值 ：</td>
<td colspan="3"> <input name="ActCMS_D24" type="text" title="在這里填寫默認值" value="<%= ActCMS_D(24) %>" size="30">
<input class="ACT_btn" type="button" onClick="OpenWindowAndSetValue('../include/print/SelectPic.asp?CurrPath=<%=ACTCMS.ActCMS_Sys(3)%>',500,320,window,document.Set_Act_Type_DiY.ActCMS_D24);" value="選擇默認模板...">
<span class="h" style="cursor:help;" title="點擊顯示幫助" onclick="Help('ActDiY_024',this)">幫助</span>只在添加欄目的時候有效
</td>
</tr>
<tr>
<td height="38" colspan="4" align="center">
<input type="submit" class="act_btn" name="Submit2" value=" 保存 ">
</td>
</tr>
</table>
<SCRIPT LANGUAGE="JavaScript">
<!--
function OpenWindowAndSetValue(Url,Width,Height,WindowObj,SetObj)
{
var ReturnStr=showModalDialog(Url,WindowObj,'dialogWidth:'+Width+'pt;dialogHeight:'+Height+'pt;status:yes;help:no;scroll:yes;');
if (ReturnStr!='') SetObj.value=ReturnStr;
return ReturnStr;
}
//-->
</SCRIPT>
<p> </p>
</form></body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -