change.asp

来自「基于C#语言的一个物流信息网数据库系统开发案例的源代码 ,很实用」· ASP 代码 · 共 46 行

<!-- #include file="../../Conn/conn.asp" -->
<% 
	id=request.form("id")
	title=request.form("title")
	content=request.form("content")
	sql="select * from tb_NewMeg where Title='"&title&"' and Content='"&content&"'"
	rs.open sql,conn
	if not rs.eof or not rs.bof then 
%>
		<script language="javascript">
			alert("您还没有对行业信息内容进行修改!");
			history.back();
		</script>
<% 
		set rs=nothing
		conn.close
		set conn=nothing
%>
<% else %>
	<!-- #include file="../../Conn/conn.asp" -->
<% 
		sql="update tb_NewMeg set Title='"&title&"',Content='"&content&"',IssueDate='"&date()&"' where ID="&id
		rs.open sql,conn
		set rs=nothing 
		conn.close
		set conn=nothing
%>
	<!-- #include file="../../Conn/conn.asp" -->
<%
		sql="select * from tb_NewMeg where Title='"&title&"' and Content='"&content&"'"
		rs.open sql,conn
		if rs.eof or rs.bof then 
%>
			<script language="javascript">
				alert("保存失败，请重新保存");
				history.back();
			</script>
	<% else %>
			<script language="javascript">
				alert("行业信息修改成功");
				window.close();
				opener.location.reload();
			</script>
	<% end if %>
<% end if %>