home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 November / pcwk_11_98B.iso / Lotus / SPANISH / LOTUS027.DSK / COLLAYS.TPL < prev    next >
Text File  |  1995-07-14  |  444b  |  19 lines
  1. Option Public
  2.  
  3.     'Retrieve all of the layouts in this division
  4.     
  5.     Dim AllLayouts As LayoutCollection
  6.     Set AllLayouts = .Division.Foundry.Layouts
  7.     
  8.     Forall Layout In AllLayouts
  9.         Print "Informaci≤n sobre el formato "
  10.         Print "Nombre de clase ",Layout.ClassName
  11.         Print "Nombre ", Layout.Name
  12.         Print "Nombre del editor ", Layout.EditorName
  13.         Print "------------------------------------------"
  14.         
  15.     End Forall
  16. Sub Script
  17.  
  18. End Sub
  19.