<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="Connections/RP_DB.asp" -->
<%
rp_name = Request.Form("Partner_Name")
rp_rel = Request.Form("Relationship")
rp_ind = Request.Form("Industry")
rp_mgr = Request.Form("Partner_Manager")
rp_ter = Request.Form("Territory")
 
Dim results1
Dim results1_cmd
Dim results1_numRows
 
Set results1_cmd = Server.CreateObject ("ADODB.Command")
results1_cmd.ActiveConnection = MM_RP_DB_STRING
results1_cmd.CommandText = "SELECT Partner_company, Terr_Name, partnerManager_name, relationship_name, industry_name FROM RP_Search_results" 
results1_cmd.Prepared = true
 
Set results1 = results1_cmd.Execute
results1_numRows = 0
%>
<% 
======>	IF rp_name <> "" THEN results1 = results1 &_ <=====
		" WHERE Partner_company = '" & rp_name & "'"
	IF rp_mgr <> "" AND rp_name = "" THEN results1 = results1 &_
		" WHERE partnerManager_name = '" & rp_mgr & "'"
	IF rp_mgr <> "" AND rp_name <> "" THEN results1 = results1 &_
		" AND partnerManager_name = '" & rp_mgr & "'"
	IF rp_ter <> "" AND (rp_mgr = "" AND rp_name = "") THEN results1 = results1 &_
		" WHERE Terr_Name = '" & rp_ter & "'"
	IF rp_ter <> "" AND (rp_mgr <> "" OR rp_name <> "") THEN results1 = results1 &_
		" AND Terr_Name = '" & rp_ter & "'"
	IF rp_rel <> "" AND (rp_mgr = "" AND rp_name = "" AND rp_ter = "" ) THEN results1 = results1 &_
		" WHERE relationship_name = '" & rp_rel & "'"
	IF rp_rel <> "" AND (rp_mgr <> "" OR rp_name <> "" OR rp_ter <> "") THEN results1 = results1 &_
		" AND relationship_name = '" & rp_rel & "'"
	IF rp_ind <> "" AND (rp_mgr = "" AND rp_name = "" AND rp_ter = "" AND rp_rel = "" ) THEN results1 = results1 &_
		" WHERE industry_name = '" & rp_ind & "'"
	IF rp_ind <> "" AND (rp_mgr <> "" OR rp_name <> "" OR rp_ter <> "" OR rp_rel <> "") THEN results1 = results1 &_
		" AND industry_name = '" & rp_ind & "'"
response.Write(results1)
response.End(results1)
%>