jump to content

Photos in a folder

The following DTML Method will list the pictures in your folder. If the image has a imgdescr property, that is shown as the description. 

<!-- start links to folder photos -->
<dtml-let thisdoc=id>
  <dtml-with aq_parent>
    <dtml-in "objectItems(['Image'])">
      <dtml-if sequence-start>
        <TABLE BORDER="0" CELLSPACING="5" CELLPADDING="5">
      </dtml-if>
      <TR>
      <TD VALIGN=TOP ALIGN=LEFT>
      <dtml-if sequence-even>
        <dtml-with sequence-item>
          <dtml-if "hasProperty('imgdescr')"><P><dtml-var imgdescr></P></dtml-if>
        </dtml-with>     
        </TD><TD VALIGN=TOP ALIGN=RIGHT>
        <dtml-if title>
          <IMG SRC="<dtml-var "absolute_url()">" ALT="<dtml-var title>">
        <dtml-else>
          <IMG SRC="<dtml-var "absolute_url()">" ALT="">
        </dtml-if>
      <dtml-else>
        <dtml-if title>
          <IMG SRC="<dtml-var "absolute_url()">" ALT="<dtml-var title>">
        <dtml-else>
          <IMG SRC="<dtml-var "absolute_url()">" ALT="">
        </dtml-if>
        </TD><TD VALIGN=TOP ALIGN=RIGHT>
        <dtml-with sequence-item>
          <dtml-if "hasProperty('imgdescr')"><P><dtml-var imgdescr></P></dtml-if>
        </dtml-with>              
      </dtml-if sequence-even>
      </TD>
      </TR>
      <dtml-if sequence-end>
        </TABLE>
      </dtml-if>
    </dtml-in>
  </dtml-with>
</dtml-let>
<!-- end links to folder photos -->