File: D:/web/groundscrewcentre/inc-template-highlights.asp
<%
' (SS,03/04/08) added "If ProductDiscontinued(AProductCode, AProductName)" to ShowHighlightsItem to not show "Buy" button for discontinued/special order products
' (SS,25/06/10) added IsStockAvailable to Sub ShowHighlightsItem
' (SS,06/07/10) replaced GetProductLink with GetProductLinkWithName for SEO in Sub ShowHighlightsItem
' (SS,19/06/12) hide buy button if no stock Sub ShowHighlightsItem
' (SS,20/05/13) added price per section using CustomShowPricePerSection to Sub ShowHighlightsItem
' (SS,14/08/14) new responsive web design version using Bootstrap
' (SS,30/05/18) added grid to last div class to make isotope work
' (SS,19/08/19) added ShowUSPGrid including header, item and footer
' --- START OF HIGHLIGHT TEMPLATES --- '
Sub ShowHighlightsHeader
%>
<div class="container">
<div class="row">
<div class="col-lg-12 col-md-12 col-sm-12 col-xs-12">
<h2>Ground Screws</h2>
</div>
</div>
<div class="row grid">
<%
End Sub
' (SS,25/6/10) added IsStockAvailable
' (SS,6/7/10) replaced GetProductLink with GetProductLinkWithName for SEO
' (SS,24/1/11) corrected thumbnail from large to small in getpic.asp (highlight-image)
' (SS,19/6/12) added "If InStock(ANumInStock) Or IsStockAvailable" to only show buy button if there is stock
' (SS,20/5/13) added price per section using CustomShowPricePerSection
' (SS,14/8/14) new bootstrap version
' (SS,02/8/14) added diagonal ribbon thanks to http://isdntek.com/tagbot/diagonalbanners.htm
' (SS,30/5/18) ribbon version can be removed
Sub ShowHighlightsItemOld(ACount, AProductCode, AProductName, ADescription, ASalePrice, AStdPrice, ANumInStock, ACategory, ASubcategory, AShowCategoryPicture)
Dim LProductLink
LProductLink = GetProductLinkWithName(AProductCode, AProductName)
' (SS,17/1/13) replaced & with & to reduce HTML errors in http://validator.w3.org
%>
<div class="col-lg-4 col-md-4 col-sm-6 col-xs-12">
<a href="<%=LProductLink%>">
<div class="photo_holder" style="position:relative">
<img class="img-responsive img-itp-container" src="getpic.asp?size=l&code=<%=AProductCode%>" alt="<%=AProductName%>" />
<div class="ribbon_holder" style="position:absolute; left:-6px; top:-6px;">
<div class="ribbon_wraps" >
<div class="ribbon_wrapLt"></div>
<div class="ribbon_wrapRt"></div>
<div class="ribbon_banner">
<%=IIf(ASalePrice <> "", "SALE ", "")%>Only <%ShowProductPriceSimple False%><%CustomShowPerSectionText(GetProductID)%>
</div>
</div>
</div>
</div>
<p class="itp-caption"><%=CustomProductNameWithBreak(AProductName)%></p>
</a>
</div>
<%
End Sub
' (SS,30/5/18) replaced above with following to highlight summer sale, also remove the ribbon and show the prices as in product list, change also made to product list to show a "Summer Saler" banner
Sub ShowHighlightsItem(ACount, AProductCode, AProductName, ADescription, ASalePrice, AStdPrice, ANumInStock, ACategory, ASubcategory, AShowCategoryPicture)
' ShowProductListItem 100, AProductCode, AProductName, ASalePrice, AStdPrice, ANumInStock, False, False, False, "", "", ""
ShowProductListItem 100, AProductCode, CustomProductNameWithBreak(AProductName), ASalePrice, AStdPrice, ANumInStock, False, False, False, "", "", ""
End Sub
Sub ShowHighlightsFooter
%>
</div>
</div>
<%
End Sub
' --- END OF HIGHLIGHT TEMPLATES --- '
'ShowHighlights
' --- START OF USP GRID TEMPLATES --- '
Sub ShowUSPGridHeader
%>
<div class="container-fluid usp-container">
<div class="row">
<div class="col-lg-12 col-md-12 col-sm-12 col-xs-12">
<h2 class="usp-title">Benefits of Ground Screws</h2>
</div>
</div>
<div class="row grid">
<%
End Sub
Sub ShowUSPGridItem(AHeading, AImageName, AExtraText, ABackgroundNo)
%>
<!-- START OF USP GRID ITEM -->
<div class="col-lg-4 col-md-4 col-sm-4 col-xs-12" style="padding:0px">
<div class="usp-grid-item usp-grid-item-bg<%=ABackgroundNo%>">
<img class="usp-grid-item-image img-responsive" src="images/usp/<%=AImageName%>" alt="<%=AHeading%>" /><br />
<div class="usp-grid-item-name"><%=AHeading%></div>
<div class="usp-grid-item-extra-text"><%=AExtraText%></div>
</div>
</div>
<!-- END OF USP GRID ITEM -->
<%
End Sub
Sub ShowUSPGridFooter
%>
</div>
</div>
<%
End Sub
Sub ShowUSPGrid
ShowUSPGridHeader
ShowUSPGridItem "No Digging. No Concrete", "no-digging.png", "No digging foundations meaning No Concrete", 1
ShowUSPGridItem "Quick & Easy to set up", "quick-and-easy.png", "", 2
ShowUSPGridItem "Saves Money", "saves-money.png", "compared to conventional foundation methods", 1
ShowUSPGridItem "Fully Re-usable", "fully-re-usable.png", "", 2
ShowUSPGridItem "No impact on environment", "no-impact.png", "No impact on environment and water courses during use of after removal", 1
ShowUSPGridItem "No landfill waste", "no-landfill-waste.png", "", 2
ShowUSPGridFooter
End Sub
' --- END OF USP GRID TEMPLATES --- '
' --- START OF APPLICATION GRID TEMPLATES --- '
Sub ShowAppGridHeader
%>
<div class="container-fluid app-container">
<div class="row">
<div class="col-lg-12 col-md-12 col-sm-12 col-xs-12">
<h2 class="app-title">Where Ground Screws Can Be Used</h2>
</div>
</div>
<div class="row grid">
<%
End Sub
Sub ShowAppGridItem(AHeading, AImageName, AExtraText)
%>
<!-- START OF APP GRID ITEM -->
<div class="col-lg-4 col-md-4 col-sm-4 col-xs-12" style="padding:0px">
<div class="app-grid-item">
<img class="app-grid-item-image img-responsive" src="images/app/<%=AImageName%>" alt="<%=AHeading%>" /><br />
<div class="app-grid-item-name"><%=AHeading%></div>
</div>
</div>
<!-- END OF APP GRID ITEM -->
<%
End Sub
Sub ShowAppGridFooter
%>
</div>
</div>
<%
End Sub
Sub ShowAppGrid
ShowAppGridHeader
ShowAppGridItem "Large Garden Structures", "large-garden-structures.jpg", ""
ShowAppGridItem "Small Garden Structures", "small-garden-structures.jpg", ""
ShowAppGridItem "Decking / Landscaping", "decking.jpg", ""
ShowAppGridItem "Fencing", "fencing.jpg", ""
ShowAppGridItem "Sports Facilities", "sports-facilities.jpg", ""
ShowAppGridItem "Miscellaneous", "miscellaneous.jpg", ""
ShowAppGridFooter
End Sub
' --- END OF APPLICATION GRID TEMPLATES --- '
%>