<%@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 %> 招生就业指导办公室

公安政法院校学生如何树立正确的择业观

       择业对于毕业生来说，是一次实现人生价值的选择，学生在校学习十多年，学到了不少知识，从学校步入社会，又缺乏对社会现实的了解，加上一些功利思想的驱动，择业时难免出现多向性和不稳定性，尤其是公安政法院校的学生，由于就读的学校，所学的专业，在传统意识中，就业的方向就是公安、政法机关、国家行政事业单位，学生从进校第一天起，在自己的潜意识中将来就是一名国家公务员，有的人会认为自己所学的专业比别人高一等，心理总是把待遇高、福利好的单位作为择业目标，就业视角非常狭窄。虽然一些学生也看到了国家正进行知识结构的调整，企业在加大改革力度，减员增效，机关事业单位也在精减人员，用人需求量比往年有所下降，但还缺乏到基层、到艰苦行业锻炼的勇气，择业中表现为期望值过高，缺乏竞争意识，自主择业观念淡薄，有较强的依赖心理，这山望着那山高等等。
新形势下，公安政法院校学生应当树立什么样的择业观呢？

一 树立勇于面对竞争的观念

       社会主义市场经济最显著的特征之一就是竞争。随着国家人事制度的改革，公务员实行社会公开招考将是一种大趋势。因此，公安政法院校的学生，不能总是期望学校一包到底，要摆脱被动依赖、消极等待的状况，敢于竞争，树立“爱拼才会赢”的观念。在竞争中求生存、求发展，才是正确的择业态度。

二 树立自主择业的观念，克服依赖心理

       择业就是正确的估价自己，摆正择业位置，根据自己的实际和社会现实进行适当的职业选择。大部分公安政法类的学生还存在计划经济条件下形成的那种“入了大学门，就是国家人”的观念，以为只要考进了公安政法院校就有了“铁饭碗”，有一种依赖心理，依赖学校，依赖家长，甚至依赖用人单位，缺乏自主意识和竞争意识。

三 树立面向基层的观念，调整期望值

       现在全国每年都有上百万大学毕业生在短短几个月的时间内实现就业，这对每一个毕业生来说都存在着一定的压力。这就需要公安政法类毕业生能够冷静地面对现实，在择业的实践中逐步改变择业观，不要只把目光锁定在公职、干部身份，择业范围局限在国家机关事业单位或大城市，待遇丰厚的单位。要知道这些岗位的不少单位早己人员饱和，接收能力非常有限，你未必会被录用，即使录用了你，你也许从此被淹没在人才的海洋之中，尤其是专科层次毕业生。如果一味追求不切实际的职业，不能根据就业形势及时调整期望值，将会出现期望值与社会需求严重错位，就业渠道将越来越窄。因此，公安政法类的毕业生在择业时，要根据社会需要，确立面向基层，树立哪里需要就到哪去的务实的择业观。

四 树立发挥专业所长，注重综合素质的观念

       专业对口，当然更容易发挥专业所长，但是现代科技知识发展使知识更新周期大大缩短。事实上，现在越来越多的用人单位在招聘高校毕业生时不是一味注重专业是否对口，而是更加注重毕业生的综合素质的能力，公安政法类学生由于专业口径狭窄，一味信奉专业对口，是不适应工作需要和社会发展的。如果我们有较强的综合素质，如：英语能过四极，计算机能过国家二极，加上强健的体魄和熟练的法律知识功底，只要用人单位给我们毕业生以同等的机会，我们一定会尽力做得更好。

附：综合素质的基本标准：

  1. 较好的思想心理素质；
  2. 基础知识扎实，知识面广、动手能力强，具有一定的潜能；
  3. 热爱本职工作，勇于开拓进取，乐于奉现、不怕吃苦，有事业心和责任感；
  4. 具有一定的组织管理能力、社交能力、语言和文字表达能力；
  5. 较强的计算机应用和外语能力；
  6. 具有一定的工作技能；

       这是当前用人单位，尤其是党政机关、高等院校、部队、科研单位以及其他高层次用人单位用人时都要考察的内容之一。因此，公安政法院校的学生，应该通过了确社会，促使自己利用有限的在校时间，抓紧学习，进一步充实和完善自己，以便主动的适应社会。

Copyright © 2007 贵州警官职业学院　招生就业指导办公室
<% Reczsnews.Close() Set Reczsnews = Nothing %> <% Recjynews.Close() Set Recjynews = Nothing %>