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_KnowledgeMeg 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_KnowledgeMeg 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_KnowledgeMeg 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 %>