政法学院

<% if Request("method") = 1 then articleid = Request.form("articleid") face = Request.form("face") content = Qcdn.checkStr(Trim(Request.form("content"))) username = Qcdn.checkStr(Trim(Request.form("username"))) password = Qcdn.checkStr(Trim(Request.form("password"))) if Request.Cookies("qcdn")("user_name") = "" then password = md5(password,16) end if ip = Request.ServerVariables("REMOTE_ADDR") Sql = "select Unid from article_User where username = '"& username &"' and password = '"& password &"'" set rs = conn.execute(sql) if rs.eof and rs.bof then response.write "" rs.close : set rs = nothing response.end else sql = "Insert into article_remark(articleid,username,content,faceid,intime,ip)values("& articleid &",'"& username &"','"& content &"',"& face &",Now(),'"& ip &"')" conn.execute(sql) Response.write "" response.end end if elseif Request("method") = 2 then unid = Request("unid") sql = "update article_info set Audit = 0 where Unid in ("& unid &")" conn.execute(sql) Response.Write("") Response.End() elseif Request("method") = 3 then unid = Request("unid") Response.Write("") Response.End() end if id=request("id") cid=request("cid") 'Response.Write unid if unid = "" and id<>"" and cid<>"" then Sql = "select Unid from article_info where classid = "& id &" and Nclassid = "& cid &"" set rs = server.CreateObject ("adodb.recordset") rs.Open sql,conn,3,3 unid=rs("Unid") 'Response.End() else Unid = Request("Unid") end if ad = Request("ad") Sql = "Select title,content,Nclassid,classid,Nkey,hits,writer,writefrom,Intime,Popedom from article_info where Unid = " & Unid Set Rs = conn.execute(Sql) if Rs.eof and Rs.bof then Errmsg = "

发现异常错误。

错误编号为: error 108。

请和信息中心联系解决问题。" call Qcdn.Err_List(errmsg,3) Response.End() else Popedom = Rs(9) if AddPopedom then if Popedom = 1 then if Request.Cookies("qcdn")("user_name") = "" then Response.write ("") Response.end end if end if end if sql = "Update article_info set hits=hits+1 where Unid = " & Unid Conn.execute(sql) title = Rs(0) content = Rs(1) Nclassid = Rs(2) classid = Rs(3) Nkey = Rs(4) hits = Rs(5) writer = Rs(6) writefrom = Rs(7) Intime = Rs(8) end if Rs.close %> 政法学院

WWW.JJU.EDU.CN

返回首页

政法学院开展法制故事讲演比赛

　　为迎接中共江西省委宣传部、江西省司法办、江西省文学艺术联合会、江西省普法办联合开展的全省首届法制故事创作和讲演大赛，也为了增强同学们的法律意识、培养法学专业学生的专业兴趣和实践能力，5月25日晚，政法学院团委在五教模拟法庭举办法制故事讲演比赛，政法学院广大同学和老师参加了此次比赛。

　　此次比赛形式多样，参赛同学们有用第一人称进行讲述的，有用第三人称表达的，有用播报节目方式表现的，也有用调查报告显示的。同学们用标准的普通话绘声绘色地讲述着一个个原创或熟知的法制故事，反映出家庭、学校、社会等方面所存在的法律问题，有效地宣了传法律知识，增强了同学们的法律意识。比赛评选出了一、二、三等奖，优秀选手将参加江西省首届法制故事创作和讲演大赛。

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　政法学院团委
　　　　　　　　　　　　　　　　　　　　　　　　　　