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

    关于“思想政治教育”省级重点学科组成员上交材料的通知

    各位学科组成员:

      学校学科建设办公室将于12月上旬检查重点学科的建设情况,截止目前仍有部分成员未上交本人的有关材料,请学科组成员:沈明明、李苏琴、吕龙菊、曹欢荣、何祥勇、曾国俊、邹菊如、陈圣纲、柯元、郑晓东、肖莉、汪顺求、李雪,下周三(12月2日)前把本人2008年下半年和2009年的科研材料(限本学科方向)交到王诗堂老师处:
      1、公开出版的学术专著原件一本;
      2、公开发表的学术论文复印件一式三份;
      3、学术会议邀请函或通知、博士入学通知书等复印件一式三份;
      4、课题立项、结题证明材料复印件一式三份;
      5、上述材料的电子版与纸质目录(含课题经费、批准号等)(注明本年度已发表未收到杂志)。

                                         “思想政治教育”学科组
                              2009年11月27日

    九江学院政法学院 版权所有COPYRIGHT(C)2008. ALL RIRHTS RESERVED