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

📄 update.asp

📁 asp的新闻网站
💻 ASP
字号:
<%Response.Buffer=true%>
<%
'修改:
'时间:
	'模板设计:秦怀平(jincao@yeah.net)
	'开发时间:2000.12
%>
<!--#include file="../include/odbc.asp" -->
<!--#include file="../include/killStr.asp" -->
<!--#include file="../include/checkUser.asp" -->
<!--#include file="../include/checkServer.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Qinhp NetModel Generator">
<meta name="Author" content="QinHuaiPing(秦怀平)">
<link rel="stylesheet" href="../script/style.css" type="text/css">
<%
infoId=request("infoId")
set rs=server.CreateObject("adodb.recordset")
if request("submit")<>"" then
	sql="select * from news2_info where infoId='"&infoid&"'"
	rs.open sql,conn,3,3
	if not rs.eof then
		set rsl=server.CreateObject("adodb.recordset")
		'if request("menuid")="" then
		'	response.write "数据保存出错!原因:特定字段不允许为空!<a href=javascript:history.back()>按此返回</a>"
		'	response.end
		'end if
		'rs("menuid")=killStr(request("menuid"))
		if request("newsTitle")="" then
			response.write "数据保存出错!原因:特定字段不允许为空!<a href=javascript:history.back()>按此返回</a>"
			response.end
		end if
		rs("newsTitle")=left(rtrim(killStr(request("newsTitle"))),200)
		rs("author")=left(rtrim(killStr(request("author"))),15)
		rs("introduction")=left(rtrim(killStr(request("introduction"))),200)
		if killStr(request("contents")) ="" and killStr(request("referurl"))="" then
	    response.write "数据保存出错!原因:文章内容和链接URL不允许同时为空!<a href=javascript:history.back()>按此返回</a>"
	    response.end
	    end if
		rs("contents")=killStr(request("contents"))
		rs("referurl")=left(rtrim(killStr(request("referurl"))),100)
	'如果类型不符合,请修改转换函数!
	if request("clickNum")="" then
		rs("clickNum")=0
	else
		rs("clickNum")=cLng(killStr(request("clickNum")))
	end if
	
	if killStr(request("regtime"))="" then
		rs("regtime")=now()
	else
		rs("regtime")=killStr(request("regtime"))
	end if
		rs("derivation")=left(rtrim(killStr(request("derivation"))),50)
		rs.update
	end if
	
	response.redirect "upLoadImgbig.asp?infoid="&rs("infoId")&"&menuid="&trim(request("menuid"))&"&bigpic="&rs("bigpic")
	rs.close%>
<script language=javascript>
alert("修改成功!");
//location.href =history.back();
</script>
<%end if%>

<script src="../script/trim.js" language="JavaScript"></script>
<script src="../script/validdate.js" language="JavaScript"></script>
<script language='JavaScript'>
function check(form1){
	if (trim(form1.newsTitle.value)=='')
		{alert('字段文章标题不允许为空!');
		form1.newsTitle.focus();
		form1.newsTitle.select();
		return (false);
		}
	if (trim(form1.derivation.value)=='')
		{alert('出处不允许为空!');
		form1.derivation.focus();
		form1.derivation.select();
		return (false);
		}
	if (trim(form1.newsTitle.value).length>200)
		{alert('文章标题超长(200字以内)!');
		form1.newsTitle.focus();
		form1.newsTitle.select();
		return (false);
		}
	if (trim(form1.referurl.value)=='' && trim(form1.contents.value)=='')
		{alert('文章内容和链接URL不允许同时为空!');
		form1.referurl.focus();
		form1.referurl.select();
		return (false);
		}
	if (trim(form1.introduction.value).length>200)
		{alert('文章导语超长(200字以内)!');
		form1.introduction.focus();
		form1.introduction.select();
		return (false);
		}
	if (trim(form1.author.value).length>15)
		{alert('作者超长(15字以内)!');
		form1.author.focus();
		form1.author.select();
		return (false);
		}	
	if (trim(form1.derivation.value).length>50)
		{alert('出处超长(50字以内)!');
		form1.derivation.focus();
		form1.derivation.select();
		return (false);
		}		
	}
</script>

</head>
<body bgcolor="#FFFFE0"><%sql = "select * from news2_info where infoId='"&request("infoid")&"'"
rs.open sql,conn,3,3
if rs.eof then
	response.write "记录没有找到!"
	response.end
end if%>

<%
set rsSelect=server.CreateObject("adodb.recordset")
sql="select menuname from news2_menu where menuid='"&request("menuid")&"'"
rsselect.open sql,conn,2,3
%>
<form method=POST action=<% =request.servervariables("path_info")%> name=add onsubmit="return check(this);">
	<p align=center><b><font size=4 color=#0000FF><u>新闻信息表数据修改</u></font></b></p>
	<div align=center><center>
	<table style="border: 1 solid #0000FF" width=85%>
		 <%if not rsselect.EOF then%>
		<tr>
			<td style="border: 1 solid #0000FF" align=right>栏目名:</td>
			<td style="border: 1 solid #0000FF"><%=rsselect("menuname")%></td>
		</tr>
		<%
		
		end if
		rsselect.Close
		set rsselect=nothing%>
		<tr>
			<td style="border: 1 solid #0000FF" align=right>文章标题:</td>
			<td style="border: 1 solid #0000FF"><input type=Text name=newsTitle value='<%=rs("newsTitle")%>' size=40 maxLength=200></td></tr>
		</tr>
		<tr>
			<td style="border: 1 solid #0000FF" align=right>链接URL:</td>
			<td style="border: 1 solid #0000FF"><input type=Text name=referurl value='<%=rs("referurl")%>' size=40 maxLength=100></td></tr>
		</tr>
		<tr>
			<td style="border: 1 solid #0000FF" align=right>出处:</td>
			<td style="border: 1 solid #0000FF"><input type=Text name=derivation value='<%=rs("derivation")%>' size=20 maxLength=50></td></tr>
		</tr>
		<tr>
			<td style="border: 1 solid #0000FF" align=right>导读/简介:</td>
			<td style="border: 1 solid #0000FF"><textarea name=introduction cols=40 rows=3 maxLength=200><%=rs("introduction")%></textarea></td>
		</tr>
		
		<tr>
			<td style="border: 1 solid #0000FF" align=right>文章内容:</td>
			<td style="border: 1 solid #0000FF"><textarea name=contents cols=40 rows=10><%=rs("contents")%></textarea></td>
		</tr>
		<tr>
			<td style="border: 1 solid #0000FF" align=right>作者:</td>
			<td style="border: 1 solid #0000FF"><input type=Text name=author value='<%=rs("author")%>' size=20 maxLength=15></td></tr>
		</tr>
		
		<tr>
			<input type=hidden value='<%=request("infoid")%>' name='infoid'>
			<td style="border: 1 solid #0000FF" colspan=2 align=center><input type=submit value=' 确定 ' name=submit> <input type=reset value=' 重写 ' name=reset></td>
		</tr><input type=hidden value=<%=request("menuid")%> name=menuid>
	</table>
	</center></div>
</form>
</body>
</html>

⌨️ 快捷键说明

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