📄 help.asp
字号:
<%@ language="vbscript"%>
<%response.Expires = 0%>
<!--#include file="conn.asp"-->
<!--#include file="Check.asp"-->
<%
set rs=server.createobject("adodb.recordset")
%>
<html>
<head>
<STYLE>BODY {
FONT-SIZE: 10pt
}
TD {
FONT-SIZE: 10pt; LINE-HEIGHT: 150%
}
A {
TEXT-DECORATION: none
}
A:hover {
TEXT-DECORATION: underline
}
</STYLE>
<script language="javascript"></script>
<title>后台管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body background="../pic/user/bg.jpg" leftmargin="0" topmargin="0">
<%
up=request("up")
select case up
case "help_up"
call help_up
case "help_del"
call help_del
case "help_add"
call help_add
case "help_up_save"
call help_up_save
case "help_add_save"
call help_add_save
case else
call help_show
end select
%>
<%
sub help_up
sqltext="select * from help where id="&request("id")
rs.open sqltext,conn,1,1
if rs.eof then
response.write "此条帮助信息已被删除或无存在"
else
%>
<form name="form1" method="post" action="?up=help_up_save&id=<%=rs("id")%>">
<table width="650" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="44"><div align="center"><strong><font color="#0000FF">购物帮助修改</font></strong></div></td>
</tr>
<tr>
<td height="31" bgcolor="#66E0FF"> 购物帮助标题:
<input name="n_top" type="text" size="30" value="<%=rs("n_top")%>">
(必填)</td>
</tr>
<tr>
<td height="1" bgcolor="#00CCFF"> </td>
</tr>
<tr>
<td> <div align="center">
<INPUT type="hidden" name="neirong" value="<%=Server.HTMLEncode(rs("content"))%>">
<IFRAME ID="eWebEditor1" SRC="../webedit/ewebeditor.asp?id=neirong&style=standard_blue" FRAMEBORDER="0" SCROLLING="no" WIDTH="650" HEIGHT="450"></IFRAME>
</div></td>
</tr>
<tr>
<td height="35"> <div align="center">
<input type="submit" name="Submit" value="确认修改">
</div></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</form>
<%
end if
end sub
%>
<%sub help_show%>
<div align="center"> <br>
<strong><font color="#0000FF">购物帮助管理</font></strong> (<a href="?up=help_add">添加购物帮助</a>)<br>
<font color="#999999">(此项显示在商城首页的右边)</font> </div>
<table width="652" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#0000FF" bordercolordark="#FFFFFF">
<tr bgcolor="#00CCFF">
<td width="323">
<div align="center">购 物 帮 助 标 题</div></td>
<td width="186">
<div align="center">发 布 时 间</div></td>
<td width="135">
<div align="center">操 作</div></td>
</tr>
<%
sqltext="select * from help"
rs.open sqltext,conn,1,1
if rs.eof then
response.write "<tr><td colspan=4><div align=center>你还没有添加帮助信息内容</div></td></tr>"
else
do while not (rs.eof or rs.bof)
%>
<tr>
<td> <img src="../IMAGES/we3.gif" width="12" height="12"> <a href="../help.asp?id=<%=rs("id")%>" target="_blank"><%=rs("n_top")%></a></td>
<td><div align="center"><%=rs("n_time")%></div></td>
<td><div align="center"><a href="?up=help_up&id=<%=rs("id")%>">修改</a> | <a href="?up=help_del&id=<%=rs("id")%>" onClick="return confirm('你确认删除该条帮助信息吗?')">删除</a></div></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
<%end sub%>
<%
sub help_del
response.write"<script>alert('试用版本功能限制!');history.go(-1);</script>"
end sub
%>
<%
sub help_up_save
response.write"<script>alert('试用版本功能限制!');history.go(-1);</script>"
end sub
%>
<%
sub help_add_save
call checkfrom
sqltext="select * from help"
rs.open sqltext,conn,3,3
rs.addnew
rs("n_top")=request.form("n_top")
rs("content")=request.form("neirong")
rs.update
response.write"<script>alert('帮助信息添加成功!');window.location.href='help.asp'</script>"
end sub
sub checkfrom
if request.form("n_top")="" then
Response.Write ("<script>alert('对不起!帮助信息标题不能为空!');javascript:history.back(1)</script>")
elseif request.form("neirong")="" then
Response.Write ("<script>alert('对不起!帮助信息内容不能为空!');javascript:history.back(1)</script>")
response.end()
end if
end sub
%>
<%sub help_add%>
<form name="form1" method="post" action="?up=help_add_save">
<table width="650" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="44"><div align="center"><strong><font color="#0000FF">购物帮助添加</font></strong>
(<a href="help.asp">购物帮助管理</a>)</div></td>
</tr>
<tr>
<td height="31" bgcolor="#66E0FF"> 购物帮助标题:
<input name="n_top" type="text" size="30" value="">
(必填)</td>
</tr>
<tr>
<td height="1" bgcolor="#00CCFF"> </td>
</tr>
<tr>
<td> <div align="center">
<INPUT type="hidden" name="neirong" value="">
<IFRAME ID="eWebEditor1" SRC="../webedit/ewebeditor.asp?id=neirong&style=standard_blue" FRAMEBORDER="0" SCROLLING="no" WIDTH="650" HEIGHT="450"></IFRAME>
</div></td>
</tr>
<tr>
<td height="35"> <div align="center">
<input type="submit" name="Submit" value="确认添加">
</div></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</form>
<%end sub%>
<%
rs.close:set rs=nothing
conn.close
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -