테스트 사이트 - 개발 중인 베타 버전입니다

검색조건 규격 검색이 잘않됩니다 도와주세요

· 17년 전 · 1349 · 1
사이트는 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">&nbsp;&nbsp;<%=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
%>

.........하단생략...............

댓글 작성

댓글을 작성하시려면 로그인이 필요합니다.

로그인하기

댓글 1개

17년 전
직접 디비에 접속하셔서
query를 실행해 보세요.

게시글 목록

번호 제목
633
632
629
623
621
618
616
614
600
594
590
568
557
556
553
550
548
545
543
540
535
531
530
527
523
520
519
517
515
512