<!--#include file="Inc/Conn.asp"-->
<!--#include file="Inc/eshopcode.asp"-->
<!--#include file="Inc/Code.asp"-->
<!--#include file="Head.asp"-->
<%
Set rs=Server.CreateObject("ADODB.RecordSet") 
Sql = "Select [Job_Plan] From [Main] "
rs.Open Sql,conn,1,1
Dim PlHtml
PlHtml = application("JaPlan")
PlHtml = Replace(PlHtml,"{用户登陆}",UserLogin())
PlHtml=replace(PlHtml,"{新闻信息}",TopNews("News_ID"))
PlHtml = Replace(PlHtml,"{用户搜索}",FindProd())
PlHtml = Replace(PlHtml,"{用户投票}",ShowVote())
PlHtml = Replace(PlHtml,"{人才内容}",UBBCode(rs("Job_Plan")))
Response.Write PlHtml
rs.Close
Set rs=Nothing
%>
<!--#Include File="bottom.Asp"-->
