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

📄 change.asp

📁 本系统采用ASP作为开发环境
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% response.buffer=false %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charSet=gb2312">
<title>信息修改</title>
<link rel="stylesheet" href="../../Css/Style.css">
<script src="../../Js/Change.js"></script>
</head>
<!-- #include file="../../Conn/conn.asp" -->
<% 
sql="insert into tb_Log(Name,Content,IssueDate) values('"&session("Admin")&_
 "','进行"&request.QueryString("name")&"类新闻信息修改','"&Now()&"')"
rs.open sql,conn
set rs=nothing
conn.close
set conn=nothing
%>	
<!-- #include file="../../Conn/conn.asp" -->
<% 
If Request.QueryString("action")<>"" Then
	name1=Request.Form("title") 
	content=Request.Form("content")
	types=Request.Form("type")
	style=Request.Querystring("action")
	If Not isnumeric(name1) Then num=0 Else num=name1 End If 
	sql="select * from tb_News where (ID="&num&" or Title='"&name1&"') and Style='"&style&"'"
	rs.open sql,conn
	If Not rs.Eof or Not rs.Bof Then 
		Set rs=nothing
		conn.close
		Set conn=nothing
		If content="" Then
%>
			<script language="javascript">
				alert("请添加信息内容");
				history.back();
			</script>
<% 			
		else
%>
<!-- #include file="../../Conn/conn.asp" -->
<%
		sql="update tb_News Set Content='"&content&"',Type='"&types&"',IssueDate='"&_
		 Date()&"' where (ID="&num&" or Title='"&name1&"') and Style='"&style&"'"
		 rs.open sql,conn
		 Set rs=nothing
		 conn.close
		 Set conn=nothing
%>
<!-- #include file="../../Conn/conn.asp" -->
<% 
		sql="insert into tb_Log(Name,Content,IssueDate) values('"&session("Admin")&_
		 "','"&style&"类新闻信息"&name1&"成功修改','"&Now()&"')"

		rs.open sql,conn
		set rs=nothing
		conn.close
		set conn=nothing
%>	
		<script language="javascript">
			alert("信息修改成功");
			window.close();
			opener.location.reload();   
		</script>
	<%	end if 
	Else 
	Set rs=nothing
	conn.close
	Set conn=nothing
	%> 
		<script language="javascript">
			alert("您要修改的新闻标题/ID不存在");
			history.back();
		</script>
<% 
	End If 
End If
%>	
<% names=request.QueryString("name") %>
<body topmargin="0" leftmargin="0">
<form name="form1" method="post" action="Change.asp?action=<%=names%>">
<table width="486" height="223" border="0" cellpadding="0" cellspacing="0" bgcolor="#f9f9f9" class="wenbenkuang">
  	<tr bgcolor="#214994">
    	<td height="20" colspan="2"><div align="center"><font color="#FFFFFF"><%=names%>修改</font></div></td>
  	</tr>
	<tr>
    	<td height="32"><div align="right"><font color="#214994">被修改的新闻标题/ID:</font></div></td>
    	<td><input name="title" type="text" class="wenbenkuang" size="50"></td>
  	</tr>  
  	<tr>
    	<td width="149" height="35"><div align="right"><font color="#214994">修改后的新闻类别:</font></div></td>
    	<td width="335">
		<% Select Case names %>
			<% Case "时政要闻" %>	
      	<select name="type" class="wenbenkuang1">
        	<option value="国内事件">国内事件</option>
        	<option value="国际事件">国际事件</option>
      	</select>
	  		<% Case "经济动向" %>
		<select name="type" class="wenbenkuang1">
        	<option value="政策">政策</option>
			<option value="国际">国际</option>
			<option value="市场">市场</option>
			<option value="股市">股市</option>
			<option value="企业">企业</option>
			<option value="产品">产品</option>
			<option value="投资">投资</option>
      	</select>
	  	<% Case "世界军事" %>
	  	<select name="type" class="wenbenkuang1">
			<option value="军旅生活">军旅生活</option>
			<option value="军事武器">军事武器</option>
			<option value="国际战事">国际战事</option>
			<option value="战场前沿">战场前沿</option>
			<option value="军事经济">军事经济</option>
			<option value="台湾问题">台湾问题</option>
      	</select>
	  	<% Case "科学教育" %>
	  	<select name="type" class="wenbenkuang1">
			<option value="空间科技">空间科技</option>
			<option value="前沿技术">前沿技术</option>
			<option value="生命科学">生命科学</option>
			<option value="医疗发展">医疗发展</option>
			<option value="考古发现">考古发现</option>
			<option value="地球环境">地球环境</option>
			<option value="国内教育">国内教育</option>
			<option value="国际校园">国际校园</option>
			<option value="教育问题">教育问题</option>
      	</select>
	  	<% Case "法治道德" %>
	  	<select name="type" class="wenbenkuang1">
			<option value="反腐倡廉">反腐倡廉</option>
			<option value="社会整顿">社会整顿</option>
			<option value="法律法规">法律法规</option>
			<option value="道德思考">道德思考</option>
			<option value="案件跟踪">案件跟踪</option>
			<option value="律师视点">律师视点</option>
      	</select>
	  	<% Case "社会现象" %>
	  	<select name="type" class="wenbenkuang1">
			<option value="衣食住行">衣食住行</option>
			<option value="大街小巷">大街小巷</option>
      	</select>
	  	<% Case "体育世界" %>
	  	<select name="type" class="wenbenkuang1">
			<option value="足球">足球</option>
			<option value="篮球">篮球</option>
			<option value="竞技">竞技</option>
			<option value="赛事跟踪">赛事跟踪</option>
			<option value="体育趣闻">体育趣闻</option>
      	</select>
	  	<% Case "时尚娱乐" %>
	  	<select name="type" class="wenbenkuang1">
			<option value="流行趋势">流行趋势</option>
			<option value="时尚服饰">时尚服饰</option>
			<option value="影视快讯">影视快讯</option>
			<option value="明星生活">明星生活</option>
			<option value="娱乐点播">娱乐点播</option>
      	</select>
	 <% End Select %> 
   		</td>
  	</tr>
  	<tr>
    	<td height="20"><div align="right"><font color="#214994">修改后的新闻内容:</font></div></td>
    	<td rowspan="2"><textarea name="content" cols="50" rows="6" class="wenbenkuang"></textarea>    </td>
  	</tr>
  	<tr>
    	<td height="10">&nbsp;</td>
  	</tr>
  	<tr>
    	<td height="27" colspan="2">
      		<div align="center">
        		<input name="Submit2" type="button" class="go-wenbenkuang3" value="修改" onClick="Change()">
        		<input name="Submit" type="button" class="go-wenbenkuang3" value="返回" onClick="javascript:window.close()">
      		</div>
   		</td>
 	 </tr>
</table> 
</form>
</body>
</html>

⌨️ 快捷键说明

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