Open Notes Picture Database - Discussion: comments counter in picture overview
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 +
"<table><tr><td>" + albumHTML +"</td></tr></table>"+ @NewLine +
"</div>" + @NewLine;
PictureHTML := "<span class=\"Thumbnail\">" + @NewLine +
"<a href=\""+link+"\">"+@NewLine +
image+"</a><br clear=\"right\">"+ @NewLine +
_Subject+comments+"<br clear=\"all\"> </span>" + @NewLine;
@If(Form="Album_sub"; Album_SubHTML ; PictureHTML )