꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	공지사항 비공개 HTML 사용
제목 *
내용 *	> > 어떤 경우냐면 일반적인 검색시에는 아무 문제가 없는데,가끔 검색을 할때 board_num값인 1,2,3,4로 출력되는것이 아니라,board_num으로 출력되는군요... > > 어디에서 잘못된것인지,알고 싶습니다. > > 첫번째 select menu에 있는 작성일로는 검색이 가능한데,즉 번호값이 정상적으로(1,2,3,4,5)와 같이 출력되는데,작성자로는 board_num으로 출력됩니다. 혹시 몰라서 제가 소스 전체를 올립니다.확인좀 부탁드립니다. > > > > <!--#include file=include/dbopen.asp--> > > <% > > Const adOpenForwardOnly = 0 > > Const adOpenKeyset = 1 > > Const adOpenDynamic = 2 > > Const adOpenStatic = 3 > > > > ' 검색과 정렬을 위해 Query작성 > > > > Dim page, sortfield, sortword, keyfield > > Dim keyword, strSQL, DataExist > > > > page = Request("page") > > sortfield = Request("sortfield") > > sortword = Request("sortword") > > keyfield = Request("keyfield") > > keyword = Replace(trim(Request("keyword")),"'","'") > > > > if keyword = "" then ' 기냥 리스트만 볼 때 > > strSQL = "SELECT * FROM bulletboard " > > else ' 검색일 때 > > '만약에 "표시가 bulletboard"로 붙어 있을 경우 에러가 발생 > > '반드시 bulletboard "로 표시..... > > strSQL = "SELECT * FROM bulletboard " & _ > > "WHERE " & keyfield & " LIKE '%" & keyword & "%'" > > end if > > > > if sortfield = "" then '기본값 > > sortfield = "board_num" > > sortword = "desc" > > end if > > > > strSQL = strSQL & " ORDER BY " & sortfield > > strSQL = strSQL & " " > > strSQL = strSQL & sortword > > > > if sortfield <> "board_writer" then > > strSQL = strSQL & ", board_step" > > end if > > > > '여기까지 Query작성 끝 지정된 Query로 검색 > > > > Set rs = Server.CreateObject("ADODB.Recordset") > > 'rs.Open strSQL,Dbcon,adOpenKeyset > > rs.Open strSQL,Dbcon,1,1 > > > > '레코드가 하나도 없다면 > > if rs.EOF or rs.BOF then > > DataExist = False > > else '레코드가 있다면 > > DataExist = True > > end if > > > > %> > > > > <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN"> > > <html> > > <head> > > <title>Notice 게시판</title> > > <link rel="stylesheet" href="include/style.css"> > > > > </head> > > > > <body> > > <table border="0" width="100%"> > > <tr> > > <td align="center"> > > <% > > > > if DataExist = True then > > > > Dim totalRecord, cPage, lastpg, RowCount > > > > rs.PageSize = 10 > > > > '레코드의 갯수 > > totalRecord = rs.RecordCount > > > > if page = "" or page < 1 Then > > page = 1 > > end if > > > > cPage = page > > > > rs.AbsolutePage = cPage > > > > lastpg = int(((totalRecord - 1) / rs.PageSize) + 1) > > > > if page > lastpg then > > page = lastpg > > end if > > > > RowCount = rs.PageSize > > > > ' 정렬과 검색을 위한 입력창 > > > > %> > > <table width=600 border="0" cellpadding="0" cellspacing="1"> > > <form name="form1" method="post" action="notice.asp"> > > <tr> > > <td width="180" align="right" class=fonta> > > <select name="sortfield" size="1" class=select> > > <% > > if sortfield = "board_writer" then > > %> > > <option value="board_num">작성일</option> > > <option selected value="board_writer">작성자</option> > > <% > > else > > %> > > <option selected value="board_num">작성일</option> > > <option value="board_writer">작성자</option> > > <% > > end if > > %> > > </select> > > > > <select name="sortword" size="1" class=select> > > <% > > if sortword = "desc" then > > %> > > <option value="asc">오름차순</option> > > <option selected value="desc">내림차순</option> > > <% > > else > > %> > > <option selected value="asc">오름차순</option> > > <option value="desc">내림차순</option> > > <% > > end if > > %> > > </select> > > </td> > > <td width="300" align="right" class=fonta> > > <select name="keyfield" size="1" class=select> > > <% > > if keyfield = "board_writer" then > > %> > > <option value="board_title">제목</option> > > <option value="board_memo">내용</option> > > <option selected value="board_writer">작성자</option> > > <% > > else > > if keyfield = "board_memo" then > > %> > > <option value="board_title">제목</option> > > <option selected value="board_memo">내용</option> > > <option value="board_writer">작성자</option> > > <% > > else > > %> > > <option selected value="board_title">제목</option> > > <option value="board_memo">내용</option> > > <option value="board_writer">작성자</option> > > <% > > end if > > end if > > %> > > </select> > > > > <input type="text" name="keyword" maxlength="20" > > size="20" class=input value=<%= keyword %>> > > > > <input type="image" value="search" name="search" src="images/search3.gif" align="middle" onclick=send(this.form)> > > <!-- > > <input type="submit" value="검색"> > > --> > > </td> > > <td width="120" align="right" class=fonta><font size="2"> > > 페이지 : <%= cPage %>/<%= lastpg %></font> > > </td> > > </tr> > > </form> > > </table> > > </td> > > </tr> > > <tr> > > <td align="center" class=fonta> > > <table width=600 cellpadding="2" cellspacing="1" BGCOLOR="white"> > > <td width="70" bgcolor="#FF82C8" align="center" class=fonta>번호</td> > > <td width="390" bgcolor="#FF82C8" align="center" class=fonta>제목</td> > > <td width="70" bgcolor="#FF82C8" align="center" class=fonta>작성자</td> > > <td width="50" bgcolor="#FF82C8" align="center" class=fonta>조회</td> > > <td width="75" bgcolor="#FF82C8" align="center" class=fonta>작성일</td> > > > > > > <% > > Dim board_no, board_num, board_step, board_id > > Dim board_writer, board_email, board_homepage > > Dim board_title, board_memo, board_count > > Dim board_day, current_num, board_time > > > > > > Do While Not RS.EOF and RowCount > 0 > > > > board_no = rs("board_no") > > board_num = rs("board_num") > > board_step = rs("board_step") > > board_id = trim(rs("board_id")) > > board_writer = trim(rs("board_writer")) > > board_email = trim(rs("board_email")) > > board_homepage = trim(rs("board_homepage")) > > board_title = trim(rs("board_title")) > > board_memo = trim(rs("board_memo")) > > board_count = rs("board_count") > > board_day = trim(rs("board_day")) > > board_time = trim(rs("board_time")) > > > > board_day = left(board_day,4) & "-" & Mid(board_day,5,2) & "-" & _ > > right(board_day,2) > > > > Response.Write "<tr height=22>" > > Response.Write "<td bgcolor='#FFE8F5' align='center' class='fonta'>" > > > > if sortfield <> "board_writer" then > > if current_num <> board_num then > > Response.Write board_num > > else > > Response.Write " " > > end if > > else > > if board_step = 0 then > > Response.Write "board_num" > > else > > Response.Write " " > > end if > > end if > > %> > > </td> > > <td width="390" align="left" bgcolor=#FFE8F5 > > onMouseOut="this.style.backgroundColor='#FFE8F5'" > > onMouseOver="this.style.backgroundColor='D8E5FF'" class=fonta> > > <% > > if sortfield <> "board_writer" then > > if board_step <> 0 then > > '제목이 28문자길이보다 길다면 > > > > if Len(board_title) >= 27 then > > board_title = left(board_title, 26) & "..." > > end if > > %> > > <a href="notice_read_dis.asp?board_no=<%=board_no%>&board_count=<%=board_count%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>" title='<%=board_num%>번 글에 대한 <%=board_writer%>님의 답변 글'> <img src=images/red1.gif border=0 alt=<%=board_num%>번 글의 답변> <%=board_title%></a> > > <% > > else > > '제목이 30문자길이보다 길다면 > > if Len(board_title) >= 30 then > > board_title = left(board_title, 29) & "..." > > end if > > %> > > <a href="notice_read_dis.asp?board_no=<%=board_no%>&board_count=<%=board_count%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>" title='<%=board_writer%> 님의 글'><%=board_title%></a> > > <% > > end if > > else > > if board_step <> 0 then > > '제목이 28문자길이보다 길다면 - 답변시에 처리... > > if Len(board_title) >= 27 then > > board_title = left(board_title, 26) & "..." > > end if > > %> > > [<%=board_num%> <img src=images/red1.gif border=0 alt=답변>] > > <a href="notice_read_dis.asp?board_no=<%=board_no%>&board_count=<%=board_count%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>"><%=board_title%></a> > > <% > > else > > '제목이 30문자길이보다 길다면 > > if Len(board_title) >= 30 then > > board_title = left(board_title, 29) & "..." > > end if > > %> > > <a href="notice_read_dis.asp?board_no=<%=board_no%>&board_count=<%=board_count%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>"><%=board_title%></a> > > <% > > end if > > end if > > %> > > </span> > > </td> > > <td align="center" bgcolor="#FFE8F5" > > onMouseOut="this.style.backgroundColor='#FFE8F5'" > > onMouseOver="this.style.backgroundColor='D8E5FF'" class=fonta> > > <% > > if board_email <> "" then > > Response.Write "<a href='mailto:" & board_email & "'>" & _ > > board_writer & "</a>" > > else > > Response.Write board_writer > > end if > > %> > > > > </td> > > <td align="center" bgcolor="#FFE8F5" class=fonta><%=board_count%> > > </td> > > <td align="center" bgcolor="#FFE8F5" class=fonta><%=board_day%> > > </td> > > </tr> > > > > <% > > > > current_num = board_num > > RowCount = RowCount - 1 > > rs.MoveNext > > Loop > > > > rs.Close > > DbCon.Close > > set rs = nothing > > %> > > </table> > > </td> > > <tr> > > <tr> > > <td align="center" class=fonta> > > <table border="0" width="600"> > > <tr> > > <td align="center" width="600" class=fonta><B> > > <% > > ' 동페이지 만들기 > > > > Dim PageBlock, temp1, temp2, temp3, prev, post, pagelist > > > > PageBlock = 3 > > > > temp1 = int(cPage/PageBlock) > > > > if (cPage mod PageBlock) = 0 then > > temp1 = temp1 - 1 > > end if > > > > temp2 = temp1 * PageBlock > > > > temp3 = int(lastpg/PageBlock) > > > > if (lastpg mod PageBlock) = 0 then > > temp3 = temp3 - 1 > > end if > > > > prev = temp2 > > > > if prev > 0 then > > %> > > <A href=notice.asp?page=<%=prev%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>>◀</A> > > <% > > end if > > > > pagelist = temp2 > > > > for i = 1 to PageBlock > > > > pagelist = temp2 + i > > > > if lastpg < pagelist then > > exit for > > end if > > > > if int(pagelist) <> int(cPage) then > > %> > > <A href=notice.asp?page=<%=pagelist%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>><%=pagelist%></A> > > <% > > else > > %> > > <%=pagelist%> > > <% > > end if > > next > > > > post = temp2 + PageBlock + 1 > > > > if temp1 < temp3 then > > %> > > <A href=notice.asp?page=<%=post%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>>▶</A> > > <% > > end if > > %> > > </B> > > </td> > > </tr> > > <tr> > > <td align="center" class=fonta> > > <% > > ' 이전 페이지로 이동 > > if cPage > 1 Then > > %> > > <a href=notice.asp?page=<%=cPage-1%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>>이전</a> > > <% end if %> > > > > <a href=notice.asp><img src=images/e1list.gif border=0 alt=리스크항목으로가기></A> > > <a href="notice_write_dis.asp?IsNew=New"><img src=images/e1write.gif border=0 alt=글입력하기></a> > > > > <% > > ' 다음페이지로 이동 > > if lastpg - cPage > 0 Then > > %> > > <A href=notice.asp?page=<%=cPage+1%>&keyfield=<%=keyfield%>&keyword=<%=keyword%>&sortfield=<%=sortfield%>&sortword=<%=sortword%>>다음</A> > > <% > > end if > > %> > > </td> > > </tr> > > </table> > > <% else %> > > > > <table width=600 border="0" cellpadding="5"> > > <tr> > > <td bgcolor="#FF82C8" align="center" class=fonta> > > nayaBoard - notice用 죄송합니다.<br>현재 검색, 등록된 문서가 없습니다. > > 글을 입력하세요 > > </td> > > </tr> > > </table> > > </td> > > </tr> > > <tr> > > <td align="center"> > > <table border="0" width="600"> > > <tr> > > <td align="center" class=fonta> > > <a href="notice.asp"><img src=images/e1list.gif border=0 alt=List목록으로></a> > > <a href="notice_write_dis.asp?IsNew=New"><img src=images/e1write.gif border=0 alt=글쓰기></a> > > </td> > > </tr> > > </table> > > <% > > rs.Close > > DbCon.Close > > set rs = nothing > > set DbCon = nothing > > end if > > %> > > </td> > > </tr> > > <tr> > > <td><!--#include file=include/copyright.asp--></td> > > </tr> > > </table> > > </body> > > </html> > > > ----------------------------------------------------------- > > if board_step = 0 then > Response.Write "board_num" > > 이거 때문인거 같네요... > > ----------------------------------------------------------- 그 라인에 저두 이상하다,생각하고 있거든요.근데 아무리 봐도 해결 책이 나오지 않는군요. 그렇다면,다르게 처리 하는 방법이 없을가요 꼭 좀 부탁드립니다.

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *