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

📄 add_file.asp

📁 个人网站模板
💻 ASP
📖 第 1 页 / 共 4 页
字号:
<!--#include file="check_admin.asp"-->
<!--#include file="conn_admin.asp" -->
<script language="Javascript">
function openScript(url, width, height){
	var Win = window.open(url,"openScript",'width=' + width + ',height=' + height + ',resizable=1,scrollbars=yes,menubar=no,status=yes' );
}
function openem()
{ 
openScript('upload.asp',350,200); 
}
</script>
<%
typeid=Request.QueryString("typeid")
if Request.QueryString("cz")="editfile" then
id=Request.QueryString("id")
sql = "SELECT * FROM produce where id="&id 
Set rs = Server.CreateObject("ADODB.Recordset")
rs.OPEN sql,Conn,1,1
name=rs("name")
typeid=rs("typeid")
smallimg=rs("smallimg")
editorvalue=rs("txtcontent")
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="form" method="POST" action="save_file.asp?cz=<%=cz%>&typeid=<%=typeid%>&id=<%=id%>">
  <table width="100%" border=1 cellPadding=0 cellSpacing=0 bordercolor="#666666" borderColorLight="#666666" borderColorDark=#ffffff bgcolor="#EEFFEE">
    <tr bgcolor="#006600"> 
      <td height="20" colspan="2"><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="name" type="text" id="name" value="<%=name%>" size="20"   maxlength="50">
        *</td>
    </tr>
    <tr> 
      <td width="112" height="30" align="right">所属分类:</td>
      <td width="858"> <select name="typeid">
          <%  
sql = "SELECT * FROM type order by typeid asc,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><div align="right">作品图片:</div></td>
      <td>
	<input name="smallimg" type="text"   id="smallimg" value="<%=smallimg%>" size="48">
        * [<a href="JavaScript:openem()">上传图片</a>]</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'];
	}
}

⌨️ 快捷键说明

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