사이트는 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
%>
.........하단생략...............
게시글 목록
| 번호 | 제목 |
|---|---|
| 407 |
개발자
가입처리 추가 문의입니다.
|
| 406 |
개발자
메일보내기~도와주세요~
|
| 403 | |
| 400 |
개발자
프로그램 질문이요!!!
2
|
| 397 | |
| 394 | |
| 391 |
개발자
디비값 저장하기.
2
|
| 388 | |
| 386 | |
| 384 | |
| 379 | |
| 378 | |
| 375 | |
| 373 | |
| 365 | |
| 363 |
디자이너
플래시 링크 걸기 질문???
1
|
| 361 | |
| 358 | |
| 353 | |
| 349 | |
| 347 | |
| 341 |
디자이너
문자디자인 질문입니다.
5
|
| 337 |
개발자
사이트 가입시 로그인 방법
3
|
| 328 | |
| 321 | |
| 317 | |
| 314 |
개발자
프로그램 제작 의뢰
2
|
| 312 |
개발자
플래시버튼.
1
|
| 310 | |
| 309 |
개발자
플래시관련.
|
댓글 작성
댓글을 작성하시려면 로그인이 필요합니다.
로그인하기