안녕하세요 에버클럽입니다. 오랬만에 인사드립니다. 그동안 이것저것 바쁘다는 핑계로 글한번 남기지

못했습니다. 유저분중에 아래와 같이 출력하고자 하시는 분이 계신것 같아 올려 드립니다.

 

원하는 게시판의 글을 추출하는 소스의 응용편 입니다.

<!--원하는 게시판의 글 출력하기 시작-->
< table >
<%
Dim intCount ,Query_strBoardID
intCount = 7 ' 출력할 갯수

Query_strBoardID = "('test_1','test_2','test_3')"
SET RS = DBCON.EXECUTE("SELECT TOP " & intCount & " [a].[intSeq],[a].[strBoardID],[a].[strSubject],[a].[dateRegDate],[b].[strName],[strFileImage] =(SELECT [strFileName]+'|'+ CONVERT(VARCHAR(10),[imgWidth]) +'|'+CONVERT(VARCHAR(10),[imgHeight]) FROM [MPLUS_BOARD_FILE] WHERE [strFileCode] = [a].[strFileCode]) FROM [MPLUS_BOARD][a] JOIN [MPLUS_BOARD_CONFIG_DEFAULT][b] ON [a].[strBoardID] = [b].[strBoardID] WHERE [a].[bitDelete] <> 1 AND [a].[strBoardID] IN " & Query_strBoardID &" ORDER BY [a].[intSeq] DESC")

IF RS.EOF THEN
%>
<tr>
<td height="20" colspan="4" align="center">등록된 글이 존재하지 않습니다.</td>
</tr>
<%
ELSE
WHILE NOT(RS.EOF)
intSeq = Rs("intSeq")
strBoardID = Rs("strBoardID")
strName = RS("strName")
strSubject = GetCutSubject(RS("strSubject"), 15)
dateRegDate = GetDateType(1,Rs("dateRegDate"))

strFileImage = RS("strFileImage") 
strFileImage = SPLIT(strFileImage, "|")
%>
<tr>
 <td width="60" height="60" align="center"><img src="/pds/Board/<%=strBoardID%>/small/<%=strFileImage(0)%>"></td>
                  <td width="100" align="center"><%=strName%></td>
                  <td width="262" align="center"><%=strSubject%></td>
                  <td width="262" align="center"><%=dateRegDate%></td>
                </tr>

<%
RS.MOVENEXT
WEND
END IF
%>
</table>
<!--원하는 게시판의 글 출력하기 끝-->

지난번 원하는 게시판의 글 추출하기와 별반 다를게 없습니다. 하지만 여기에 추가된 부분은 이미지를 추가한것입니다.

빨갛게 표시된 부분을 유념하시기 바라며 질문사항은 언제든지 메시저나 메일등을 통해 문의해 주시기 바랍니다.

 

http://www.greenever.com 에서 확인하실수 있