<%
sub company_more(m_nummer,m_num,m_title)
  dim sqladd,sqladd_head,sqladd_end,nums,n_username,n_topic,n_tim,n_zpnum,n_cname,mhead,ddim
  rssum=0
  nums=nummer
  sqladd_head=""
  sqladd_end=""
  select case action
  case "search"
    mhead=m_title&"&nbsp;→&nbsp;"
    sea_type=trim(request.querystring("sea_type"))
    keyword=code_search(request.querystring("keyword"))
    if sea_type<>"job" and sea_type<>"gzdd" and sea_type<>"username" then sea_type="cname"
    sqladd_end=sql_key(keyword,sea_type,2,"all")
    if sqladd_end<>"" then
      sqladd=sqladd&" and "&sqladd_end
      sqladd_end=""
      mhead=mhead&"（关键字："&keyword&"）"
    end if
    pageurl=pageurl&"keyword="&server.urlencode(keyword)&"&sea_type="&sea_type
  case else
	mhead=m_title
	  if uid<>"" or isnull(uid) then
		sqladd=sqladd&" and username='"&uid&"'"
		pageurl=pageurl&"uid="&uid&"&"
		mhead="《"&uid&"》&nbsp;发布的"&mhead
	  end if
  end select
  response.write vbcrlf&job_bar_top(mhead,1)
  response.write vbcrlf&"<tr class=bg_tds align=center height=25><td width='30%'>招聘职位</td><td width='50%'>发布公司名称</td><td width='10%'>招聘人数</td><td width='10%'>发布日期</td></tr>"
  sql="select id,cname,tim,username,zpnum,job from job where hidden=1"&sqladd&" order by "&sqladd_end&"id desc"
  call joekoe_cms.exec("",-1)
  rs.open sql,conn,1,1
  if not(rs.eof) then rssum=rs.recordcount
  call format_pagecute()
  if cint(viewpage)>1 then rs.move (viewpage-1)*nummer
  if int(viewpage*nummer)>int(rssum) then nums=nummer-(viewpage*nummer-rssum)
  for i=1 to nums
    n_username=rs("username")
    n_topic=rs("job")
    n_topic=joekoe_cms.code_js(n_topic,1)
    n_tim=rs("tim")
    n_tim=joekoe_cms.time_type(n_tim,4)
    n_zpnum=int(rs("zpnum"))
    n_cname=rs("cname")
    n_cname=joekoe_cms.code_js(n_cname,1)
    response.write vbcrlf&company_more_type(n_topic,rs("id"),n_cname,n_username,n_zpnum,n_tim)
    rs.movenext
  next
  rs.close
  response.write vbcrlf&job_bar_end("",1)
  response.write vbcrlf&job_list_pagecute(nummer,rssum,viewpage,thepages,pageurl,1)
end sub
%>