꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

채영이 / 2000-11-25 / 오후 5:06:24 / 203.255.3.190
조회수 : 117

[질문] 이것좀 봐주세요...ㅠ.ㅠ

> 채영님 저두 채영님의 방명록 처럼 만들라고
> 채영님의 소스를 받아서 최대한 간단하게
> 해서 만들었는데요...
> 채영님은 게시판에서 서치후 페이징 할때 페이징을
> 일반적으로 다음 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
>
>
> %>
>
>
>
> 사과띠 검색결과
>
>
>
>
>

> <% if rs.BOF or rs.EOF then %>
>
>

>

>

> color="#FF80000">NO result!!
>

>

<%=search%>에서
> <%=SearchString%>로 검색을
> 수행하였지만

>

발견
> 된
> 검색결과가 없습니다.

>

>

> <list로 돌아가기>

>
> <% else %>
>

> color="#008080">
> Search List

>
>
>

>
>

>

<%=searchname%
> >에서
> <%=SearchString%>로 검색한 결과<%=V_total%>개의 데이터를
> 찾았습니다.
>

>

>
>
>
>
>

> <% if V_Total>5 then%>
>
>
>
>
>
> <% end if %>
>

>

> <%
> RowCount=rs.PageSize
>
> do while not rs.EOF and Rowcount > 0 %>
>

>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

> src="../guest3/img2/left_up.gif">	> width="520" height="5">	> src="../guest3/img2/right_up.gif">
> background="../guest3/img2/table_left.gif">	"> > src="../guest3/img2/delete.gif" border="0"> > <%=V_Index%>.<%=left(rs > ("a_date"),10)%> <%=rs("a_time")%> > <%if not rs("a_email")="" then%> > "> > src="../guest3/img2/mail.gif" border="0"> > <% end if > if not rs("a_url")="http://" and not rs("a_url")="" then%> > " target="new"> > src="../guest3/img2/home-1.gif" border="0"> > <%end if%> > <%=rs("a_name")%>님께 > 서 <%=rs("a_ip")%>에서 남기신 소중한 글입 > 니다. > > > <% > a_contents = rs("a_contents") > a_contents = replace(a_contents,chr(13)&chr(10)," ")%> > <%=a_contents%>
> src="../guest3/img2/left_down-1.gif">	> width="520" height="5">	> src="../guest3/img2/right_down-1.gif">

>

>
> <%
> RowCount=RowCount-1
> V_Index=V_Index-1
> rs.MoveNext
> loop
>
> if rs.EOF then
> Stop_Flag=1
> end if
>
> end if
> %>
>
>
>

>
>
>
>
>

> <% if Page_Count > 1 then %>
>

> border="0" alt="다음목록">
> <% end if
>
> if Stop_Flag=0 then %>
>

> border="0" alt="이전목록">
> <% end if %>
>
>

> border="0" alt="글쓰기">
>
>

> alt="리스트">

>

>
>
>

>
>
>
>

> 사
> 과띠에게 메일보내기 for more
> information.

>

>
>
>
>
>
> <%
> rs.close
> db.close
> Set rs = Nothing
> Set db = Nothing
> %>
>
-----------------------------------------------------------

태그 때문에 소스 보기가 힘들군요....

님은 질문 하시고 어떻게 보이나 신경을 안 써시나 보네요....

질문 내용과 에러 내용을 봐서는 오타일 가능성이 있습니다.

자세히 보세요... 그럼....