📄 html_add1.asp
字号:
<%Admin="InfoAdd"%>
<!--#include file="check.asp"-->
<%
'#################################################################
'# 晓宇听幽网站内容管理系统(xoYu CMS)
'#
'# 版权所有: 晓宇听幽工作室
'#
'# 制作人 : xoyu(晓宇)
'#
'# 主页地址: http://www.xoYu.com 晓宇听幽工作室
'#
'#【版权声明】
'#################################################################
'# 本软体为共享软体(shareware)提供个人网站免费使用，请勿非法修改,
'# 转载，散播，或用于其他图利行为，并请勿删除版权声明。
'# 如果您的网站正式起用了这个脚本，请您通知我们，以便我们能够知晓！
'# 如果可能，请在您的网站做上我们的链接，希望能给予合作。谢谢！
'#################################################################
'# 程序名称：晓宇听幽网站内容管理系统·网站内容管理系统
'# 英文名称：xoYu News 2004 Professional For xoYu CMS
'# 程序创建时间：2003-7-10
'# 程序完成时间：2003-9-11
'# 最后修改时间：2003-11-15
'#################################################################
'# 请您尊重我们的劳动和版权，不要删除以上的版权声明部分，谢谢合作
'# 如有任何问题请到我们的论坛(http://www.xoyu.com/bbs/)告诉我们。
'#################################################################
if request("addok")="" then
if request("k")="" then
response.write "请输入查找内容"
response.end
else
if request("d")<>"add" then
response.redirect "html_listLB.asp?k="&request("k")&"&id="&request("id")&""
response.end
end if
%>
<!--#include file="mdb_path_info.asp"-->
<%
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select id,title,date from info where title like '%"&request("k")&"%' order by date desc",conn,1,1
if not rs.eof then
do while not rs.EOF
filetop=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date"))
oldcx=oldcx&"[<a target=""_blank"" href=""../Html/"&filetop&"-1.Html"">HTML页</a>][<a href=""javascript:makeHTML("&rs("id")&")"">生成</a>]·<a href=Html_edit.asp?id="&rs("id")&">"&rs("title")&"</a><br>"
rs.MoveNext
loop
else
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "Html_add.asp?title="&request("k")&"&id="&request("id")&""
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta copy="程序制作：xoyu（QQ：5964887）www.xoyu.com">
<title>晓宇听幽 网站内容管理系统—添加文章</title>
<link rel="stylesheet" href="admin.css" type="text/css">
<script language="javascript">
function makeHTML(id)
{window.open("makehtml.asp?type=page&id="+id,"","width=200,height=100,resizable=yes,scrollbars=yes,status=yes,toolbar=no,menubar=no,location=no");}
</script>
</head>
<body topmargin="1" leftmargin="1">
<p align="center">
<form action="Html_add1.asp?d=add&id=<%=request("id")%>" method=post>
<table width="95%" border="0" cellspacing="1" cellpadding="3" align=center class="tableBorder">
<tr>
<th width="200%"><b>
<img border="0" src="images/ICON1.GIF"> 添加文章
1/2</font></b></th>
</tr>
<tr>
<td width="200%" align="right" class="forumrow">
<p align="center">文章标题:<input type="text" size=40 name="k" value="<%=request("k")%>">
<input name="change" value="重新查找" type="submit"> <input type="button" onclick="location.href='Html_add.asp?title=<%=request("k")%>&id=<%=request("id")%>'" value="添加文章"></td>
</tr>
<%if oldcx<>"" then%>
<tr>
<td width="200%" class=forumHeaderBackgroundAlternate><font color="#000080"><b>查找到数据库中已有相同的文章</b></font></td>
</tr>
<tr>
<td width="200%" class="forumrow"><%=oldcx%></td>
</tr>
<%end if%>
</table>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -