% pageVal = "1" subVal = "6" thVal = "3" fhVal = "" %> <% Dim strBbsId strBbsId = "B0001" ' SET Code Class Dim action Set action = New BbsAction Dim arrayPage Dim arrayList Dim intTotalCount, intTotalPage Dim intI Dim intCurrPage Dim intPageSize, intBlockSize Dim strSubQuery intPageSize = 10 intBlockSize = 10 intCurrPage = Request("page") If IsNull(intCurrPage) Or intCurrPage="" Then intCurrPage = 1 arrayPage = action.getTotalCount_BBS(intPageSize, strBbsId) arrayList = action.getList_BBS(intPageSize, intCurrPage, strBbsId) intTotalCount = arrayPage(0) intTotalPage = arrayPage(1) %>
Minitab의 고객들은 전 세계적으로 가장 우수한 기업들 입니다. Minitab 고객들의 성공적이고 혁신적인 성공사례를 확인하십시오.
<% If Not IsNull(arrayFileList) Then response.write "첨부파일 :" Dim allFileListCount allFileListCount = UBound(arrayFileList, 2) For intJ = 0 To allFileListCount %> <%=arrayFileList(3, intJ)%> <% Next Else response.write " " End IF %>
<%=dataDesc%>