a little enhancement:
in view "HTML\PhotosForPublic"
replace in the html column:
comments:=@If(@IsAvailable(RESPONSECOUNT);" comments: "+"("+@Text(RESPONSECOUNT)+")";"");
subject := @If(@IsAvailable(Subject);Subject;"Album: "+AlbumName);
subject := @ReplaceSubstring(Subject;"&";"&");
subject := @ReplaceSubstring(Subject;"\"";""");
webdbname := @WebDbName;
res := @If(@IsNumber(PHOTO_THUMB_HEIGHT);" height=\"" + @Text(PHOTO_THUMB_HEIGHT) + "\" width=\"" + @Text(PHOTO_THUMB_WIDTH) + "\"";"");
link := "/"+webdbname+@If(Form="Album_sub";"/albums/";"/pictures/")+PermaLink;
image1 := "<img align=\"left\" src=\"/"+WebDbName+"/pictures/"+@If(Form="Album_sub" & AlbumPictureChoice != "" ;@Word( AlbumPictureChoice ; ":" ; 1 );PermaLink)+"/$File/"+@If(Form="Album_sub";AlbumPictureThumbnail;PHOTO_THUMB_FILENAME)+"\"" + res + " alt=\"" + Subject + "\" title=\"Open " + Subject + "\" class=\"showThumbs\">";
image2 := "<img align=\"left\" src=\"/"+WebDbName+@If(Form="Album_sub" & AlbumPictureChoice != "" ;@If(Form="Album_sub";AlbumPicture;PermaLink)+"/$File/"+@If(Form="Album_sub";AlbumPictureThumbnail;PHOTO_THUMB_FILENAME);"/no_preview_available.gif")+"\" border=\"0\" title=\"Open " + Subject + "\" class=\"showThumbs\">";
@If(@If(Form="Album_sub";AlbumPictureThumbnail;PHOTO_THUMB_FILENAME) = ""; image:=image2;image:=image1);
AlbumHTML := "<a href=\""+link+"\">"+@NewLine
+image+"</a>" + Album_Description+"" ;
Album_SubHTML :=
"<div class=\"StoryContents\"><p class=\"StoryContentsText\" >" + @NewLine +<br/>
"<table><tr><td>" + albumHTML +"</td></tr></table>"+ @NewLine +<br/>
"</div>" + @NewLine;<br/>
PictureHTML := "<span class=\"Thumbnail\">" + @NewLine +
"<a href=\""+link+"\">"+@NewLine +<br/>
image+"</a><br clear=\"right\">"+ @NewLine +<br/>
_Subject+comments+"<br clear=\"all\">&nbsp;</span>" + @NewLine;<br/>
@If(Form="Album_sub"; Album_SubHTML ; PictureHTML )