<% strCurrMenu=GetVariable("mnid") '???D????D?????????????? showAddress=GetKey("Address",WebUserID,"job_" & strCurrMenu ) showCount=GetKey("Count",WebUserID,"job_" & strCurrMenu ) showExpires=GetKey("Expires",WebUserID,"job_" & strCurrMenu ) showPay=GetKey("Pay",WebUserID,"job_" & strCurrMenu ) showDetail=GetKey("Detail",WebUserID,"job_" & strCurrMenu ) strSQL="Select * From web_job Where id=" & GetVariable("id") Set rs=Server.CreateObject("ADODB.RecordSet") rs.open strSQL,conn,1,1 %> %>
"
 
   
Title Contents
 
  <%=request.QueryString("classname")%>a
 
 
<%=trim(rs("j_title"))%>
<% if showExpires<>"none" then%> Time Limit: <%=trim(rs("j_expires"))%>
<%end if%> <% if showAddress<>"none" then%> Address: <%=trim(rs("j_addr"))%>
<%end if%> <% if showCount<>"none" then%> Amount: <%=trim(rs("j_count"))%>
<%end if%> <% if showPay<>"none" then%> Salary: <%=trim(rs("j_pay"))%> <%end if%>
<%=trim(rs("j_detail"))%>
Promulgate time:<%=trim(rs("j_create"))%>

 
<% '?a??3?? strSQL="Select top 8 id,j_title From web_job Where mn_id=" & strCurrMenu & " " & strQuery & " Order by j_create Desc" Set rsClass=Server.CreateObject("ADODB.RecordSet") rsClass.open strSQL,conn,1,1 ClassCount=rsClass.recordcount if ClassCount<=0 then response.Write("Cant Not Found.") for i=1 to ClassCount %> <% rsClass.movenext next %>
  • &classname=<%=request.QueryString("classname")%>"><%=trim(rsClass("j_title"))%>
     
    Add:Suite 5F, 988 Changning Road Shanghai, China 200051
    Phone: (86-21) 5273 8396 Fax: (86-21) 5273 8395
    Copyright?2006-2007 EASEN INTERNATIONAL CO.,LTD. All Rights Reserved.
    Last updated on: