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

📄 indexsort_edit.asp

📁 个人网站模板
💻 ASP
📖 第 1 页 / 共 4 页
字号:
<!--#include file="check_admin.asp"-->
<!--#include file="conn_admin.asp" -->
<%
typeid=Request.QueryString("typeid")
if Request.QueryString("cz")="editfile" then
id=Request.QueryString("id")
sql = "SELECT * FROM index_produce where id="&id 
Set rs = Server.CreateObject("ADODB.Recordset")
rs.OPEN sql,Conn,1,1
cm_title=rs("cm_title")
typeid=rs("typeid")
editorvalue=rs("editorvalue")
listid=rs("listid")
rs.close
Set rs=Nothing
function html_1(fString)
	fString = Replace(fString, "</P><P>" , CHR(10) & CHR(10))
	fString = Replace(fString, "<BR>" , CHR(10))
	html_1= fString
end function
title="编辑文件"
cz="editfile"
else
title="添加文件"
cz="addfile"
end if
%>
<html>
<head>
<title>页面编辑器</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<link href="sys_admin.css" rel="stylesheet" type="text/css">
</head>

<body bgcolor="#EEFFEE">
<style type="text/css">
<!--
.clsCursor {  cursor: hand}
-->
</style>
<form name="fHtmlEditor" method="POST" action="saveindexsort_edit.asp?id=<%=id%>">
  <table width="100%" border=1 cellPadding=0 cellSpacing=0 bordercolor="#666666" borderColorLight="#666666" borderColorDark=#ffffff bgcolor="#EEFFEE">
    <tr> 
      <td height="20" colspan="2" bgcolor="#006600"> 
        <div align="center"><strong><font color="#FFFFFF">次栏目标题修改</font></strong></div></td></tr>
	<tr> 
      <td width="112" height="30" align="right">新增标题:</td>
      <td width="858"> <input name="cm_title" type="text" id="cm_title" value="<%=cm_title%>" size="20"   maxlength="50">
        *</td>
    </tr>
    <tr> 
      <td width="112" height="30" align="right">所属分类:</td>
      <td width="858"> <select name="typeid">
          <%  
sql = "SELECT * FROM index_type order by id desc"   
Set rs = Server.CreateObject("ADODB.Recordset")  
rs.OPEN sql,Conn,1,1  
if rs.eof and rs.bof then  
Response.Write"<option>还没有任何分类</option>"  
else  
do while not rs.eof  
Response.Write"<option value='"&rs("id")&"'"  
if typeid=rs("id") then Response.Write" selected"  
Response.Write">"&rs("name")&"</option>"  
rs.movenext  
loop  
end if  
rs.close  
set rs=nothing  
conn.close  
Set conn=Nothing  
%>
        </select> <input name="lx" type="hidden" value="1">
        * 请选择该产品的归属类型。</td>
    </tr>
    <tr> 
      <td height="20" align="right" valign="top">发布日期:</td>
      <td valign="top"><select name="year1">
          <option value="<%=year(Now())%>" selected><%=year(Now())%></option>
          <%
					for i=2001 to 2005
						response.write "<option value='"&i&"'>"&i&"</option>"
					next
					%>
        </select>
        <select name="month1">
          <option value="<%=month(Now())%>" selected><%=month(Now())%></option>
          <%
					for i=1 to 12
						response.write "<option value='"&i&"'>"&i&"</option>"
					next
					%>
        </select>
        <select name="day1">
          <option value="<%=day(Now())%>" selected><%=day(Now())%></option>
          <%
					for i=1 to 31
						response.write "<option value='"&i&"'>"&i&"</option>"
					next
					%>
        </select>
        日 </td>
    </tr>
    <tr> 
      <td colspan="2"> <textarea name="EditorValue" style="display: none;"><%=editorvalue%></textarea> 
        <script language="JavaScript">

  var errorString = "本系统要求在WINDOW95或IE5.0以上才可以正常显示。"
  var Ok = "false";
  var name =  navigator.appName;
  var version =  parseFloat(navigator.appVersion);
  var platform = navigator.platform;

	if (platform == "Win32" && name == "Microsoft Internet Explorer" && version >= 4){
		Ok = "true";
	} else {
		Ok= "false";
	}

	if (Ok == "false") {
		alert(errorString);
	}

function ColorPalette_OnClick(colorString){
	
	cpick.bgColor=colorString;
	document.all.colourp.value=colorString;
	doFormat('ForeColor',colorString);
}

function initToolBar(ed) {
    
	var eb = document.all.editbar;
	if (ed!=null) {
		eb._editor = window.frames['myEditor'];
	}
}

function doFormat(what) {

	var eb = document.all.editbar;
		
	if(what == "FontName"){
		if(arguments[1] != 1){
			eb._editor.execCommand(what, arguments[1]);
			document.all.font.selectedIndex = 0;

⌨️ 快捷键说明

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