Small
Projects
Remodels,
Small commercial, Repairs , Etc.
You can also Check Large Projects.
Post
your Current project here and find the contractors you need to
get the job done. It's FREE . Post
individual pages to promote you project and explain more details.
For ongoing projects, post a a continuos page so the subcontractors
you work with will be aware of current projects.
Are
you a subcontractor who needs to fill a time slot, or have
had a job fall through ?
Check
or Hotlist Project section.
Post to Work Force Hotlist
Ready to Work for
longer term projects.
The following
are Small Projects out to Bid. Post
a Small Project.
Press the 
button to see more details and Contact information
You can update or
delete an existing listing by pressing the update link next to a listing.
You must be logged in to see details, see the update links or to make
an update.
| |
Project Name |
Project
Location |
Project
Budget
|
Project
Discription |
Project
Status |
Close
Date |
Post
Date |
|
<%
' 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 vSmlProj_id, vProjName, vProjLoc, vProjBudg, vProjDescr, vStatus, vContact
dim vName, vClsDt, vCreateDt, CUTTHIS
dim vSuccess, vUpdateBut, vNoRecords, vGoBut
vLoginName = Session("login_name")
vLogin_id = Session("login_id")
' visit to page - get info from db
set vRec = conn.Execute (" select * from smlprj where (verifyPost = 'checked') and (to_web = 'checked') and (ok_2Distrib = 'yes') and (spam_chck = 'False') order by created desc")
if( vRec.EOF ) then
vNoRecords = "Sorry but there are no records posted now. Check back again."
end if
dim vColors(2) ' the number of colors. must be even
vColors(0) = "#D7F1FF" ' color 1
vColors(1) = "" ' color 2
dim vLoopCounter, vColor
vLoopCounter = 0 ' count the loops
do while( Not vRec.Eof)
vSmlProj_id = vRec("smlproj_id")
vProjName = left(vRec("proj_name"),30)
if(vProjName = "")then
vProjName = " "
end if
vStatus = left(vRec("status"),30)
vProjBudg = left(vRec("proj_budget"),20)
vProjDescr = left(vRec("proj_descr"),30)
if(vProjDescr = "")then
vProjDescr = " "
end if
vProjLoc = left(vRec("location"),20)
vProjName = left(vRec("proj_name"),15)
if(vProjName = "")then
vProjName = " "
end if
vClsDt = left(vRec("close_dt"),20)
if(vClsDt = "")then
vClsDt = " "
end if
vCreateDt = left(vRec("created"),4)
vUpdateBut=" "
if (vLogin_id = vRec("login_id"))then
vUpdateBut = "(update)"
end if
vGoBut = ""
if(vLogin_id = 0)then
vGoBut =""
end if
vColor= vColors(vLoopCounter and 1)
%>
| <%=vGoBut%> |
<%=vProjName%> |
<%=vProjLoc%> |
<%=vProjBudg%> |
<%=vProjDescr%> |
<%=vStatus%> |
<%=vClsDt%> |
<%=vCreateDt%> |
<%=vUpdateBut%> |
<%
vLoopCounter = vLoopCounter + 1 ' keep count
vRec.movenext
loop
%>
| <%=vNoRecords%> |
|
