home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 February / PCWK0297.iso / lotus / english / lotus031.dsk / COLLAYS.LSS < prev    next >
Encoding:
Text File  |  1995-06-26  |  372 b   |  13 lines
  1.     'Retrieve all of the layouts in this division
  2.     
  3.     Dim AllLayouts As LayoutCollection
  4.     Set AllLayouts = .Division.Foundry.Layouts
  5.     
  6.     Forall Layout In AllLayouts
  7.         Print "Layout Info "
  8.         Print "Class name ",Layout.ClassName
  9.         Print "Name ", Layout.Name
  10.         Print "Editor name ", Layout.EditorName
  11.         Print "------------------------------------------"
  12.         
  13.     End Forall