タイで就職する人の為の求職サイト - Silom Consulting & Manpower Co., Ltd.

<% Field_Select ="" "j.jobId, c.compId, c.compCode, c.compName, c.businessType, j.nJob, j.gender, j.position, j.salary" & _ ", j.age, j.workArea, j.language, j.condition, j.AddDate" job_SQLs ="" "SELECT " & Field_Select & _ " FROM tbjob j INNER JOIN tbCompany c ON j.compId=c.CompId" & _ " WHERE j.IsDelete ="" 0" & _ " ORDER BY j.priority, j.AddDate Desc" Response.Write vbCrLf & "" &vbCrLf rs.Open job_SQLs, conn, 0, 1 if rs.EOF then rows_job = -1 else rs_job = rs.GetRows rows_job = UBound(rs_job,2) '------------------------------------- Start Product per Page rows_item = rows_job ThisPage = request("page") ppp = 30 if ThisPage = empty then ThisPage = 1 if rows_item >= 0 then ThisPage = CInt(ThisPage) rows_item = rows_item + 1 'calculate total page TotalPage = int(FormatNumber((rows_item/PpP)+0.49999,0)) 'check valid page if ThisPage < 1 then ThisPage ="" 1 elseif ThisPage > TotalPage then ThisPage = TotalPage end if 'set start item in this page sItem = ((ThisPage-1) * PpP) 'set end item in this page if ThisPage = TotalPage then eItem = rows_item - 1 else eItem = sItem + PpP - 1 end if if TotalPage > 1 then strPpP = "Page | " '?O?C3¨O1C1 page list ・Oe¨DaE´§ if TotalPage <="" 10 then '¶eO1eIA!CeO 11 aEeaE´§aoo≫!μO s_countpage = 1 e_countpage = TotalPage else if ThisPage > 5 then if ThisPage+5 > TotalPage then s_countpage = TotalPage-9 e_countpage = TotalPage else s_countpage = ThisPage-4 e_countpage = ThisPage+5 end if else s_countpage = 1 e_countpage = 10 end if end if 'page number for countpage = s_countpage to e_countpage if StrComp(countpage,ThisPage) <> 0 then LinkStr = "" & countpage & "" strPpP = strPpP & LinkStr else strPpP = strPpP & "" & countpage & "" end if strPpP = strPpP & " | " next end if strFound = "" & _ "Found (" & sItem+1 & " - " & eItem+1 & " of " & rows_item & ")" & _ "" end if '------------------------------------- End Product per Page end if rs.Close %>


	「タイの就職や転職成功を目指す」そんな貴方の夢を私たちが応援します。タイで仕事をする人の為の求職サイトです！！

	私たちの人材登録データはいつもアップデートされ、生きた新情報が満載です。面接から入社のフォローアップは勿論、入社後のコンサルトも行ないます。当センターは、タイの新しい人材バンクとして活躍中です。

Information

当センターでは、日々の最新求人情報をお知らせしております。
他の情報やご質問等ございましたら、お気軽に (オンライン求職相談) までお申し付けください。

<% if rows_job >= 0 then %> <% for i = sItem to eItem step 2 %> <% for j = i to i+1 %> <% next %> <% next %> <% end if %>

<% if j <= eItem then jobID = rs_job(0,j) compId = rs_job(1,j) compCode = rs_job(2,j) compName = rs_job(3,j) businessType = rs_job(4,j) nJob = rs_job(5,j) gender = rs_job(6,j) position = rs_job(7,j) salary = rs_job(8,j) age = rs_job(9,j) workArea = rs_job(10,j) language = rs_job(11,j) condition = rs_job(12,j) addDate = rs_job(13,j) if gender = 3 then imggender = "" elseif gender = 2 then imggender = "" elseif gender = 1 then imggender = "" end if %>

<%if nJob then%> <%else%> <%end if%>

<%=compCode%>

<%=imggender%>

<%=eFormatDate(AddDate,1)%>

		<%=businessType%>		<%=salary%>
		<%=position%>		<%=Age%>
		<%=workArea%>		<%=language%>
		<%=condition%>

<% end if %>