<%
' (SS,15/02/12) New for recent reviews and reviews page, product reviews are held in inc-template-other.asp
' (SS,23/05/12) Minor change to ShowReviewsPageItem
' (SS,28/08/14) Bootstrap version, version 2 of ShowRecentReviewsItem has more parameters, Recent Reviews link more to fotter and named More Reviews

' --- START OF RECENT REVIEWS TEMPLATES --- '
Sub ShowRecentReviewsEmpty
' html to show if no recent reviews to go here '
%>
<%
End Sub

Sub ShowRecentReviewsHeader
%>
<div id="recent-reviews">
  <div id="recent-reviews-header">

  </div>
<%
End Sub

' (SS,26/8/14) new parameters AReviewTitle, AProductRating, AReviewerName, AReviewText 
Sub ShowRecentReviewsItem(ANumber, AReviewID, AProductCode, AProductName, ADateInfo, AReviewTitle, AProductRating, AReviewerName, AReviewText)
  Dim i
%>
<!-- START OF RECENT REVIEWS ITEM -->
  <div class="recent-reviews-item">
    <div class="recent-reviews-name"><a href="<%=GetScriptName%>?page=reviews#reviewid<%=AReviewID%>"><small><%=AProductName%></small></a></div>
    <div>
<%For i = 1 To AProductRating%>    
    <i class="glyphicon glyphicon-star" style="color: #FFB500"></i>
<%Next%>
    &nbsp;<strong><%=AReviewTitle%></strong>
    </div>
    <div class="recent-reviews-text">
      &quot;
      <%=Mid(AReviewText, 1, 200) & "..."%>
      &quot;  
    </div>
    <div class="recent-reviews-date"><small><%=ADateInfo%>, <%=AReviewerName%></small></div>
  <br />
<!-- END OF RECENT REVIEWS ITEM -->
  </div>
<%
End Sub

Sub ShowRecentReviewsFooter
%>
  <div id="recent-reviews-footer">
    <a href="<%=GetPageLink("reviews")%>">More Reviews</a>
  </div>
  <div class="clear"></div>
</div>
<%
End Sub

' --- END OF RECENT REVIEWS TEMPLATES --- '

' --- START OF REVIEWS PAGE TEMPLATES --- '

Sub ShowReviewsPageHeader
  ShowPageTitle "Reviews", "", "" ' (SS,5/10/20) added 2 extra parameters
%>
<div id="other-pages2" style="padding: 0">
<%
End Sub

Sub ShowReviewsPageEmpty
%>
  No reviews yet.
<%
End Sub

' (SS,23/5/12) removed bold tags from product name which was resulting in extra bold via different font in IE and FireFox
' (SS,12/9/14) replaced ShowReviewRatingImage with ShowReviewRatingStars for Bootstrap
Sub ShowReviewsPageItem(ANumber, AReviewID, AProductCode, AProductName, AProductDisabled, ADate, ATitle, ARating, AText, AReviewedBy)
  Dim LProductLinkStart, LProductLinkEnd, i
  If AProductDisabled Then
    LProductLinkStart = ""
    LProductLinkEnd = ""
  Else
    LProductLinkStart = "<a href=""" + GetProductLink(AProductCode) + """>"
    LProductLinkEnd = "</a>"
  End If
%>
<!-- START OF REVIEWS PAGE ITEM -->
  <div class="reviews-page-item">
      <div class="reviews-page-item-header">        
        <div class="reviews-page-item-name"><a name="reviewid<%=AReviewID%>"></a>
          <h4><%=LProductLinkStart%><%=AProductName%><%=Iif(AProductDisabled, " (discontinued)", "")%><%=LProductLinkEnd%><h4>
        </div>
      </div>
    <div class="row">
      <div class="col-lg-3 col-md-3 col-sm-4 col-xs-12">    
        <div class="reviews-page-item-left">
          <%=LProductLinkStart%><img class="reviews-page-image" src="<%=GetProductImageLink(AProductCode, "s")%>" alt="<%=AProductName%>" /><%=LProductLinkEnd%>      
        </div>
      </div>
      <div class="col-lg-9 col-md-9 col-sm-8 col-xs-12">
        <div class="reviews-page-item-right">
          <div class="reviews-page-item-right-header">
            <div class="reviews-page-item-rating">
            <%ShowReviewRatingStars ARating%>
              <!--<div class="reviews-page-item-title"-->&nbsp;<big><b><%=ATitle%></b></big><!--</div>-->
            </div>            
            <!--<div class="reviews-page-item-date"><%=ADate%></div>-->
            <div class="reviews-page-item-review-by">Review by&nbsp;<%=AReviewedBy%> on <%=ADate%></div>        
          </div>
          <div class="reviews-page-item-body">        
            <p><i><%=AText%></i></p>
          </div>
        </div>
      </div>
    </div><!--row-->
  </div>
  <hr>
<!-- END OF REVIEWS PAGE ITEM -->  
<%
End Sub

Sub ShowReviewsPageFooter
%>
</div> <!-- end #other-pages2 -->
<%
End Sub

' --- END OF REVIEWS PAGE TEMPLATE --- '


%>