<%@ Language=VBScript %> <%Option Explicit%> <% Response.Buffer = true %> <% dim vLogin_id %> BuildersPlanet.com WorkForce Hotlist Record Details <% 'put this on pages that require log in vLogin_id = ForceLogin( Request.Cookies("BPLN")("Scrbl") ) %>
 HOME  >  Job Bank >  Work Force  >  Work Force Details ','instantmessage','width=375,height=400')>Instant Feedback

Work Force HotList Record Details
This is the record Detail you requested

These Professionals have opening in their schedules.

Are you a construction professional with a schedule opening ?
Post Work Force Hotlist
Go to Ready to Work if your looking for a position or longer term projects.
Post an Employment Ad Click here.

You can update or delete an existing listing by pressing the update link next to a listing.
You must be logged in to see the update links or to make an update.
    Close this window <% ' connect to the database dim conn ' hold the connect to the database dim vSQL ' holds the sql statement to execute dim vRec ' holds the record from query. set conn = server.CreateObject("adodb.connection") conn.Open Application("DBName"),Application("DBUser"),Application("DBPswd") ' set field vars dim vHotLbr_id, vCompName, vAvailLoc, vWrkType, vSpclty, vStatus, vContact dim vRemovePost, vRemovePostW, vRPostBox dim vPostTm, vToWeb, vToList,vToPriv, vName, vCreateDt, qRecId, vOrigin dim vSuccess, vOk_todistr, vNoFeat, vUpdateBut vLogin_id = Session("login_id") vHotLbr_id = Request.QueryString("qRecId") ' visit to page - get expandedinfo from db that relates to Record id vSQL = "select * from hotlbrprj where hotlbr_id =" & vHotLbr_id set vRec = conn.Execute (vSQL) if( Not vRec.Eof)then 'if( not vRec.EOF ) then vHotLbr_id = vRec("hotlbr_id") vStatus = vRec("status") vWrkType = vRec("wrk_type") vAvailLoc = vRec("location") vCompName = vRec("comp_name") vSpclty = vRec("spclty") vSpclty = replace(vSpclty,vbCRLF,"
") vName = vRec("ad_name") vContact = vRec("contact_inf") vContact = replace(vContact,vbCRLF,"
") vPostTm = vRec("post_time") vToWeb = vRec("to_web") vToList = vRec("to_list") vToPriv = vRec("to_priv") vCreateDt = left(vRec("created"),8) vUpdateBut=" " if (vLogin_id = vRec("login_id"))then vUpdateBut = "(update)" end if end if %>
Work Force HotList <%=vUpdateBut%>
Company Name:  <%=vCompName%>
Available Locations:  <%=vAvailLoc%>
Type of Work:  <%=vWrkType%>
Specialties:  <%=vSpclty%>
Availability Schedule:  <%=vStatus%>
Contact Name:  <%=vName%>
Contact Info:  <%=vContact%>
Date Posted:  <%=vCreateDt%>
   

Close this window