<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=Windows-1252">
<TITLE>GetListCount</TITLE>
<SCRIPT LANGUAGE="JavaScript">
<!--
	TempString = navigator.appVersion
	if (navigator.appName == "Microsoft Internet Explorer"){	
// Check to see if browser is Microsoft
		if (TempString.indexOf ("4.") >= 0){
// Check to see if it is IE 4
			document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/coua.css">');
		}
		else {
			document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/cocss.css">');
		}
	}
	else if (navigator.appName == "Netscape") {						
// Check to see if browser is Netscape
		document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/coua.css">');
	}
	else
		document.writeln('<link rel="stylesheet" type="text/css" href="/iishelp/common/cocss.css">');
//-->
</script>
<SCRIPT LANGUAGE="VBScript">
<!--
Sub Window_OnLoad()
   Dim frmContents
   On Error Resume Next
   If Not Parent Is Nothing Then
      Set frmContents = Parent.Contents
      If Not frmContents Is Nothing Then
            frmContents.Window.TOCSynch_Click
      End If
   End If
End Sub
//--></SCRIPT><META NAME="DESCRIPTION" CONTENT="Internet Information Services reference information">
<META HTTP-EQUIV="PICS-Label" CONTENT='(PICS-1.1 "<http://www.rsac.org/ratingsv01.html>" l comment "RSACi North America Server" by "inet@microsoft.com <mailto:inet@microsoft.com>" r (n 0 s 0 v 0 l 0))'>
<META NAME="MS.LOCALE" CONTENT="EN-US">
<META NAME="MS-IT-LOC" Content="Internet Information Services"> 
</HEAD>

<BODY BGCOLOR="#FFFFFF" TEXT="#000000">

<H3><A NAME="_getlistcount"></A><SUP></SUP>GetListCount</H3>

<P>The <B>GetListCount </B>method retrieves the total number of Web pages listed in the Content Linking List file. </P>

<H6>Syntax</H6>

<P><I>NextLink</I><B>.GetListCount( </B><I>listURL </I><B>)</B> </P>

<P>&nbsp;</P>

<H6>Parameters</H6>

<DL>
<DT><I>listURL</I></DT>

<DD>The location of the Content Linking List file.<BR>
</DD>

<DT></DT>
</DL>

<H6>Return Values</H6>

<P>This method returns an integer. </P>

<H6>Example</H6>

<P>A more complete example is at the bottom of <U>Content Linking Component.</U></P>

<P>--- NextLink_GetListCount.asp ---</P>

<PRE><CODE>&lt;%
  Dim objNextLink
  Set objNextLink = Server.CreateObject("MSWC.NextLink")   
  count = objNextLink.GetListCount("/data/nextlink.txt") 
  If 1 = count Then
    Response.Write "There is " &amp; count &amp; " item in the list.&lt;BR&gt;"
  Else
    Response.Write "There are " &amp; count &amp; " items in the list.&lt;BR&gt;" 
  End If
%&gt;
 </CODE></PRE>

<H6>See Also</H6>

<P><A HREF="/iishelp/iis/htm/asp/comp9dq0.htm"><B>GetListIndex</B></A></P>
<hr class="iis" size="1">
<p align="center"><em><a href="../../../common/colegal.htm">&copy; 1997-2001 Microsoft Corporation. All rights reserved.</a></em></p>
</BODY>
</HTML>