📄 news2.asp

📁 这是一个很漂亮的网站购物系统
💻 ASP
字号:
<!--#include file="../include/buyok_shop_30_conn.asp"-->
<!--#include file="checkadmin.asp"-->
<script language=javascript src=../include/mouse_on_title.js></script>
<%call checkmanage("07")%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="manage.css" type="text/css">
</head>

<BODY background="../images/admin/back.gif">

<%
action=request("ok")
if action="" then 
    Set rs = conn.Execute("select * from shopsetup") 
	%>
	<table width="98%" border="1"  style="border-collapse: collapse; border-style: dotted; border-width: 0px"  bordercolor="#333333" cellspacing="0" cellpadding="2">
	<form action=news2.asp method=post name=setup>	
	<tr class=backs><td colspan=2 class=td height=18>编辑新闻分类</td></tr>
	<tr><td width=20% align=right>新闻分类1 &nbsp;&nbsp;</td><td width="405"> <input type=text value="<%=rs("newstitle1")%>" name="newstitle1" size=30  maxlength="15"> <%if rs("newstitle1")<>"" then %><a href=news1.asp?nclass=1><img alt='浏览该类别的全部文章' border=0 src='../images/admin/goto.gif'></a><% end if%></td></tr>	
	<tr><td width=20% align=right>新闻分类2 &nbsp;&nbsp;</td><td width="405"> <input type=text value="<%=rs("newstitle2")%>" name="newstitle2" size=30  maxlength="15"> <%if rs("newstitle2")<>"" then %><a href=news1.asp?nclass=2><img alt='浏览该类别的全部文章' border=0 src='../images/admin/goto.gif'></a><% end if%></td></tr>	
	<tr><td width=20% align=right>新闻分类3 &nbsp;&nbsp;</td><td width="405"> <input type=text value="<%=rs("newstitle3")%>" name="newstitle3" size=30  maxlength="15"> <%if rs("newstitle3")<>"" then %><a href=news1.asp?nclass=3><img alt='浏览该类别的全部文章' border=0 src='../images/admin/goto.gif'></a><% end if%></td></tr>	
	<tr><td width=20% align=right>新闻分类4 &nbsp;&nbsp;</td><td width="405"> <input type=text value="<%=rs("newstitle4")%>" name="newstitle4" size=30  maxlength="15"> <%if rs("newstitle4")<>"" then %><a href=news1.asp?nclass=4><img alt='浏览该类别的全部文章' border=0 src='../images/admin/goto.gif'></a><% end if%></td></tr>	
	<tr><td width=20% align=right>新闻分类5 &nbsp;&nbsp;</td><td width="405"> <input type=text value="<%=rs("newstitle5")%>" name="newstitle5" size=30  maxlength="15"> <%if rs("newstitle5")<>"" then %><a href=news1.asp?nclass=5><img alt='浏览该类别的全部文章' border=0 src='../images/admin/goto.gif'></a><% end if%></td></tr>	
	<tr><td width=20% align=right>首页新闻是否滚动 &nbsp;</td><td > <input type="radio" name="newsmove" value="0" <%if rs("newsmove")=0 then%>checked<%end if%>>  是<input type="radio" name="newsmove" value="1" <%if rs("newsmove")=1 then%>checked<%end if%>> 否 </td></TR>

	<tr><td width=20% align=right>首页新闻框样式 &nbsp;</td><td > <input type="radio" name="news_skin" value="1" <%if rs("news_skin")="1" then%>checked<%end if%>>样式一 <input type="radio" name="news_skin" value="2" <%if rs("news_skin")="2" then%>checked<%end if%>>样式二  <input type="radio" name="news_skin" value="3" <%if rs("news_skin")="3" then%>checked<%end if%>>样式三  <input type="radio" name="news_skin" value="4" <%if rs("news_skin")="4" then%>checked<%end if%>>样式四  <input type="radio" name="news_skin" value="5" <%if rs("news_skin")="5" then%>checked<%end if%>>样式五  <input type="radio" name="news_skin" value="6" <%if rs("news_skin")="6" then%>checked<%end if%>>样式六</td></TR>


	<tr><td colspan=2 width="568" ><INPUT name="ok" TYPE="hidden" value="ok"><INPUT name=action TYPE="submit" value="保存设置"></td></tr>

</form></table>
	<%
	rs.close
	conn.close
	set rs=nothing
	set conn=nothing
end if%>

<%              
if action="ok" then

if trim(request.form("newstitle1"))="" then
response.write "<script language='javascript'>"
response.write "alert('第一个新闻类别名称不能为空，单击确定返回！');"
response.write "location.href='javascript:history.go(-1)';"							
response.write "</script>"	
response.end
end if


     Set rs=Server.CreateObject("ADODB.Recordset")
	 sql="select * from shopsetup"
	 rs.open sql,conn,1,3

 	 rs("newstitle1")=trim(request.form("newstitle1"))
 	 rs("newstitle2")=trim(request.form("newstitle2"))
 	 rs("newstitle3")=trim(request.form("newstitle3"))
 	 rs("newstitle4")=trim(request.form("newstitle4"))
 	 rs("newstitle5")=trim(request.form("newstitle5"))
 	 rs("newsmove")=request.form("newsmove")
 	 rs("news_skin")=request.form("news_skin")

        rs.update
	url="news2.asp"
	rs.close	
	set rs=nothing

	response.write "<script language='javascript'>"
	response.write "alert('您的设置已经保存！');"
	response.write "location.href='"&url&"';"			
	response.write "</script>"
end if%>


</body></html>
⌨️ 快捷键说明

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