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

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

· 17년 전 · 1030 · 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를 실행해 보세요.

게시글 목록

번호 제목
12828
254
252
25062
29368
249
243
239
236
234
12821
12818
12815
12811
12807
12797
12787
12781
12780
232
12779
12776
12768
12767
229
12764
226
12762
12758
12757
12755
223
221
12746
219
212
12745
210
206
29366
205
12743
203
29364
201
12742
29361
12740
199
198
196
12738
12735
12732
195
194
12731
191
188
185
182
179
25053
25052
12729
25050
176
174
172
171
168
166
12724
12715
164
12712
12702
159
12697
29360
12696
155
12694
12692
12689
12687
12685
12683
12679
12678
12676
151
12669
148
146
144
143
29356
12662
12655