<%@LANGUAGE="VBSCRIPT"%> <% Dim Reczsnews Dim Reczsnews_numRows Set Reczsnews = Server.CreateObject("ADODB.Recordset") Reczsnews.ActiveConnection = MM_connzsnews_STRING Reczsnews.Source = "SELECT * FROM newsData ORDER BY news_time DESC" Reczsnews.CursorType = 0 Reczsnews.CursorLocation = 2 Reczsnews.LockType = 1 Reczsnews.Open() Reczsnews_numRows = 0 %> <% Dim Recjynews Dim Recjynews_numRows Set Recjynews = Server.CreateObject("ADODB.Recordset") Recjynews.ActiveConnection = MM_connjynews_STRING Recjynews.Source = "SELECT * FROM newsData ORDER BY news_time DESC" Recjynews.CursorType = 0 Recjynews.CursorLocation = 2 Recjynews.LockType = 1 Recjynews.Open() Recjynews_numRows = 0 %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = 15 Repeat2__index = 0 Recjynews_numRows = Recjynews_numRows + Repeat2__numRows %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 15 Repeat1__index = 0 Reczsnews_numRows = Reczsnews_numRows + Repeat1__numRows %> <% ' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables Dim Recjynews_total Dim Recjynews_first Dim Recjynews_last ' set the record count Recjynews_total = Recjynews.RecordCount ' set the number of rows displayed on this page If (Recjynews_numRows < 0) Then Recjynews_numRows = Recjynews_total Elseif (Recjynews_numRows = 0) Then Recjynews_numRows = 1 End If ' set the first and last displayed record Recjynews_first = 1 Recjynews_last = Recjynews_first + Recjynews_numRows - 1 ' if we have the correct record count, check the other stats If (Recjynews_total <> -1) Then If (Recjynews_first > Recjynews_total) Then Recjynews_first = Recjynews_total End If If (Recjynews_last > Recjynews_total) Then Recjynews_last = Recjynews_total End If If (Recjynews_numRows > Recjynews_total) Then Recjynews_numRows = Recjynews_total End If End If %> <% Dim MM_paramName %> <% ' *** Move To Record and Go To Record: declare variables Dim MM_rs Dim MM_rsCount Dim MM_size Dim MM_uniqueCol Dim MM_offset Dim MM_atTotal Dim MM_paramIsDefined Dim MM_param Dim MM_index Set MM_rs = Recjynews MM_rsCount = Recjynews_total MM_size = Recjynews_numRows MM_uniqueCol = "" MM_paramName = "" MM_offset = 0 MM_atTotal = false MM_paramIsDefined = false If (MM_paramName <> "") Then MM_paramIsDefined = (Request.QueryString(MM_paramName) <> "") End If %> <% ' *** Move To Record: handle 'index' or 'offset' parameter if (Not MM_paramIsDefined And MM_rsCount <> 0) then ' use index parameter if defined, otherwise use offset parameter MM_param = Request.QueryString("index") If (MM_param = "") Then MM_param = Request.QueryString("offset") End If If (MM_param <> "") Then MM_offset = Int(MM_param) End If ' if we have a record count, check if we are past the end of the recordset If (MM_rsCount <> -1) Then If (MM_offset >= MM_rsCount Or MM_offset = -1) Then ' past end or move last If ((MM_rsCount Mod MM_size) > 0) Then ' last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' move the cursor to the selected record MM_index = 0 While ((Not MM_rs.EOF) And (MM_index < MM_offset Or MM_offset = -1)) MM_rs.MoveNext MM_index = MM_index + 1 Wend If (MM_rs.EOF) Then MM_offset = MM_index ' set MM_offset to the last possible record End If End If %> <% ' *** Move To Record: if we dont know the record count, check the display range If (MM_rsCount = -1) Then ' walk to the end of the display range for this page MM_index = MM_offset While (Not MM_rs.EOF And (MM_size < 0 Or MM_index < MM_offset + MM_size)) MM_rs.MoveNext MM_index = MM_index + 1 Wend ' if we walked off the end of the recordset, set MM_rsCount and MM_size If (MM_rs.EOF) Then MM_rsCount = MM_index If (MM_size < 0 Or MM_size > MM_rsCount) Then MM_size = MM_rsCount End If End If ' if we walked off the end, set the offset based on page size If (MM_rs.EOF And Not MM_paramIsDefined) Then If (MM_offset > MM_rsCount - MM_size Or MM_offset = -1) Then If ((MM_rsCount Mod MM_size) > 0) Then MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' reset the cursor to the beginning If (MM_rs.CursorType > 0) Then MM_rs.MoveFirst Else MM_rs.Requery End If ' move the cursor to the selected record MM_index = 0 While (Not MM_rs.EOF And MM_index < MM_offset) MM_rs.MoveNext MM_index = MM_index + 1 Wend End If %> <% ' *** Move To Record: update recordset stats ' set the first and last displayed record Recjynews_first = MM_offset + 1 Recjynews_last = MM_offset + MM_size If (MM_rsCount <> -1) Then If (Recjynews_first > MM_rsCount) Then Recjynews_first = MM_rsCount End If If (Recjynews_last > MM_rsCount) Then Recjynews_last = MM_rsCount End If End If ' set the boolean used by hide region to check if we are on the last record MM_atTotal = (MM_rsCount <> -1 And MM_offset + MM_size >= MM_rsCount) %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> <% ' *** Move To Record: set the strings for the first, last, next, and previous links Dim MM_keepMove Dim MM_moveParam Dim MM_moveFirst Dim MM_moveLast Dim MM_moveNext Dim MM_movePrev Dim MM_urlStr Dim MM_paramList Dim MM_paramIndex Dim MM_nextParam MM_keepMove = MM_keepBoth MM_moveParam = "index" ' if the page has a repeated region, remove 'offset' from the maintained parameters If (MM_size > 1) Then MM_moveParam = "offset" If (MM_keepMove <> "") Then MM_paramList = Split(MM_keepMove, "&") MM_keepMove = "" For MM_paramIndex = 0 To UBound(MM_paramList) MM_nextParam = Left(MM_paramList(MM_paramIndex), InStr(MM_paramList(MM_paramIndex),"=") - 1) If (StrComp(MM_nextParam,MM_moveParam,1) <> 0) Then MM_keepMove = MM_keepMove & "&" & MM_paramList(MM_paramIndex) End If Next If (MM_keepMove <> "") Then MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1) End If End If End If ' set the strings for the move to links If (MM_keepMove <> "") Then MM_keepMove = Server.HTMLEncode(MM_keepMove) & "&" End If MM_urlStr = Request.ServerVariables("URL") & "?" & MM_keepMove & MM_moveParam & "=" MM_moveFirst = MM_urlStr & "0" MM_moveLast = MM_urlStr & "-1" MM_moveNext = MM_urlStr & CStr(MM_offset + MM_size) If (MM_offset - MM_size < 0) Then MM_movePrev = MM_urlStr & "0" Else MM_movePrev = MM_urlStr & CStr(MM_offset - MM_size) End If %> 招生就业指导办公室

2008年贵州省公安厅招考录用交通警察工作实施方案

        为切实缓解我省高速公路交警警力严重不足的突出问题,经2008年5月27日厅党委会议研究决定,通过考试择优录用50名人民警察补充省公安厅交警总队直属支队警力。为确保招考工作顺利完成,根据《公务法》、《人民警察法》、《公务员录用规定(试行)》有关规定,制定如下工作方案。

一、组织领导
招考工作在厅党委统一领导下进行,成立招考工作领导小组,领导小组组长由王兴正同志担任,副组长由唐宇、邹亚平同志担任。同时从厅政治部、交警总队、贵州警官职业学院、抽调相关人员组成招考工作办公室,负责具体招考工作。

二、工作程序
此次招考工作严格按照公开、平等、竞争、择优的原则,采取考试与考察相结合的办法进行,按报名及资格审查、笔试、面试、体检、考察政审、公示、录用审批的程序进行。

三、招考职位及人数
本次招考职位共50人(其中男45人,女5人)。具体职位如下:
(一)直属支队镇胜高速公路交通警察一大队
民警:10名(男9名,女1名)
(二)直属支队镇胜高速公路交通警察二大队
民警:10名(男9名,女1名)
(三)直属支队玉凯高速公路交通警察一大队
民警:5名(男4名,女1名)
(四)直属支队玉凯高速公路交通警察二大队
民警:5名(男4名,女1名)
(五)直属支队贵新高速公路交通警察三大队
民警:3名(男3名)
(六)直属支队贵新高速公路交通警察四大队
民警:7名(男6名,女1名)
(七)直属支队崇遵高速公路交通警察一大队
民警:3名(男3名)
(八)直属支队崇遵高速公路交通警察二大队
民警:7名(男7名)

四、招考对象及条件
(一)招考对象
1999年至2006年贵州警官职业学院和其他公安警察院校普通高校全日制大专及以上毕业生,已参加省人事厅统一组织的公务员资格考试,成绩合格,目前尚未正式录用为公务员的人员。
(二)招考条件
身体健康,体形端正。双侧单眼裸眼视力均在4.8以上,男性身高170CM以上,女性身高160CM以上,并符合《公务员录用规定(试行)》所规定的其他条件。
除身高和视力条件外,其他身体条件按人事部、公安部《公安机关录用人民警察体检项目和标准》(人发[2001]74号)执行。
(三)以下人员不得报考:
1、不能坚持党的基本路线,在重大政治问题上不能与党中央保持一致;
2、曾因犯罪受过刑事处罚,受过劳动教养或少年管教的人员;
3、曾被辞退或者开除公职的;
4、道德败坏,有流氓、偷窃等不良行为的;
5、直系血亲或对本人有重大影响的旁系血亲(三代以内)中有被判死刑或者正在服刑的;
6、直系血亲或对本人有重大影响的旁系血亲(三代以内)在境内外从事颠覆我国政权活动的;
7、曾因贪污、行贿受贿、泄露国家机密等原因受到过党纪、政纪处分或近三年公务员年度考核中曾被确定为不称职的;
8、法律、法规规定不得录用为人民警察的其他人员。
已被录用的公务员不能报考。

五、报名及资格审查
(一)报名
1、报名时间:2008年7月1、2、3日 上午9:00至下午16:00
2、报名地点:贵州警官职业学院。
3、报名要求:按照招考条件和要求,报考人员持毕业证书、有效《居民身份证》(或户籍所在地公安机关出具的附本人照片的户籍证明)原件及复印件一份,在职人员持单位同意报考证明(中、小学教师需持县级以上教育行政主管部门的证明)。考生根据所报职位,按要求填写《贵州省公安厅2008年招考人民警察报名表》(以下简称《报名表》),交近期同底免冠一寸照片3张。《报名表》填写信息不真实、不完整或填写错误的,责任自负;由他人代报的,若报名信息出现上述情况,视同考生本人填写,由考生本人承担责任。每名报考人员只能报考一个职位。
(二)资格审查
1、初审。报名工作人员根据考生填写的个人信息,对照《实施意见》规定的报名条件和填报职位所需的资格条件进行资格初审,经初审合格的进行复审。
2、复审。招考单位根据初审意见,严格按照《实施意见》和考生填写的《报名表》,对考生是否符合报考职位所需资格条件进行严格复审,经复审符合招考职位所需资格条件的考生,由招考单位审查人员签署同意报名意见,并加盖招考单位人事部门公章。经复审不符合报考条件的考生,不予报名。因资格审查不严致使不符合《实施意见》规定条件的考生进入考试环节的,由招考单位承担责任,该考生考试成绩作无效处理。

六、笔试
笔试为闭卷考试。科目为《公安基础知识及申论综合》(100分)。
笔试时间:2008年7月27日上午9:00—11:00
笔试地点见《笔试准考证》,考生必须同时持有效《居民身份证》(或户籍所在地公安机关出具的附本人照片的户籍证明)和《笔试准考证》方能进入考场参加笔试。

七、面试
笔试结束后,根据考生笔试成绩将男前135名,女前15名确定为面试对象。出现末位并列的,同时进入面试。
面试时间:7月28日上午8:30。地点:贵州警官职业学院综合楼。考生必须同时持有有效《居民身份证》(或户籍所在地公安机关出具的附本人照片的户籍证明)和《笔试准考证》方能进入考场参加面试。

八、体检
笔试、面试结束后,按笔试成绩占50 %,面试成绩占50 %的比例计算考生总成绩(笔试、面试成绩和总成绩均按“四舍五入法”保留小数点后两位数字)。考生总成绩确定后,按总成绩对各职位报考者进行排名,并按本职位计划招考数1:1比例依排名从高到低确定体检对象。排名出现末位并列的,面试成绩高者确定为体检对象。体检不合格的,依序向下递补人员参加体检。
体检工作按照《公安机关录用人民警察体检项目和标准》(人发[2001]74号)执行。对报考者身高、视力、体重、血压项目的检查,在体检时采用当场复查的方式,对事后考生提出的复查申请不予受理。复查结果由纪检监察人员、复查医生和考生本人当场签字后确认,考生拒签的,视为放弃体检资格。体检工作在指定的医院进行。体检费用由考生自理。

九、考察和政审
对体检合格人员确定为考察、政审对象。考察和政审工作由厅政治部按照《公安机关录用人民警察考核和政审工作暂行规定》统一组织。
考察和政审中发现下列情况之一者,视为考察政审不合格,取消拟录用资格。
1、不能坚持党的基本路线,在重大政治问题上不能与党中央保持一致;
2、曾因犯罪受过刑事处罚,受过劳动教养或少年管教的;
3、曾被辞退或者开除公职的;
4、道德败坏,有流氓、偷窃等不良行为的;
5、直系血亲或对本人有重大影响的旁系血亲(三代以内)中有被判死刑或者正在服刑的;
6、直系血亲或对本人有重大影响的旁系血亲(三代以内)在境内外从事颠覆我国政权活动的;
7、曾因贪污、行贿受贿、泄露国家机密等原因受到过党纪、政纪处分的;
8、不符合招考职位所需资格条件的;
9、弄虚作假的;
10、经研究确定不能录用的其它情况。
考察、政审不合格的,按本职位进入面试人员总成绩从高分到低分的顺序递补进行体检、考察、政审。

十、职位调剂
若个别职位上线人数或经递补后体检考察政审合格人数达不到该职位招考计划数的,可以进行职位调剂。参加职位调剂的条件是:进入面试未被报考职位录取且总成绩列前的考生。调剂方法是:对这部分考生总成绩进行大排名,从高到低征询考生意见调剂到空缺职位。

十一、录用审批
对考察和政审合格人员,按照《公务员录用规定(试行)》和省委组织部、省人事厅《关于公务员录用审批工作有关事项的通知》(黔组通[2007]122号)规定办理公务员(人民警察)录用手续,并按其报名时填报职位进行分配。
新录用人员试用期一年,试用期满考核合格的,办理任职手续。试用期满考核不合格的,取消录用。

十二、纪律监督
招考工作严格按照公开、平等、竞争、择优的原则进行,坚持公开报考条件、公开考试程序、公开考试结果“三公开”制度,接受纪检监察部门和社会各界监督。考试报名工作人员要严格按照《实施意见》规定的报考条件进行资格审查,严禁擅自放宽报考条件和标准,坚决杜绝弄虚作假、徇私舞弊等不良现象的发生。工作人员和参考人员如有违反规定或弄虚作假的,一经查实,对工作人员将按照《公务员法》及相关规定处理。构成犯罪的,依法追究刑事责任。
对违反录用纪律的报考者,视情节轻重,分别给予批评教育,取消考试、考察和体检资格,不予录用或取消录用等处理。其中,有舞弊等严重违反录用纪律行为的,五年内不得报考公务员。构成犯罪的,依法追究刑事责任。
咨询电话:0851-5904025

领取准考证时间:7月26日上午。
地点:贵州警官职业学院综合楼九楼招生就业办公室。

Copyright © 2008 贵州警官职业学院 招生就业指导办公室

<% Reczsnews.Close() Set Reczsnews = Nothing %> <% Recjynews.Close() Set Recjynews = Nothing %>