<% if IsObject(getSQLConnection()) then set objConn=getSQLConnection() else Response.Redirect("error/?id=1") end if intPage=Request.QueryString("intPage") strSortItem=Request.QueryString("si") strSortMode=Request.QueryString("sm") strMyself=Request.ServerVariables("PATH_INFO") strCurrDeptSortMode=Request.QueryString("cd") strCurrLastModSortMode=Request.QueryString("cl") if strSortItem="d" and strSortMode="d" then strCurrDeptSortMode=strSortMode end if if strSortItem="l" and strSortMode="d" then strCurrLastModSortMode=strSortMode end if strLastModSortIcon="▼" strLastModSortCmd=" V.LAST_MOD_DATE" strDeptSortIcon="▼" strDeptSortCmd=" D.DEPT_TITLE" if strCurrDeptSortMode="d" then strDeptSortIcon="▲" strDeptSortCmd=" D.DEPT_TITLE DESC" end if if strCurrLastModSortMode="d" then strLastModSortIcon="▲" strLastModSortCmd=" V.LAST_MOD_DATE DESC" end if if IsInteger32(intPage) then intPage=CLng(intPage) else intPage=1 end if intParamCount=0 strParamName="" strParamValue="" if strSortItem="d" then strSortStmt=" ORDER BY " & strDeptSortCmd & "," & strLastModSortCmd else strSortStmt=" ORDER BY " & strLastModSortCmd & "," & strDeptSortCmd end if strSQL="SELECT V.VAC_ID,D.DEPT_TITLE,V.LAST_MOD_DATE,V.VAC_PROPERTY,V.VAC_TITLE,V.SINIORITY,V.AGE_GROUP,V.EDU_LEVEL FROM URT_VACANCY V,URT_DEPT D WHERE V.APPROVED='1' AND (V.ONLINE_DATE IS NULL OR (V.ONLINE_DATE IS NOT NULL AND DATEDIFF(d,V.ONLINE_DATE,GETDATE())>=0)) AND (V.OFFLINE_DATE IS NULL OR (V.OFFLINE_DATE IS NOT NULL AND DATEDIFF(d,GETDATE(),V.OFFLINE_DATE)>=0)) AND D.DEPT_ID=V.DEPT_ID" & strSortStmt set objRS=objConn.Execute(strSQL) if not objRS.eof then aryVacancy=objRS.GetRows() lngRecordCount=UBound(aryVacancy,2)+1 if lngRecordCount mod 10 = 0 then lngPageCount=lngRecordCount\10 else lngPageCount=lngRecordCount\10+1 end if if intPage>lngPageCount then intPage=lngPageCount intStartIndex=(intPage-1)*10 intEndIndex=intPage*10-1 if intEndIndex>lngRecordCount-1 then intEndIndex=lngRecordCount-1 for intCount=intStartIndex to intEndIndex strVacList=strVacList & "" & vbcrlf strVacList=strVacList & " " & aryVacancy(1,intCount) & "" & vbcrlf strVacList=strVacList & " " & Month(aryVacancy(2,intCount)) & "/" & Day(aryVacancy(2,intCount)) & "" & vbcrlf strVacList=strVacList & "

" & getOptions("job_property",aryVacancy(3,intCount)) & "" & vbcrlf strVacList=strVacList & "

" & getEncodedText(aryVacancy(4,intCount),false) & "" & vbcrlf strVacList=strVacList & " " & getEncodedText(aryVacancy(5,intCount),false) & "" & vbcrlf strVacList=strVacList & " " & getOptions("age_group",aryVacancy(6,intCount)) & "" & vbcrlf strVacList=strVacList & " " & getOptions("edu_level",aryVacancy(7,intCount)) & "" & vbcrlf strVacList=strVacList & "" & vbcrlf next strPageAttr=PageUpDown("./",intPage,lngPageCount,lngRecordCount,intParamCount,strParamName,strParamValue,"c",3,"pg","pgdis","","pginfo") end if if strVacList="" then strVacList=strVacList & " " & vbcrlf strVacList=strVacList & " 目前沒有任何職缺" & vbcrlf strVacList=strVacList & " " & vbcrlf end if %> United Radiant Technology Corp

Home

Carrer

 Career Opportunitese

　

　
<%=strVacList%>

部門名稱 <%=strDeptSortIcon%>

更新日期 <%=strLastModSortIcon%>

性質

職務名稱

經歷

年齡

學歷
　
<%=strPageAttr%>