[VBScript]
ReadOnly property ISYSCatalog.Count as long

[C#]
long IISYSCatalog.Count {get;}

[ColdFusion/Java]
long ISYSCatalog.Count() throws ComException;

<%
  set catalog = Application("ISYS").OpenCatalog

  for i = 1 to catalog.Count
    Response.Write "<OPTION name=""" & catalog.Path(i) & """>" & _
      catalog.Name(i) & "</OPTION>"  
  next  
%>