See Also

OrderedList Members

Description

Represents an ordered list.

For a list of all members defined in this module, see OrderedList members.

Object Model


Interfaces

Implemented InterfaceDescription
Object 

Example

[ASP - VBScript] 

<!-- METADATA TYPE="typelib" UUID="{DF9225FE-94A4-490D-8CAD-E8366CE621D3}"--> 
<% 
    'Create a Document 
    Dim MyDocument   
    Set MyDocument = Server.CreateObject( "DynamicPDF.Document" )   
    Dim MyPage   
    Set MyPage = MyDocument.AddPage()  
    'Add ordered list 
    Dim orderedList 
    Set orderedList = MyPage.AddOrderedList( 10, 10, 400, 200, DPDF_Font_Helvetica, 10 ) 
    Dim listItem1 
    Set listItem1 = orderedList.AddListItem("Fruits") 
    Dim listItem2 
    Set listItem2 = orderedList.AddListItem("Vegetables") 
    'Add sub list 
    Dim orderedSubList1 
    Set orderedSubList1 = listItem1.AddOrderedSubList( DPDF_NumberingStyle_RomanUpperCase ) 
    Dim subListItem1 
    Set subListItem1 = orderedSubList1.AddListItem("Citrus") 
    Dim subListItem2 
    Set subListItem2 = orderedSubList1.AddListItem("Non-Citrus") 
    'Add sub list             
    Dim orderedSubList2 
    Set orderedSubList2 = listItem2.AddOrderedSubList( DPDF_NumberingStyle_RomanUpperCase ) 
    Dim subListItem3 
    Set subListItem3 = orderedSubList2.AddListItem("Potato") 
    Dim subListItem4 
    Set subListItem4 = orderedSubList2.AddListItem("Beans") 
    'Add sub list 
    Dim subOrderedSubList1 
    Set subOrderedSubList1 = subListItem1.AddOrderedSubList( DPDF_NumberingStyle_RomanUpperCase ) 
     subOrderedSubList1.AddListItem("Lime") 
    subOrderedSubList1.AddListItem("Orange") 
    'Add sub list             
    Dim subOrderedSubList2 
    Set subOrderedSubList2 = subListItem2.AddOrderedSubList( DPDF_NumberingStyle_RomanUpperCase ) 
    subOrderedSubList2.AddListItem("Mango") 
    subOrderedSubList2.AddListItem("Banana") 
    'Add sub list             
    Dim subOrderedSubList3 
    Set subOrderedSubList3 = subListItem3.AddOrderedSubList( DPDF_NumberingStyle_RomanUpperCase ) 
    subOrderedSubList3.AddListItem("Sweet Potato") 
    'Add sub list             
    Dim subOrderedSubList4 
    Set subOrderedSubList4 = subListItem4.AddOrderedSubList( DPDF_NumberingStyle_RomanUpperCase ) 
    subOrderedSubList4.AddListItem("String Bean") 
    subOrderedSubList4.AddListItem("Lima Bean") 
    subOrderedSubList4.AddListItem("Kidney Bean") 
    'Draw PDF 
    MyDocument.DrawToWeb  
    Set MyPage = Nothing  
    Set MyDocument = Nothing 
%>

See Also

OrderedList Members

 

 

© Copyright 2007, ceTe Software