Content Linking 구성 요소

Content Linking 구성 요소는 URL 목록을 관리하는 Nextlink 개체를 만들어 사용자 웹 사이트의 페이지를 책 페이지처럼 다룰 수 있게 합니다. Content Linking 구성 요소를 사용하여 이전 및 다음 웹 페이지에 대한 탐색 링크와 목차를 자동으로 만들고 업데이트할 수 있습니다. 이것은 온라인 신문과 토론 메시지 목록 등과 같은 응용 프로그램에 가장 이상적입니다.

Content Linking 구성 요소는 연결된 웹 페이지 목록이 있는 컨텐트 링크 목록 파일을 참조합니다. 이 목록은 웹 서버에 저장됩니다.

파일 이름

Nextlink.dll Content Linking 구성 요소
컨텐트 링크 목록 파일 표시되는 순서를 기반으로 만들어진 웹 페이지 목록이 있는 텍스트 파일입니다. 이 파일은 웹 서버 가상 경로에서 사용할 수 있어야 합니다.

구문

Set NextLink = Server.CreateObject( "MSWC.NextLink")

매개 변수

NextLink
Server.CreateObject에 대한 호출로 작성된 개체의 이름을 지정합니다.

메서드

GetListCount 컨텐트 링크 목록 파일 항목의 색인 번호.
GetListIndex 컨텐트 링크 목록 파일에서 현재 페이지의 인덱스를 가져옵니다.
GetNextDescription 컨텐트 링크 목록 파일에 나열된 다음 페이지의 설명을 가져옵니다.
GetNextURL 컨텐트 링크 목록 파일에 나열된 다음 페이지의 URL을 가져옵니다.
GetNthDescription 컨텐트 링크 목록 파일에 나열된 N 번째 페이지의 설명을 가져옵니다.
GetNthURL 컨텐트 링크 목록 파일에 나열된 N 번째 페이지의 URL을 가져옵니다.
GetPreviousDescription 컨텐트 링크 목록 파일에 나열된 이전 페이지의 설명 줄을 가져옵니다.
GetPreviousURL 컨텐트 링크 목록 파일에 나열된 이전 페이지의 URL을 가져옵니다.

예제

다음은 목차를 작성하는 예제입니다. 이 예제를 실행하려면 사용자의 기본 웹 사이트 폴더나 Data로 불리는 하위 폴더에 컨텐트 링크 목록 파일을 만들어야 합니다. 예를 들어, 기본 웹 사이트가 C:\Inetpub\Wwwroot로 매핑되어 있으면 C:\Inetpub\Wwwroot\Data\NextLink.txt에 목록 파일을 만들어야 합니다.

--- NextLink.asp ---

<%
   Set NextLink = Server.CreateObject("MSWC.NextLink")   
   ListFile = "/data/nextlink.txt"
   count = NextLink.GetListCount(ListFile) 
   I = 1 
%> 
<UL>
<% Do While (I <= count) %>  
     <LI>
     <A HREF="<%=NextLink.GetNthURL(ListFile, I)%>"> 
     <%= NextLink.GetNthDescription(ListFile, I) %>
     </A>
     </LI>
     <% I = (I + 1) %>
<% Loop %>  
</UL>
<!-- #include FILE = "nextlink.inc" -->

다음은 모든 ASP 파일에 다음 페이지와 이전 페이지 링크를 추가하는 스크립트입니다. 컨텐트 링크 목록 파일에 나열된 모든 파일에 이 파일을 포함시키려면 다음 줄을 사용합니다.

<!-- #include FILE = "nextlink.inc" -->

--- NextLink.inc ---

<BR>
<%
   Set NextLink = Server.CreateObject ("MSWC.NextLink")
   ListFile = "/data/nextlink.txt"
   Index = NextLink.GetListIndex(ListFile)
%>

<TABLE BORDER=0 CELLPADDING=6>
<TR><TD>

<% If (Index > 1) Then %> 
     <A HREF="<%=NextLink.GetPreviousURL(ListFile)%>">
     Previous Page
     </A>
<% Else %>
     Previous Page
<% End If %> 

</TD><TD>

<% If 0 = Index Then %>
     <A HREF="<%=NextLink.GetNthURL(ListFile, 1)%>">
     Next Page
     </A>
<% ElseIf (Index < NextLink.GetListCount(ListFile)) Then %> 
     <A HREF="<%=NextLink.GetNextURL(ListFile)%>">
     Next Page
     </A> 
<% Else %>
     Next Page
<% End If %>

</TD><TD>

<% If Not 0 = Index Then %>
     <A HREF="nextlink.asp">
     Back to Table of Contents
     </A>
<% End If %>

</TD></TR>
</TABLE>

© 1997-2001 Microsoft Corporation. All rights reserved.