검색조건 규격 검색이 잘않됩니다 도와주세요 정보
검색조건 규격 검색이 잘않됩니다 도와주세요
본문
사이트는 swj.co.kr 입니다
검색에 규격으로 검색하면 찾아내지못합니다
어떨때는 또 찾아내기도 합니다
아래 소스에 문제가 없을듯한데 어느 부분을 손을 데야 할지 .......도와주세요
..................상단생략.......................
<%
sel_sch = request("sel_sch")
sel_sch2 = request("sel_sch2")
sel_comp_code = request("comp_code")
'이전페이지 , 다음페이지....
'이 부분은 밑에 처리되었다...
'하이퍼링크로 이전페이지 다음페이지 한 부분에 가보면 있다...
session("CurrentPage") = 1
'이 부분은 페이지로 직접 접근하는 부분이다.
If Request.QueryString("GoTopage") <> "" then
session("CurrentPage") = Request.QueryString("GoTopage")
else
end If
If sel_sch2 = "" Then '검색어가 없다면
If sel_sch = "no1" Then '상품명으로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
else '규격코드로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
end if
else '정상적인 검색이라면
If sel_sch = "no1" Then '상품명으로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
else '규격코드로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
end if
end If
Set Grs = Server.CreateObject("ADODB.Recordset")
Grs.pagesize = 30
Grs.Open SQL,objconn,1
TotCount_search = Grs.RecordCount
if Grs.BOF or Grs.EOF Then
%>
<script language='javascript'>
alert('검색에 부합하는 상품이 없습니다.')
history.back();
</script>
<%
response.end
else
sql_f = "select comp_code,comp_name from company where comp_code = '" & Grs("pr_comp") & "'"
set rs_com_f = objConn.Execute (sql_f)
End if
%>
<tr>
<td width="689" align="left" valign="middle" height="31"> <p style='margin-left:30px; margin-right:5px;'> <font color="#495766"> <%=rs_com_f("comp_name")%> 회사에 대해 검색어 : <b><%=sel_sch2%></b>
(총 <%=TotCount_search%> 개의 항목을 검색했습니다)</font>
</p></td>
</tr>
<tr>
<td width="689" align="center" valign="top">
<table border="0" width="560" align=center cellspacing='0' cellpadding='0'>
<tr>
<td align='center' valign='top'>
<img src='/swshop/images/sub_05.gif' border='0' align='absmiddle'>
</tD>
</tR>
</table>
<!-- 탑 부분 인클루드 종료 -->
<table border="0" width="650" align=center cellspacing='0' cellpadding='0'>
<!-- 제품리스트 시작 -->
<tr>
<td width="689" align="center" valign="top">
<%
if Grs.BOF or Grs.EOF then
%>
<br><br>
검색된 상품이 없습니다.<br>
<br><br>
<%
response.End
else
Grs.absolutepage = session("CurrentPage")
session("pagecount")=Grs.pagecount
%>
.........하단생략...............
검색에 규격으로 검색하면 찾아내지못합니다
어떨때는 또 찾아내기도 합니다
아래 소스에 문제가 없을듯한데 어느 부분을 손을 데야 할지 .......도와주세요
..................상단생략.......................
<%
sel_sch = request("sel_sch")
sel_sch2 = request("sel_sch2")
sel_comp_code = request("comp_code")
'이전페이지 , 다음페이지....
'이 부분은 밑에 처리되었다...
'하이퍼링크로 이전페이지 다음페이지 한 부분에 가보면 있다...
session("CurrentPage") = 1
'이 부분은 페이지로 직접 접근하는 부분이다.
If Request.QueryString("GoTopage") <> "" then
session("CurrentPage") = Request.QueryString("GoTopage")
else
end If
If sel_sch2 = "" Then '검색어가 없다면
If sel_sch = "no1" Then '상품명으로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
else '규격코드로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
end if
else '정상적인 검색이라면
If sel_sch = "no1" Then '상품명으로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_vol like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
else '규격코드로 검색한거라면
If sel_comp_code = "" Then '회사코드가없으면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' order by pr_code"
else '회사코드도 포함이라면
SQL = "select * from product where pr_name like '%" & sel_sch2 & "%' and chulryuk='y' and pr_comp like '%" & sel_comp_code & "%' order by pr_code"
end if
end if
end If
Set Grs = Server.CreateObject("ADODB.Recordset")
Grs.pagesize = 30
Grs.Open SQL,objconn,1
TotCount_search = Grs.RecordCount
if Grs.BOF or Grs.EOF Then
%>
<script language='javascript'>
alert('검색에 부합하는 상품이 없습니다.')
history.back();
</script>
<%
response.end
else
sql_f = "select comp_code,comp_name from company where comp_code = '" & Grs("pr_comp") & "'"
set rs_com_f = objConn.Execute (sql_f)
End if
%>
<tr>
<td width="689" align="left" valign="middle" height="31"> <p style='margin-left:30px; margin-right:5px;'> <font color="#495766"> <%=rs_com_f("comp_name")%> 회사에 대해 검색어 : <b><%=sel_sch2%></b>
(총 <%=TotCount_search%> 개의 항목을 검색했습니다)</font>
</p></td>
</tr>
<tr>
<td width="689" align="center" valign="top">
<table border="0" width="560" align=center cellspacing='0' cellpadding='0'>
<tr>
<td align='center' valign='top'>
<img src='/swshop/images/sub_05.gif' border='0' align='absmiddle'>
</tD>
</tR>
</table>
<!-- 탑 부분 인클루드 종료 -->
<table border="0" width="650" align=center cellspacing='0' cellpadding='0'>
<!-- 제품리스트 시작 -->
<tr>
<td width="689" align="center" valign="top">
<%
if Grs.BOF or Grs.EOF then
%>
<br><br>
검색된 상품이 없습니다.<br>
<br><br>
<%
response.End
else
Grs.absolutepage = session("CurrentPage")
session("pagecount")=Grs.pagecount
%>
.........하단생략...............
댓글 전체
직접 디비에 접속하셔서
query를 실행해 보세요.
query를 실행해 보세요.