% set rscity=server.CreateObject("adodb.recordset") set rsindustry=server.CreateObject("adodb.recordset") set rsfunction=server.CreateObject("adodb.recordset") rscity.open "select distinct(id),city from citymst order by city",db,adopenstatic rsindustry.open "select distinct(id),industry from industrymst order by industry",db,adopenstatic rsfunction.open "select distinct(id),functionalarea from functionalarea order by functionalarea",db,adopenstatic %> <% skills=trim(request.form("txtskills")) industry=trim(request.form("cboindustry")) city=trim(request.form("cboprefcity")) functional=trim(request.form("cbofunctional")) if trim(skills)<>"" then skills=trim(replace(skills,",","','")) skills="'" & replace(skills," ","") & "'" end if set rs=server.CreateObject("adodb.recordset") myStr="select distinct(a.projectid),a.prjtitle,a.designation,a.workexp, a.dated from projects a" if trim(skills)<>"" then myStr=myStr & ", projectkeywords b" end if if trim(city)<>"" then myStr=myStr & ", projectlocation c" end if if trim(functional)<>"" then myStr=myStr & ", projectfunctionalarea d" end if myStr=myStr & " where " if trim(skills)<>"" then myStr=myStr & "b.keyword in(" & skills & ") and " end if if trim(industry)<>"" then myStr=myStr & "a.industry=" & trim(industry) & " and " end if if trim(city)<>"" then myStr=myStr & "c.location=" & trim(city) & " and " end if if trim(functional)<>"" then myStr=myStr & "d.functionalarea=" & trim(functional) & " and " end if if trim(skills)<>"" then myStr=myStr & "a.projectid=b.projectid and " end if if trim(city)<>"" then myStr=myStr & "a.projectid=c.projectid and " end if if trim(functional)<>"" then myStr=myStr & "a.projectid=d.projectid" end if myStr=trim(myStr) if right(myStr,3)="and" then myStr=left(myStr,len(myStr)-3) end if myStr=myStr & " and a.status='O' order by a.dated desc" rs.open myStr,db,adopenstatic 'response.write myStr %>
![]() |
|
|
Vice President – Human Resources Company Profile Role and Responsibility
Principle Accountabilities
Qualifications
|
|