pass1.asp

来自「实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下：管理员」· ASP 代码 · 共 48 行

<%@ codepage ="936" %>
<%
if session("globalecmaster")="" or session("masterflag")="" then
response.write "<script language='javascript'>"
response.write"parent.location.href='../login.asp';</SCRIPT>" 
response.end
end if
if instr(session("masterflag"),"18")=0 then
response.redirect "../err.asp"
response.end
end if
%>


<%data_path="../../"%>
<!--#include file="../../conn/conn.asp"-->

<!--#include file="../../inc/safe.asp"-->
 
<% 
'对易商通会员提供评论进行加减分处理

if Replace_Text(request("id")) then
id=request("id")
else
Response.Redirect ("/login/chklogin.asp?login=4")
end if
if Replace_Text(request("bprid")) then
bprid=request("bprid")
else
Response.Redirect ("/login/chklogin.asp?login=4")
end if
if Replace_Text(request("action")) then
action=request("action")
else
Response.Redirect ("/login/chklogin.asp?login=4")
end if
type1=request("type")
if type1="好评" then
conn.execute "update wygkcn_corporation set trust_score=trust_score+1 where id="&bprid
elseif type1="批评" then
conn.execute "update wygkcn_corporation set trust_score=trust_score-1 where id="&bprid
end if
conn.execute  "update Yixiang_trustadv set pass=1 where id="&id
conn.close
set conn=nothing
response.redirect("trust_score.asp?action="&action&"")
%>