| Lend
A Hand
|
| This is
a list of local charities, churches, and volunteer organizations that
are in need of help. Their needs range from materials and labor to
consulting services. Some may be able to pay a reduced fee. If you
or your Company would like to help others and be involved with your
community look here for people and organizations that need your assistance.We
will highlight certain projects and charities.
|
|
See our Current Highlighted
Organization Youth Build.
Do you have a church
to build? A neighborhood park? A School? Get a door fixed? Whatever your
Construction needs are, you can post
them here. It's FREE ! Let our web of building professionals
know what you need and how they can get involved in their communities.
If you have a charitable project you would like us to highlight, E-mail
us with the details; BuildersPlanet.com can get you in touch with those
that can make your project a reality.
We can also post
Individual pages to promote you Organization.
Click here to find out more.
| 
|
|
|
Post
Lend a Hand Request FREE!
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 the update links or to make an update.
| |
Group Type |
Group Name |
Project Description |
Specific Needs |
Time Frame |
Location |
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 vQryRec_id, vGroupT, vGroupN, vProjDesc, vNeeds, vTimeFr, vContact
dim vPostTm, vToWeb, vToList, vToPriv, vName, vLocat, vCreateDt
dim vSuccess, vUpdateBut, vNoRecords
vLoginName = Session("login_name")
vLogin_id = Session("login_id")
' visit to page - get info from db
set vRec = conn.Execute (" select * from lhand 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)
vQryRec_id = vRec("lhand_id")
vGroupT = vRec("grp_type")
vGroupN = left(vRec("grp_name"),30)
vProjDesc = left(vRec("proj_descr"),30)
vNeeds = left(vRec("needs"),20)
if(vNeeds = "")then
vNeeds = " "
end if
vTimeFr = left(vRec("time_frm"),15)
vName = vRec("ad_name")
if(vName = "")then
vName = " "
end if
vContact = vRec("contact_inf")
vLocat = left(vRec("location"),20)
if(vLocat = "")then
vLocat = " "
end if
vCreateDt = left(vRec("created"),4)
vUpdateBut=" "
if (vLogin_id = vRec("login_id"))then
vUpdateBut = "(update)"
end if
vColor= vColors(vLoopCounter and 1)
%>
|
<%=vGroupN%> |
<%=vGroupT%> |
<%=vProjDesc%> |
<%=vNeeds%> |
<%=vTimeFr%> |
<%=vLocat%> |
<%=vCreateDt%> |
<%=vUpdateBut%> |
<%
vLoopCounter = vLoopCounter + 1 ' keep count
vRec.movenext
loop
%>
| <%=vNoRecords%> |
|
Legal
notice: BuildersPlanet.com reserves the right to not allow any posting
for any reason. BuildersPlanet.com is NOT responsible for the content
submitted or any errors in any posting. A posting does not constitute
an endorsement or assurance of accuracy for any posting by BuildersPlanet.com.You
agree to terms above and you agree to indemnify and hold BuildersPlanet.com
harmless for any claim or damages arising from the use of this form and/or
content of materials submitted to BuildersPlanet.com Website. By using
this site you accept our terms and
privacy policy. For comments or problems email Webmaster@buildersplanet.com
|
|
|
|
