꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	HTML 사용
제목 *
내용 *	> > 채영님의 게시판을 사용하고 있는데 > > 메인페이지에 게시판에 올라온 글들을 > > 약 5개정도 보여지게 하고 싶습니다. > > 그러니까 최근 글리스트의 상위 5개만 지속적으로 > > 자동으로 업데이트 되는 거죠 > > 알려주세요.. > > > ----------------------------------------------------------- > > 제가 사용한 코드 입니다.. > 참고하세요... > > 날짜 부분은 일부러 짧게 줄여서 표기하였습니다.. > 제목 또한 마찬가지구요... > 수고하세요... > > ====================================================================== > <% > Set DbCon=Server.CreateObject("ADODB.Connection") > DbCon.Open "???","???","???" > > Set Rs1=Server.CreateObject("ADODB.Recordset") > query1="SELECT TOP 5 C_Index_PIN, C_Name_N, C_Email_A, C_Subject_N, C_Depth_N, C_Approval_N, C_Opposition_N, C_Date_N, C_Reference_N FROM news ORDER BY C_Class_N DESC, C_Order_N ASC" > Rs1.CursorType=1 > Rs1.Open query1, DbCon > > '상위 다섯개의 레코드만 불러 옵니다. > > N=Rs1.RecordCount > '레코드수를 체크하는 변수입니다.. > %> > > <table width="100%" border="0" cellspacing="0" cellpadding="0"> > <% For i=1 to N > If Rs1.eof then > Exit For > End If > > varDate=CDate(Rs1("C_Date_N")) > varMonth=Month(varDate) > varDay=Day(varDate) > > If varMonth<10 then > varMonth="0"&varMonth > end If > > If varDay<10 then > varDay="0"&varDay > end If > > varSubject=Rs1("C_Subject_N") > If Len(varSubject)>25 then > varSubject=Left(varSubject,25)&"..." > end If > > > %> > <tr> > <td width="81%"> ◎ > <a href="../../bbs/board/mess.asp?code=news&P_Index=<%=Rs1("C_Index_PIN")%>"><%=varSubject%></a></td> > <td width="18%"> <font size="2" color="#666666">[<%=varMonth%>-<%=varDay%>]</font></td> > </tr> > > <% > Rs1.moveNext > Next > > Set Rs1=Nothing > DbCon.Close > %> > </table> > ====================================================================== > > -----------------------------------------------------------

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *