⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 sitefourstep.asp

📁 asp源码 图片ASP整站
💻 ASP
📖 第 1 页 / 共 2 页
字号:
                  <td height="5"></td>
                </tr>
              </table>
              <textarea ondblclick="getActiveText(this)" onclick="getActiveText(this)"  onchange="getActiveText(this)" name="SourceSetting" cols="50" rows="3" id="textarea9a" style="width:100%;"><%=RsEditObj("SourceHeadSetting")%>[来源]<%=RsEditObj("SourceFootSetting")%></textarea></td>
          </tr>
        </table></td>
    </tr>
    <tr id="SetAddTime" style="display:none;"> 
      <td colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="3">
          <tr>
            <td height="26">
<div align="center">手动设置</div></td>
            <td colspan="3"><input style="width:100%;" type="text" name="HandSetAddDate" value="<% = HandSetAddDate %>"></td>
          </tr>
		  <tr> 
            <td width="20%"> <div align="center">加入时间</div></td>
            <td>&nbsp;&nbsp;输入区域:
			<span onClick="if(document.FormCollect.AddDateSetting.rows>2)document.FormCollect.AddDateSetting.rows-=1" style='cursor:hand'><b>缩小</b></span>
			<span onClick="document.FormCollect.AddDateSetting.rows+=1" style='cursor:hand'><b>扩大</b></span>
			&nbsp;&nbsp;可用标签:<font onmouseover="getActiveText(document.FormCollect.AddDateSetting);" onClick="addTag('[加入时间]')" style="CURSOR: hand"><b>[加入时间]</b></font>&nbsp;&nbsp;&nbsp;<font onmouseover="getActiveText(document.FormCollect.AddDateSetting);" onClick="addTag('[变量]')" style="CURSOR: hand"><b>[变量]</b></font>
              <table width="95%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td height="5"></td>
                </tr>
              </table>
              <textarea ondblclick="getActiveText(this)" onclick="getActiveText(this)"  onchange="getActiveText(this)" name="AddDateSetting" cols="50" rows="3" id="textarea9" style="width:100%;"><%=RsEditObj("AddDateHeadSetting")%>[加入时间]<%=RsEditObj("AddDateFootSetting")%></textarea></td>
          </tr>
        </table></td>
    </tr>
    <tr id="SetCutPage1" style="display:none;"> 
      <td colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
	<tr> 
            <td width="20%"> 
              <div align="center">分页方式1<br><font color="red">"[分页新闻]"<br>前面标记唯一</font></div></td>
      <td> 	&nbsp;&nbsp;输入区域:
			<span onClick="if(document.FormCollect.OtherNewsPageSetting.rows>2)document.FormCollect.OtherNewsPageSetting.rows-=1" style='cursor:hand'><b>缩小</b></span>
			<span onClick="document.FormCollect.OtherNewsPageSetting.rows+=1" style='cursor:hand'><b>扩大</b></span>
	  &nbsp;&nbsp;可用标签:<font onmouseover="getActiveText(document.FormCollect.OtherNewsPageSetting);" onClick="addTag('[分页新闻]')" style="CURSOR: hand"><b>[分页新闻]</b></font>&nbsp;&nbsp;&nbsp;<font onmouseover="getActiveText(document.FormCollect.OtherNewsPageSetting);" onClick="addTag('[变量]')" style="CURSOR: hand"><b>[变量]</b></font><br>
	  <textarea  ondblclick="getActiveText(this)" onClick="getActiveText(this)"  onchange="getActiveText(this)" name="OtherNewsPageSetting" cols="50" rows="6" id="OtherNewsPageSetting" style="width:100%;"><%
	  If InStr(RsEditObj("OtherNewsPageHeadSetting"),"[2006-3-17AddByChning]")<>0 Then
		Response.write "[分页新闻]"
	  Else
		Response.write RsEditObj("OtherNewsPageHeadSetting") & "[分页新闻]" & RsEditObj("OtherNewsPageFootSetting")
	  End If 
	  %></textarea><br>同时设置了分页方式1和分页方式2,优先采用方式1。</td>
    </tr>
        </table></td>
    </tr>
    <tr id="SetCutPage2" style="display:none;"> 
      <td colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
	<tr> 
            <td width="20%"> 
              <div align="center">分页方式2<br><font color="red">"[分页新闻]"<br>后面标记唯一</font></div></td>
      <td> 	&nbsp;&nbsp;输入区域:
			<span onClick="if(document.FormCollect.NextNewsPageSetting.rows>2)document.FormCollect.NextNewsPageSetting.rows-=1" style='cursor:hand'><b>缩小</b></span>
			<span onClick="document.FormCollect.NextNewsPageSetting.rows+=1" style='cursor:hand'><b>扩大</b></span>
	  &nbsp;&nbsp;可用标签:<font onmouseover="getActiveText(document.FormCollect.NextNewsPageSetting);" onClick="addTag('[分页新闻]')" style="CURSOR: hand"><b>[分页新闻]</b></font>&nbsp;&nbsp;&nbsp;<font onmouseover="getActiveText(document.FormCollect.NextNewsPageSetting);" onClick="addTag('[变量]')" style="CURSOR: hand"><b>[变量]</b></font><br>
	  <textarea  ondblclick="getActiveText(this)" onClick="getActiveText(this)"  onchange="getActiveText(this)" name="NextNewsPageSetting" cols="50" rows="6" id="NextNewsPageSetting" style="width:100%;"><%
 	  If InStr(RsEditObj("OtherNewsPageHeadSetting"),"[2006-3-17AddByChning]")=0 Then
		Response.write "[分页新闻]"
	  ElseIf Not IsNull(RsEditObj("OtherNewsPageHeadSetting")) Then
		Response.write Replace(RsEditObj("OtherNewsPageHeadSetting"),"[2006-3-17AddByChning]","") & "[分页新闻]" & RsEditObj("OtherNewsPageFootSetting")
	  End If 

	  %></textarea><br>同时设置了分页方式1和分页方式2,优先采用方式1。</td>
    </tr>
        </table></td>
    </tr>
</table>
</form>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td colspan="2" height="28" class="ButtonListLeft"> 
      <div align="center">预览结果</div></td>
  </tr>
  <tr> 
    <td height="36" colspan="2">
<div align="center"><a href="<% = NewsLinkStr %>" target="_blank"> 
        <% = NewsLinkStr %>
        </a></div></td>
  </tr>
</table>
</body>
</html>
<%
Set RsEditObj = Nothing
Set CollectConn = Nothing
%>
<script language="JavaScript">
function ChangeSetOption(Flag)
{
	switch (Flag)
	{
		case 0 :
			document.all.SetAuthor.style.display='';
			document.all.SetSource.style.display='none';
			document.all.SetAddTime.style.display='none';
			document.all.SetCutPage1.style.display='none';
			document.all.SetCutPage2.style.display='none';
			break;
		case 1 :
			document.all.SetAuthor.style.display='none';
			document.all.SetSource.style.display='';
			document.all.SetAddTime.style.display='none';
			document.all.SetCutPage1.style.display='none';
			document.all.SetCutPage2.style.display='none';
			break;
		case 2 :
			document.all.SetAuthor.style.display='none';
			document.all.SetSource.style.display='none';
			document.all.SetAddTime.style.display='';
			document.all.SetCutPage1.style.display='none';
			document.all.SetCutPage2.style.display='none';
			break;
		case 3 :
			document.all.SetAuthor.style.display='none';
			document.all.SetSource.style.display='none';
			document.all.SetAddTime.style.display='none';
			document.all.SetCutPage1.style.display='';
		//	document.getElementById("NextNewsPageSetting").value='[分页新闻]';
			document.all.SetCutPage2.style.display='none';
			break;
		case 4 :
			document.all.SetAuthor.style.display='none';
			document.all.SetSource.style.display='none';
			document.all.SetAddTime.style.display='none';
			document.all.SetCutPage1.style.display='none';
		//	document.getElementById("OtherNewsPageSetting").value='[分页新闻]';
			document.all.SetCutPage2.style.display='';
			break;
		case 999 :
			document.all.SetAuthor.style.display='none';
			document.all.SetSource.style.display='none';
			document.all.SetAddTime.style.display='none';
			document.all.SetCutPage1.style.display='none';
			document.all.SetCutPage2.style.display='none';
			break;
		default :
			document.all.SetAuthor.style.display='none';
			document.all.SetSource.style.display='none';
			document.all.SetAddTime.style.display='none';
			document.all.SetCutPage.style.display='none';
			break;
	}
}

currObj = "uuuu";
function getActiveText(obj)
{
	obj.focus();
	currObj = obj;
}

function addTag(code)
{
	addText(code);
}

function addText(ibTag)
{
	var isClose = false;
	var obj_ta = currObj;
//alert("ok");
	if (obj_ta.isTextEdit)
	{
	//alert("nooooo");
		obj_ta.focus();
		var sel = document.selection;
		var rng = sel.createRange();
		rng.colapse;

		if((sel.type == "Text" || sel.type == "None") && rng != null)
		{
			rng.text = ibTag;
		}

		obj_ta.focus();

		return isClose;
	}
	else
		return false;
}	
-->
</script>

⌨️ 快捷键说明

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