📄 article.asp
字号:
<%@ Language=VBScript%>
<!--#include file="conn.asp"-->
<!--#include file="ConnUser.asp"-->
<!--#include file="config.asp"-->
<!--#include file="char.inc"-->
<!--#include file="function.asp"-->
<%
if CreatHTML=1 then
strFileName=WriteNews(Request.QueryString("NewsID"),0)
if strFileName<>"" then
Response.Redirect strFileName
end if
end if
IF request.cookies(Forcast_SN)("KEY")="" THEN
else
usernamecookie=CheckStr(request.cookies(Forcast_SN)("name"))
passwdcookie=CheckStr(trim(Request.cookies(Forcast_SN)("password")))
KEYcookie=CheckStr(trim(request.cookies(Forcast_SN)("KEY")))
if usernamecookie="" or passwdcookie="" then
response.cookies(Forcast_SN)("name")=""
response.cookies(Forcast_SN)("KEY")=""
response.cookies(Forcast_SN)("purview")=""
response.cookies(Forcast_SN)("fullname")=""
response.cookies(Forcast_SN)("reglevel")=""
else
'判断用户的合法性
set rs=server.createobject("adodb.recordset")
sql="select * from "& db_User_Table &" where "& db_User_Name &"='"&usernamecookie&"'"
rs.open sql,ConnUser,1,1
if rs.eof and rs.bof then
response.cookies(Forcast_SN)("name")=""
response.cookies(Forcast_SN)("KEY")=""
response.cookies(Forcast_SN)("purview")=""
response.cookies(Forcast_SN)("fullname")=""
response.cookies(Forcast_SN)("reglevel")=""
end if
IF passwdcookie<>rs(db_User_Password) THEN
response.cookies(Forcast_SN)("name")=""
response.cookies(Forcast_SN)("KEY")=""
response.cookies(Forcast_SN)("purview")=""
response.cookies(Forcast_SN)("fullname")=""
response.cookies(Forcast_SN)("reglevel")=""
END IF
'下面判断用户级别实际在有用户级别是都应该判断
if KEYcookie<>rs("OSKEY") then
response.cookies(Forcast_SN)("name")=""
response.cookies(Forcast_SN)("KEY")=""
response.cookies(Forcast_SN)("purview")=""
response.cookies(Forcast_SN)("fullname")=""
response.cookies(Forcast_SN)("reglevel")=""
end if
rs.close
set rs=nothing
END IF
END IF
'该文件需要进行调整和设置
dim typename
'NewsID=Request.QueryString("NewsID")
NewsID=ChkRequest(Request.QueryString("NewsID"),1) '防注入
Page=Request.QueryString("page")
if page="" then
page=1
elseif not IsNumeric(page) then
Show_Err("非法参数！<br><br><a href='javascript:history.back()'>返回</a>")
response.end
end if
page=int(page)
if newsid="" then
Show_Err("未指定参数！<br><br><a href='javascript:history.back()'>返回</a>")
response.end
elseif not IsNumeric(newsid) then
Show_Err("非法参数！<br><br><a href='javascript:history.back()'>返回</a>")
response.end
else
'判断该篇文章是否审核
set rs=server.createobject("adodb.recordset")
sql="select * from "& db_News_Table &" where NewsId="&NewsId
rs.open sql,conn,3,3
if rs.eof and rs.bof then
rs.close
set rs=nothing
Show_Err("指定的文章不存在！<br><br><a href='javascript:history.back()'>返回</a>")
response.end
else
checked=rs("checkked")
if checked=1 or Request.cookies(Forcast_SN)("key")="super" or Request.cookies(Forcast_SN)("key")="typemaster" or Request.cookies(Forcast_SN)("key")="bigmaster" or Request.cookies(Forcast_SN)("key")="smallmaster" then '文章已审核并且是相关管理员
Click=rs("Click")
if isnull(rs("Click")) then
conn.execute("update "& db_News_Table &" Set Click=1 where NewsID=" & NewsID )
else
conn.execute("update "& db_News_Table &" Set Click=click+1 where NewsID=" & NewsID )
end if
end if
rs.close
set rs=nothing
end if
set rs=server.CreateObject("ADODB.RecordSet")
if uselevel=1 then
if Request.cookies(Forcast_SN)("key")="" then
rs.Source="select * from "& db_News_Table &" where checkked=1 and newslevel=0 and newsid="&newsid
end if
if Request.cookies(Forcast_SN)("key")="selfreg" then
if Request.cookies(Forcast_SN)("reglevel")=3 then
rs.Source="select * from "& db_News_Table &" where checkked=1 and newslevel<=3 and newsid="&newsid
end if
if Request.cookies(Forcast_SN)("reglevel")=2 then
rs.Source="select * from "& db_News_Table &" where checkked=1 and newslevel<=2 and newsid="&newsid
end if
if Request.cookies(Forcast_SN)("reglevel")=1 then
rs.Source="select * from "& db_News_Table &" where checkked=1 and newslevel<=1 and newsid="&newsid
end if
end if
end if
if Request.cookies(Forcast_SN)("key")="super" or Request.cookies(Forcast_SN)("key")="typemaster" or Request.cookies(Forcast_SN)("key")="bigmaster" or Request.cookies(Forcast_SN)("key")="smallmaster" or Request.cookies(Forcast_SN)("key")="check" then
rs.Source="select * from "& db_News_Table &" where newsid="&newsid
else
rs.Source="select * from "& db_News_Table &" where newsid="&newsid
end if
rs.Open rs.Source,conn,1,1
bigclassid=rs("bigclassid")
smallclassid=rs("smallclassid")
title=htmlencode4(trim(rs("title")))
title1=htmlencode4(trim(rs("title")))
about=htmlencode4(trim(rs("about")))
Author=htmlencode4(trim(rs("Author")))
editor=htmlencode4(trim(rs("editor")))
Original=htmlencode4(trim(rs("Original")))
image=rs("image")
UpdateTime=trim(rs("UpdateTime"))
News_Content=rs("Content")
SpecialID=rs("SpecialID")
SpecialID2=rs("SpecialID2")
click=rs("click")
EnCode=trim(rs("EnCode"))
typeid=rs("typeid")
titletype=rs("titletype")
titlecolor=rs("titlecolor")
titleface=rs("titleface")
editor=rs("editor")
wzdj=rs("newslevel")
backtype=rs("backtype")
backtype1=rs("backtype1")
rs.Close
set rs=nothing
set rs=server.CreateObject("ADODB.RecordSet")
rs.Source="select * from "& db_Type_Table &" where typeID=" & typeID
rs.Open rs.Source,conn,1,1
typename=rs("typename")
rs.Close
set rs=nothing
set rs=server.CreateObject("ADODB.RecordSet")
If(isnull(BigClassid)) Then
bigclassname=" "
BigClassid = 0
Else
rsSource="select * from "& db_BigClass_Table &" Where BigClassid="& BigClassid
rs.Open rsSource,conn,1,3
If (rs.eof or rs.bof) Then
bigclassname=" "
else
bigclassname=rs("bigclassname")
End if
rs.close
set rs=nothing
End if
if smallclassid<>"" then
set rs=server.CreateObject("ADODB.RecordSet")
rs.Source="select * from "& db_SmallClass_Table &" Where smallClassid=" & smallClassid
rs.Open rs.Source,conn,1,1
smallclassname=rs("smallclassname")
rs.close
set rs=nothing
end if%>
<%
'文章ip限制
if cINT(backtype1)=1 then
dim byte2
byte2=split(newsipType,"|")
for i=0 to ubound(byte2)
if Request.serverVariables("REMOTE_ADDR")<>byte2(i) then
Show_Err("对不起，此篇文章只供内部浏览，请联系管理员！。<br><br><a href='javascript:history.back()'>返回</a>")
Response.End
end if
next
end if
%>
<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=title%><%if smallclassid<>"" then%>_<%=SmallClassName%><%end if%>_<%=BigClassName%>_<%=typename%>_<%=jjgn%>完美设计网络科技有限公司 完美政府网站管理系统 http://www.wmgov.cn</title>
<%if backtype=0 then %>
<LINK href=news.css rel=stylesheet>
<% else %>
<LINK href=News_1.css rel=stylesheet>
<% end if %>
<style type="text/css">
.newstitle {COLOR: #000000; FONT-FAMILY:"Verdana, Arial, 宋体"; FONT-SIZE: 14px;line-height:1.5}
</style>
<script language="JavaScript" type="text/JavaScript">
function validateMode()
{
if (!bTextMode) return true;
alert("请先取消查看HTML源代码，进入“编辑”状态，然后再使用系统编辑功能!");
message.focus();
return false;
}
function validateModea()
{
if (!bTextMode) return true;
alert("请先取消查看HTML源代码!");
message.focus();
return false;
}
function sign()
{if (!validateMode()) return;
message.focus();
var range =message.document.selection.createRange();
str1="|签收|文件已经阅读"
range.pasteHTML(str1);
}
function img_zoom(e, o) //图片鼠标滚轮缩放
{
var zoom = parseInt(o.style.zoom, 10) || 100;
zoom += event.wheelDelta / 12;
if (zoom > 0) o.style.zoom = zoom + '%';
return false;
}
function ResetForm(){
if (window.confirm('确认要清空对话框内容?')){
frames.message.document.body.innerHTML = '';
return true;
}
return false;
}
</script>
<script language=javascript>
function user_login()
{
document.UserLogin.name.focus();
return false;
}
</script>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
//-->
</script>
<script language="JavaScript" type="text/JavaScript">
var size=14; //字体大小
function fontZoom(fontsize){ //设置字体
size=fontsize;
document.getElementById('fontZoom').style.fontSize=size+'px';
}
function fontMax(){ //字体放大
size=size+2;
document.getElementById('fontZoom').style.fontSize=size+'px';
}
function fontMin(){ //字体缩小
size=size-2;
if (size < 2 ){
size = 2
}
document.getElementById('fontZoom').style.fontSize=size+'px';
}
</SCRIPT>
<script language="javascript">
<!--
function changedata() {
if ( document.AddReview.none.checked ) {
document.AddReview.Author.value = "匿名";
}
}
function changedata1() {
if ( document.AddReview.none1.checked ) {
document.AddReview.email.value = "dvb100@tom.com";
}
}
//-->
</script>
<script language=javascript>
function CheckFormAddReview() //检测评论发表栏填写项目是否为空
{
if(document.AddReview.Author.value=="")
{
alert("请输入用户名！");
document.AddReview.Author.focus();
return false;
}
if(document.AddReview.email.value == "")
{
alert("请输入您的EMAIL！");
document.AddReview.email.focus();
return false;
}
if(document.AddReview.content.value == "")
{
alert("请输入评论内容！");
return false;
}
}
</script>
</head>
<%if ScrollClick = "double" then%>
<SCRIPT language=JavaScript>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -