% ' Declare local variables: DIM flagSecure, varHeader, varHTTP, varHTTPS, varWelcome ' Flag for marking site as secure flagSecure = 0 ' no secure 'flagSecure = 1 'secure ' Set Header Text ' varHeader="" 'No Text 'varHeader = "Welcome" 'Display Header Text Select Case Request.QueryString("ProductGroup") Case "1" varHeader = "> Products > Standard Clamping Elements" Case "2" varHeader = "> Products > Clamping and Fixture Systems" Case "5" varHeader = "> products > Clamping and Fixture Systems > Modular Fixture Systems" Case "3" varHeader = "> Products > Toggle Clamps" Case "4" varHeader = "> Products > Casting Plates" End Select 'Set file path varHTTP = "http://www.itbona.com/itbona-machinetool" varHTTPS = "https://www.itbona.com/itbona-machinetool" 'Set welcome message if session("MM_UserName") <> "" Then varWelcome = "You are logged-in " & (Recordset2.Fields.Item("strFirstName").Value) & " " & (Recordset2.Fields.Item("strLastName").Value) Else varWelcome = "" End If ' Set Product Info DIM varProductInfo, varProductPageLink 'varProductInfo = "1" 'Logo will appear ' varProductPageLink = "http" %>