꿈속나라

당신에게로 떠나는 꿈속여행 - 꿈속나라(http://www.inyourdream.net)

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

수정하실때는 필수항목을 모두 입력하셔야 합니다.

이름 *	공지사항 비공개 HTML 사용
제목 *
내용 *	채영님 저두 채영님의 방명록 처럼 만들라고 채영님의 소스를 받아서 최대한 간단하게 해서 만들었는데요... 채영님은 게시판에서 서치후 페이징 할때 페이징을 일반적으로 다음 10개 이전 10개로 안하구 select 루 1/총페이지, 2/총페이지 이런식으로 다음페이지로 넘주잖아요...일반 list에서는 괜찮은데요.. search후 search 페이지를 보여주는건데요... 저는 search_result.asp를 따로 만들었는데요.. 에러가 떨어져서요... 이것좀 봐주실수 있나요? 줄 15 문자 3 doucment.list.searchString.value'은 null이거나 개체가 아닙니다. 이런식으로 나오거든요... 한번 봐주실수 있나요...ㅠ.ㅠ 부탁드립니다. search_result.asp <% search = request("search") SearchString = request("SearchString") Set db = Server.CreateObject("ADODB.Connection") db.open("DSN=bbs;UID=sa;PWD=dnflwlq") SQL = "select * from guest3 where " & search & " like '%" & SearchString & "%' " SQL = SQL & " order by a_idx desc " Set rs = Server.CreateObject("ADODB.Recordset") rs.open SQL,db,1 a_idx=rs("a_idx") searchname = search searchname = replace(searchname,"a_title","글제목") searchname = replace(searchname,"a_name","이름") searchname = replace(searchname,"a_content","글내용") ScrollAction=Request("ScrollAction") Stop_Flag=0 a_page = 5 rs.PageSize = a_page V_Total=rs.Recordcount if ScrollAction="" then Page_Count=1 V_Index=V_Total else Page_Count=ScrollAction V_Index=V_Total-(Page_Count*a_page)+a_page end if if Not rs.EOF then rs.AbsolutePage=Page_Count end if V_Page=Int(V_Total/a_page)+1 if (V_Total mod a_page)=0 then V_Page=V_Page-1 end if %> <html> <head> <title>사과띠 검색결과</title> <style type="text/css"> A {text-decoration:none;color:navy} A:hover {text-decoration:underline;color:orange} </style> <script language="JavaScript"> <!-- function changeboard() { var search=document.list.search.value; var searchString=document.list.searchString.value; var a_idx=document.list.a_idx.value; var ndx=document.list.ScrollAction.selectedIndex; var ScrollAction=document.list.ScrollAction.options [ndx].value; var newboard="search_result.asp?a_idx=a_idx"; newboard=newboard+"&ScrollAction="+ScrollAction; newboard=newboard+"&search="+search; newboard=newboard+"&searchString="+searchString; location.href=newboard; } //--> </script> </head> <body background="../guest3/img2/bg5.gif"> <div align="center"><center> <% if rs.BOF or rs.EOF then %> <p align="center"></p> <p align="center"></p> <p align="center"><font face="arial Rounded MT bold" size="5" color="#FF80000">NO result!! </font></p><p align="center"></p> <p align="center"><font face="돋움" size="2"><strong><%=search%>에서 <%=SearchString%></strong>로 검색을 수행하였지만</font></p> <p align="center"><font face="돋움" size="2"><font color="#008080">발견 된</font> <font color="#008080">검색결과가 없습니다.</font></font></p> <p align="center"></p> <p align="center"><font face="돋움" size="2"><font face="돋움" size="2"> <<a href="list.asp">list로 돌아가기</a>></font></p> <!-- 검색결과가 없을때 --> <% else %> <p align="center"><font face="Arial Rounded MT Bold" color="#008080"><big><big><strong> Search List</strong></big></big></font></p> <form method="POST" name="list" action="search_result.asp"> <div align="center"> <p align="center"><font face="돋움" size="2"><strong><%=searchname% ></strong>에서 <strong> <%=SearchString%></strong>로 검색한 결과<%=V_total%>개의 데이터를 찾았습니다. </font></p><div align="center"><center> <div align="center"> <table border="0" width="600" cellspacing="0" cellpadding="0"> <tr> <td align="right"> <% if V_Total>5 then%> <select name="ScrollAction" size="1" OnChange="changeboard();"> <% for i=1 to V_Page if i-Page_Count=0 then%> <option selected value="<%=i%>"> <%=i%> / <%=V_Page%> </option> <%else%> <option value="<%=i%>"> <%=i%> / <%=V_Page%> </option> <% end if next%> </select> <input type="hidden" name="a_idx" value="<%=a_idx%>"> <input type="hidden" name="search" value="<%=search%>"> <input type="hidden" name="searchStrig" value="<%=searchString% >"> <% end if %> </td> </tr> </table> </center></div> <% RowCount=rs.PageSize do while not rs.EOF and Rowcount > 0 %> <div align="center"> <table border="0" width="600" cellspacing="0" cellpadding="0"> <tr> <td align="left" width="40"><img src="../guest3/img2/left_up.gif"></td> <td valign="bottom"><img src="../guest3/img2/table.gif" width="520" height="5"></td> <td align="right" width="40"><img src="../guest3/img2/right_up.gif"></td> </tr> <tr> <td width="40" background="../guest3/img2/table_left.gif"> </td> <td><br><a href="delete.asp?a_idx=<%=rs("a_idx")%>"><img src="../guest3/img2/delete.gif" border="0"></a> <small><font color="#8b4513"><%=V_Index%>.<%=left(rs ("a_date"),10)%> <%=rs("a_time")%></font></small> <%if not rs("a_email")="" then%> <a href="mailto:<%=rs("a_email")%>"><img src="../guest3/img2/mail.gif" border="0"></a> <% end if if not rs("a_url")="http://" and not rs("a_url")="" then%> <a href="<%=rs("a_url")%>" target="new"><img src="../guest3/img2/home-1.gif" border="0"></a> <%end if%><br> <small><font color="#0000ff"><%=rs("a_name")%></font>님께 서 <font color="#ff0000"><%=rs("a_ip")%></font>에서 남기신 소중한 글입 니다.</small> <small><p style="line-height:140%"> <% a_contents = rs("a_contents") a_contents = replace(a_contents,chr(13)&chr(10),"<br>")%> <%=a_contents%></p></small><br></td> <td width="40" background="../guest3/img2/table_right- 1.gif"> </td> </tr> <tr> <td align="left" valign="top" width="40"><img src="../guest3/img2/left_down-1.gif"></td> <td valign="top"><img src="../guest3/img2/table-1.gif" width="520" height="5"></td> <td align="right" valign="top" width="40"><img src="../guest3/img2/right_down-1.gif"></td> </tr> </table> </center></div> <% RowCount=RowCount-1 V_Index=V_Index-1 rs.MoveNext loop if rs.EOF then Stop_Flag=1 end if end if %> </form> <div align="center"> <table border="0" width="600" cellspacing="0" cellpadding="0"> <tr> <td align="center"> <% if Page_Count > 1 then %> <a href="search_result.asp?a_idx=<%=a_idx% >&ScrollAction=<%=Page_Count-1%>&search=<%=search% >&searchString=<%=searchString%>"><img src="../guest3/img2/right.gif" border="0" alt="다음목록"></a> <% end if if Stop_Flag=0 then %> <a href="search_result.asp?a_idx=<%=a_idx% >&ScrollAction=<%=Page_Count+1%>&search=<%=search% >&searchString=<%=searchString%>"><img src="../guest3/img2/left.gif" border="0" alt="이전목록"></a> <% end if %> <a href="write.asp"><img src="../guest3/img2/write.gif" border="0" alt="글쓰기"></a> <a href="list.asp"><img src="../guest3/img2/list.gif" border="0" alt="리스트"></a></td> </tr> </table> </div> <div align="center"> <table border="0" width="600"> <td align="center"> <span style="font-size:9pt"><font face="Times New Roman, Times, serif" color="#555555"><i><a href="mailto:ash4460@hanmail.net">사 과띠에게 메일보내기</a> for more information.<br></i></font></span></td> </tr> </table> </div> </body> </html> <% rs.close db.close Set rs = Nothing Set db = Nothing %>

추가할 이미지를 입력하세요.

이미지 1
이미지설명 1

추가할 자료를 입력하세요.

자료 1
자료설명 1

추가할 싸이트를 입력하세요.

관련싸이트 1
싸이트설명 1

Password *