index.asp

请认真阅读您的文件包然后写出其具体功能(至少要20个字)。尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。

	 <li>&nbsp;</li>
	 <li>
	  <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=askPrice&amp;username=<%=rs("username")%>&amp;title=<%=server.urlEncode(rs("title"))%>&amp;unit=<%=server.urlEncode(rs("unit"))%>');">点此询价</a></li><li class="linkR">&nbsp;</li></ul>
	 </li>
	 <li class="clear">&nbsp;</li>
	 <li>所在地区：<%=anysale.nav("area",rs("areaID"),3,"")%></li>
	 <li>发布时间：<%=anysale.formatDate(rs("addtime"),5)%></li>
	 <li>&nbsp;</li>
	 <li class="f12">
	  <img src="images/iStar.gif" alt="收藏" width="13" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=favorite&amp;groups=2&amp;title=<%=server.urlEncode(rs("title"))%>&amp;link=<%=server.urlEncode("companydetail.asp?u="&username&"&amp;action=productsdetail&amp;ID="&ID)%>');">收藏此信息</a>&nbsp;&nbsp;&nbsp;
	  <img src="images/iMail.gif" alt="推荐" width="13" height="13" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=email&amp;title=<%=server.urlEncode(rs("title"))%>&amp;detail=<%=server.urlEncode("老朋友好久不见，我是“"&anysale.nickname&"”. 我在 "&anysale.asInfo(1)&" 上发现一产品,也许你会感兴趣，看一下？ 详细信息请参看："&anysale.asInfo(1)&"companydetail.asp?u="&username&"&amp;action=productsdetail&amp;ID="&ID)%>');">推荐给朋友</a>&nbsp;&nbsp;&nbsp;
	  <img src="images/iNote.gif" alt="举报" width="12" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=message&amp;username=admin&amp;title=<%=server.urlEncode("举报："&rs("title"))%>&amp;detail=<%=server.urlEncode(anysale.asInfo(1)&"companydetail.asp?u="&username&"&amp;action=productsdetail&amp;ID="&ID)%>');">举报此信息</a>
	 </li>
	</ul>
	<!--parameter.end-->
   </div>

   <div class="detail" style="width:560px;overflow:hidden;word-wrap:break-word;word-break:normal;">
   <!--detail-->
    <div class="xline clear">&nbsp;</div>
   <br />
	<%=anysale.chkBadWords(rs("detail"))%>
   <!--detail.end-->
   </div>

   <!--content.end-->
  </div>
  
 </div>
 <!--right.end-->
 </div>
 <!--bodyer.end-->
</div>
<%
	end if
	rs.close
	set rs=nothing
end sub

'job
sub job()
	call header("job","人才招聘 - "&company,business(6),anysale.asInfo(4))
%>
<div class="bodyer">
 <!--content-->
 <%call lefter()%> 
 <div style="float:left;width:702px;">
 <!--right-->
 <div class="tab" style="width:700px;">
  <%
  dim rs,sql,page,npage,ipage
  sql="select jobID,title,number,areaID,addtime from as_job where username='"&username&"'"
  if request("keywords")<>"" then
	sql=sql+" and title like '%"&anysale.checkStr(trim(request("keywords")))&"%'"
	search=search+"&amp;keywords="&request("keywords")
  end if
  sql=sql+" and islock=0 order by jobID desc"
  %>
  <div class="tabList">
   <div><ul class="tabH"><li class="tabL">&nbsp;</li><li class="tabM">人才招聘</li><li class="tabR">&nbsp;</li></ul></div>
  </div>  
  <div style="padding:20px;">
   <ul class="line30">
	<%
	page = clng(request("page"))
	if page="" or page<1 then page=1 end if

	set rs= Server.CreateObject("ADODB.Recordset")
	rs.open sql,conn,1

	if not rs.eof then
		rs.pageSize = 20
		if page>rs.pageCount then page=rs.pageCount end if
		rs.absolutePage = page
		npage=rs.pageCount
		for ipage = 1 to rs.pageSize
	%>
	<li class="borderB"><span class="f12 right">[<%=anysale.formatDate(rs("addtime"),1)%>]</span>· [<%=anysale.nav("area",rs("areaID"),3,"")%>] <a href="companydetail.asp?id=<%=rs("jobID")%>&amp;action=jobdetail&amp;u=<%=username%>"><%=rs("title")%></a> (<span class="red"><%=rs("number")%></span> 人)</li>
	<%
			rs.moveNext
			if rs.eof then exit for end if
		next
	%>
    <li>&nbsp;</li>
	<li><span class="right f14">共有<%=rs.recordcount%>条招聘&nbsp;<%=anysale.pagelink(page,npage,"companydetail.asp?","&amp;action=job&amp;"&search)%></span></li>
	<%
	else
		response.write "<ul class=""line10""><li></li></ul><ul><li>&nbsp;&nbsp;暂无相关招聘!</li></ul>"
	end if
	rs.close
	set rs=nothing
	%>
   </ul>
  </div>
  
 </div>
 <!--right.end-->
 </div>
 <!--content.end-->
</div>
<%
end sub

sub jobdetail()
	dim ID,rs,rsJob,n
	if request("ID")="" or not isnumeric(request("ID")) then
		call anysale.asNote("访问出错","参数不正确,请返回重新访问!")
	else
		ID=request("ID")
	end if
	set rs=conn.execute("select * from as_job where jobID="&ID)
	if rs.eof or rs.bof then
		call anysale.asNote("访问出错","参数不正确,请返回重新访问!")
	else
		conn.execute("update as_job set views=views+1 where jobID="&ID)
	
		call header("job",rs("title") &" - 人才招聘 - "&company,rs("title")&","&rs("tags"),anysale.cutStr(anysale.clearHTML(rs("detail")),100))
%>
<div class="bodyer">
 <!--content-->
 <%call lefter()%> 
 <div style="float:left;width:702px;">
 <!--right-->
 <div class="tab" style="width:700px;">
  <div class="tabList">
   <ul><li class="line30">&nbsp;&nbsp;<strong>您的位置:</strong>&nbsp;<a href="companydetail.asp?u=<%=username%>">首页</a>&raquo;<a href="companydetail.asp?u=<%=username%>&amp;action=job">人才招聘</a>&raquo;<%=rs("title")%></li></ul>
  </div>
  <div style="padding:20px;">

   <div class="left" style="width:350px;margin:0 25px 0 0;">
    <!--parameter-->
    <h1><%=rs("title")%></h1>
	<ul>
	 <li>&nbsp;</li>
	 <li>招聘人数：<span class="red"><%=rs("number")%></span> 人</li>
	 <li>工作地点：<%=anysale.nav("area",rs("areaID"),3,"")%></li>
	 <li>学历要求：<%=rs("education")%></li>
	 <li>工作经验：<%=rs("experience")%></li>
	 <li>薪资水平：<%=rs("salary")%></li>
	 <li>&nbsp;</li>
	 <li>
	  <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=resume&amp;jobID=<%=rs("jobID")%>&amp;incept=<%=rs("username")%>&amp;title=<%=server.urlEncode(rs("title"))%>&amp;company=<%=server.urlEncode(anysale.getValue("as_user","title","userID="&rs("userID")))%>');">立即申请</a></li><li class="linkR">&nbsp;</li></ul>
	 </li>
	 <li class="clear">&nbsp;</li>
	 <li>发布时间：<%=anysale.formatDate(rs("addtime"),5)%></li>
	 <li>有效期至：<%=anysale.formatDate(rs("endtime"),5)%></li>
	 <li>&nbsp;</li>
	 <li class="f12">
	  <img src="images/iStar.gif" alt="收藏" width="13" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=favorite&amp;groups=4&amp;title=<%=server.urlEncode(rs("title"))%>&amp;link=<%=server.urlEncode("companydetail.asp?u="&username&"&amp;action=jobdetail&amp;ID="&ID)%>');">收藏此信息</a>&nbsp;&nbsp;&nbsp;
	  <img src="images/iMail.gif" alt="推荐" width="13" height="13" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=email&amp;title=<%=server.urlEncode(rs("title"))%>&amp;detail=<%=server.urlEncode("老朋友好久不见，我是“"&anysale.nickname&"”. 我在 "&anysale.asInfo(1)&" 上发现一招聘,也许你会感兴趣，看一下？ 详细信息请参看："&anysale.asInfo(1)&"companydetail.asp?u="&username&"&amp;action=jobdetail&amp;ID="&ID)%>');">推荐给朋友</a>&nbsp;&nbsp;&nbsp;
	  <img src="images/iNote.gif" alt="举报" width="12" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=message&amp;username=admin&amp;title=<%=server.urlEncode("举报："&rs("title"))%>&amp;detail=<%=server.urlEncode(anysale.asInfo(1)&"companydetail.asp?u="&username&"&amp;action=jobdetail&amp;ID="&ID)%>');">举报此信息</a>
	</ul>
	<!--parameter.end-->
   </div>
   
   <div class="left" style="width:280px;height:300px;">
    <!--other-->
	<ul>
	 <li>&nbsp;</li>
	 <li>&nbsp;</li>
	 <li>
	  <ul style="padding:0 0 0 25px;height:260px;border-left: 1px solid #b9cfec;">
	   <li><h2>其它职位招聘</h2></li>
	   <li>&nbsp;</li>
       <%
	   set rsJob=conn.execute("select top 10 jobID,title from as_job where userID="&rs("userID")&" and islock=0 order by jobID desc")
       if not rsJob.eof or not rsJob.bof then
	   n=1
	   do while not rsJob.eof and n<=9
       %><li><a href="companydetail.asp?u=<%=username%>&amp;action=jobdetail&amp;ID=<%=rsJob(0)%>"><%=rsJob(1)%></a></li>
       <%
	   rsJob.movenext
	   n=n+1
	   loop
	   end if
	   rsJob.close
	   set rsJob=nothing
       %>
	   <li>&nbsp;</li>
	  </ul>
	 </li>
	</ul>
	<!--other.end-->
   </div>
   
   <div class="detail" style="width:560px;overflow:hidden;word-wrap:break-word;word-break:normal;">
   <!--detail-->
    <div class="xline clear">&nbsp;</div>
   <br />
	<%=anysale.chkBadWords(rs("detail"))%>
   <!--detail.end-->
   </div>

  </div>
 </div>
 <!--right.end-->
 </div>
 <!--content.end-->
</div>
<%
	end if
	rs.close
	set rs=nothing
end sub

'message
sub message()
	call header("message","留言反馈 - "&company,business(6),anysale.asInfo(4))
%>
<div class="bodyer">
 <!--content-->
 <%call lefter()%> 
 <div style="float:left;width:702px;">
 <!--right-->
 <div class="tab" style="width:700px;">
  <div class="tabList">
   <div><ul class="tabH"><li class="tabL">&nbsp;</li><li class="tabM">留言反馈</li><li class="tabR">&nbsp;</li></ul></div>
  </div>
  <form name="msgForm" id="msgForm" method="post">
  <div style="padding:20px;" id="saveComment">
   <ul><li>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;欢迎光临，希望您留下电话、邮箱等联系方式，以便于我们与您进一步沟通。如需紧急回复，请<a class="links" href="companydetail.asp?u=<%=username%>&amp;action=contact">联系我们</a>相关人员进行处理，谢谢。</li>
   </ul>
   <ul><li>&nbsp;</li></ul>
   <ul><li class="name txtRig"><span class="red">*</span> 标题：</li><li><input type="text" name="title" id="msgTitle" style="width:500px;" onblur="check('标题',this.value,'msgNote',0,0,1,250)" /></li></ul>
   <ul><li class="line5">&nbsp;</li></ul>
   <ul><li class="name txtRig"><span class="red">*</span> 内容：</li><li><textarea name="detail" id="msgDetail" style="width:502px;" rows="13" onblur="check('内容',this.value,'msgNote',0,0,1)"></textarea></li></ul>
   <ul><li class="line10">&nbsp;</li></ul>
   <ul><li class="name txtRig">&nbsp;</li><li><span id="msgNote">&nbsp;</span></li></ul>
   <ul><li class="line10">&nbsp;</li></ul>
   <ul>
	<li><span style="padding:0 42px 0 0;" class="right">
     <input type="button" name="button" value="发送留言" 
	 onclick="if(
	 check('标题',$('msgTitle').value,'msgNote',0,0,1,200) &&
	 check('内容',$('msgDetail').value,'msgNote',0,0,1)
	 ){getPage('windows.asp?action=sendMessage','msgNote',1,'msgForm');};" 
	 class="button" onmouseover="this.className='buttonH'" onmouseout="this.className='button'" />
	 <input type="hidden" name="friend" value="<%=username%>" />
	</span></li>
   </ul>
   <ul><li>&nbsp;</li></ul>
  </div>
  </form>
 </div> <!--right.end-->
 </div>
 <!--content.end-->
</div>
<%
end sub

'bbs
sub bbs()
	call header("bbs","论坛文章 - "&company,business(6),anysale.asInfo(4))
%>
<div class="bodyer">
 <!--content-->
 <%call lefter()%> 
 <div style="float:left;width:702px;">
 <!--right-->
 <div class="tab" style="width:700px;">
  <%
  dim rs,sql,page,npage,ipage
  sql="select bbsID,front,title,child,views,addtime from as_bbslist where username='"&username&"'"
  if request("keywords")<>"" then
	sql=sql+" and title like '%"&anysale.checkStr(trim(request("keywords")))&"%'"
	search=search+"&amp;keywords="&request("keywords")
  end if
  sql=sql+" and islock=0 order by bbsID desc"
  %>
  <div class="tabList">
   <div><ul class="tabH"><li class="tabL">&nbsp;</li><li class="tabM">论坛文章</li><li class="tabR">&nbsp;</li></ul></div>
  </div>  
  <div style="padding:20px;">
   <ul class="line30">
	<%
	page = clng(request("page"))
	if page="" or page<1 then page=1 end if

	set rs= Server.CreateObject("ADODB.Recordset")
	rs.open sql,conn,1

	if not rs.eof then
		rs.pageSize = 15
		if page>rs.pageCount then page=rs.pageCount end if
		rs.absolutePage = page
		npage=rs.pageCount
		for ipage = 1 to rs.pageSize
	%>
	<li class="borderB"><span class="f12 right">[<%=anysale.formatDate(rs("addtime"),1)%>]</span>· <%=rs("front")%> <a href="companydetail.asp?id=<%=rs("bbsID")%>&amp;action=bbsdetail&amp;u=<%=username%>"><%=rs("title")%></a> <span class="f12">(人气：<%=rs("views")%> 回复：<span class="red"><%=rs("child")%></span>)</span></li>
	<%
			rs.moveNext
			if rs.eof then exit for end if