www.gusucode.com > 艺帆全站DIV+CSS体育用品公司网站源码 1.7.5源码程序 > i5808/xiugai_about.asp
<!--#include file="../Conn.asp" -->
<!--#include file="seeion.asp"-->
<%
Dim htmlData
htmlData = Request.Form("body")
Function htmlspecialchars(str)
str = Replace(str, "&", "&")
str = Replace(str, "<", "<")
str = Replace(str, ">", ">")
str = Replace(str, """", """)
htmlspecialchars = str
End Function
%>
<%
id=request.QueryString("id")
if id="" or not isnumeric(id) then
Response.Write "<script>alert('参数错误！');history.go(-1);</script>"
Response.End()
end if
exec="select * from about where id="& id
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
if rs.eof and rs.bof then
Response.Write "<script>alert('参数不正确，ID值不存在！');history.go(-1);</script>"
Response.End()
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link rel="stylesheet" type="text/css" id="css" href="images/style.css">
<title>修改页面</title>
<SCRIPT language=JavaScript src="../js/digital.js" type=text/javascript ></SCRIPT>
</head>
<body>
<link rel="stylesheet" href="themes/default/default.css" />
<link rel="stylesheet" href="plugins/code/prettify.css" />
<script charset="utf-8" src="kindeditor.js"></script>
<script charset="utf-8" src="lang/zh_CN.js"></script>
<script charset="utf-8" src="plugins/code/prettify.js"></script>
<script>
KindEditor.ready(function(K) {
var editor1 = K.create('textarea[name="body"]', {
cssPath : 'plugins/code/prettify.css',
uploadJson : 'asp/upload_json.asp',
fileManagerJson : 'asp/file_manager_json.asp',
allowFileManager : true,
afterCreate : function() {
var self = this;
K.ctrl(document, 13, function() {
self.sync();
K('form[name=add]')[0].submit();
});
K.ctrl(self.edit.doc, 13, function() {
self.sync();
K('form[name=add]')[0].submit();
});
}
});
prettyPrint();
});
</script>
<script language="javascript">
function showUploadDialog(s_Type, s_Link, s_Thumbnail){
var arr = showModalDialog("WebEditor/dialog/i_upload.htm?style=popup&type="+s_Type+"&link="+s_Link+"&thumbnail="+s_Thumbnail, window, "dialogWidth:0px;dialogHeight:0px;help:no;scroll:no;status:no");}
</script>
<form name="add" method="post" action="updata_about.asp">
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" >
<tr>
<td height="30" background="images/bg_list.gif"><div style="padding-left:10px; font-weight:bold; color:#0075a9">修改页面</div></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><%if session("qx")=2 then%><table width="100%" border="0" align="center" cellpadding="5" cellspacing="0" >
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8" >
<td height="28" width="16%" class="td">网页标题</td>
<td width="84%" colspan="2" class="td">
<input name="title" type="text" value="<%=rs("title")%>" size="30" />
<input name="id" type="hidden" id="id" value="<%=rs("id")%>" /></td>
</tr>
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8" >
<td height="28" class="td">单页分类</td>
<td colspan="2" class="td"><select name="clas" id="select">
<%
dim rsc
set rsc=server.CreateObject("adodb.recordset")
rsc.open "select * from about_fl",conn,1,1
while not rsc.eof
if rs("clas")=rsc("id") then
response.Write("<option value=""" & rsc("id") & """ selected>" & rsc("title") & "</option>")
else
response.Write("<option value=""" & rsc("id") & """>" & rsc("title") & "</option>")
end if
rsc.movenext
wend
rsc.close
set rsc=nothing
%>
</select> </td>
</tr>
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
<td height="25" width="16%" class="td">网页关键词</td>
<td colspan="2" class="td"><input name="keywords" type="text" value="<%=rs("keywords")%>" size="50" />
| 分开</td>
</tr>
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8">
<td height="25" width="16%" class="td">网页描述</td>
<td colspan="2" class="td"><input name="description" type="text" value="<%=rs("description")%>" size="50" /> </td>
</tr>
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
<td height="25" class="td">排序ID</td>
<td colspan="2" class="td"><input name="px_id" type="text" value="<%=rs("px_id")%>" size="30" onKeyPress="event.returnValue=IsDigit();"/></td>
</tr>
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
<td height="3" bgcolor="#F1F5F8" class="td">标题略缩图</td>
<td bgcolor="#F1F5F8" class="td"><input name="img" type="text" id="img" value="<%=rs("img")%>" size="30" maxlength="200" /></td>
<td bgcolor="#F1F5F8" class="td"><iframe style="top:2px" id="UploadFiles" src="upload_Photo.asp?PhotoUrlID=0" frameborder="0" scrolling="No" width="320" height="25"></iframe></td>
</tr>
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8">
<td height="25" bgcolor="#FFFFFF" class="td">页面内容<br><script>
function oCopy(obj){
obj.select();
js=obj.createTextRange();
js.execCommand("Copy")
}
</script>
点击一下即可复制<input onClick="oCopy(this)" value="[YiFanPage]" size="13" maxlength="13">
分页符</td>
<td colspan="2" bgcolor="#FFFFFF" class="td">
<textarea name="body" id="body" style="width:700px;height:300px;visibility:hidden;"><%=rs("body")%></textarea></td>
</tr>
<tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
<td height="25" bgcolor="#F1F5F8" class="td"> </td>
<td colspan="2" bgcolor="#F1F5F8" class="td"><input type="submit" name="button" id="button" value="确认提交" class="btn"/></td>
</tr>
</table>
<%else%>
<div style=" padding:20px;font-size:14px; color:#990000; font-weight:bold; text-align:center">您没有权限操作！</div>
<%response.end
end if%></td>
</tr>
</table></form>
</body>
</html>