Riga 1: <%
Riga 2: Dim listOfAsyncHtml As Dictionary(Of String, String) = New Dictionary(Of String, String)
Riga 3: Dim testUrl As String = ""
Riga 4: Try
Riga 5: If Request("testUrl").ToString.Trim = "S" Then
Riga 6: testUrl = "S"
Riga 7: ' Response.Cookies("devMode").Value = "S"
Riga 8: End If
Riga 9: Catch ex As Exception
Riga 10: End Try
Riga 11: If ClientSite.getCookieValue("devMode") <> "S" Then
Riga 12: ' Exit Sub
Riga 13: End If
Riga 14: %>
Riga 15: <!--#include file="leggi_lingua.aspx"-->
Riga 16: <%
Riga 17:
Riga 18: Dim connessioneMySQL As MySqlClient.MySqlConnection = New MySqlClient.MySqlConnection(ClientSite.getStringaDB())
Riga 19: Dim connessioneMySQL1 As MySqlClient.MySqlConnection = New MySqlClient.MySqlConnection(ClientSite.getStringaDB())
Riga 20: Dim connessioneMySQL2 As MySqlClient.MySqlConnection = New MySqlClient.MySqlConnection(ClientSite.getStringaDB())
Riga 21:
Riga 22: Dim dtr3 As MySqlClient.MySqlDataReader
Riga 23: Dim sql3 As New MySqlClient.MySqlCommand
Riga 24: sql3.Connection = connessioneMySQL
Riga 25:
Riga 26: Dim dtr4 As MySqlClient.MySqlDataReader
Riga 27: Dim sql4 As New MySqlClient.MySqlCommand
Riga 28: sql4.Connection = connessioneMySQL1
Riga 29:
Riga 30: Dim dtr5 As MySqlClient.MySqlDataReader
Riga 31: Dim sql5 As New MySqlClient.MySqlCommand
Riga 32: sql5.Connection = connessioneMySQL2
Riga 33:
Riga 34: connessioneMySQL.Open()
Riga 35: connessioneMySQL1.Open()
Riga 36: connessioneMySQL2.Open()
Riga 37:
Riga 38: Dim sessionContentPreference As String = ""
Riga 39: Try
Riga 40: If ClientSite.RequestUrlValuePar("custom_selection") <> "" Then
Riga 41: Dim tempValue As String = ""
Riga 42: If ClientSite.RequestUrlValuePar("custom_selection") <> "" Then
Riga 43: tempValue = ClientSite.RequestUrlValuePar("custom_selection").Trim
Riga 44: If tempValue.ToString.Contains("|") Then
Riga 45: tempValue = tempValue.ToString.Split("|")(0)
Riga 46: End If
Riga 47: sessionContentPreference = tempValue
Riga 48: '' ATTIVARE IN CASO DI PROFINLING DEL SITO // ClientSite.setCookieValue("csite", sessionContentPreference)
Riga 49: End If
Riga 50: ElseIf ClientSite.getCookieValue("csite") <> "" Then
Riga 51: sessionContentPreference = ClientSite.getCookieValue("csite")
Riga 52: End If
Riga 53: If Request.Url.ToString.Contains("index.aspx") And sessionContentPreference <> "" Then
Riga 54: 'Response.Redirect("/" + RequestUrlNamePar())
Riga 55:
Riga 56: Dim newurl As String = ""
Riga 57: sql3.CommandText = "SELECT titolo FROM custom_selection_desc,custom_selection WHERE custom_selection.id=custom_selection_desc.id_customselection and custom_selection.attivo='S' AND custom_selection.destination='S' AND custom_selection.visibile='S' AND custom_selection.id='" + ClientSite.valida_codice(sessionContentPreference) + "' AND custom_selection_desc.lingua='" + ClientSite.valida_codice(lingua) + "' AND data_inizio<=NOW() AND data_fine>=NOW() LIMIT 0,1"
Riga 58: sql3.CommandTimeout = 600
Riga 59: dtr3 = sql3.ExecuteReader
Riga 60: If dtr3.Read Then
Riga 61: newurl = dtr3("titolo").ToString
Riga 62: End If
Riga 63: dtr3.Close()
Riga 64: If newurl <> "" Then
Riga 65: Try
Riga 66: connessioneMySQL.Close()
Riga 67: Catch ex As Exception
Riga 68:
Riga 69: End Try
Riga 70: Try
Riga 71:
Riga 72: connessioneMySQL1.Close()
Riga 73: Catch ex As Exception
Riga 74:
Riga 75: End Try
Riga 76: Try
Riga 77: connessioneMySQL2.Close()
Riga 78: Catch ex As Exception
Riga 79:
Riga 80: End Try
Riga 81: Response.Redirect("/" + ClientSite.GetValidSeoUrl(newurl))
Riga 82: Exit Sub
Riga 83:
Riga 84: End If
Riga 85:
Riga 86:
Riga 87: ElseIf Request.Url.ToString.Contains("landing.aspx") Then
Riga 88: If sessionContentPreference = "" Then
Riga 89: Response.Redirect("/")
Riga 90: Exit Sub
Riga 91: End If
Riga 92: End If
Riga 93: Catch ex As Exception
Riga 94: End Try
Riga 95: Dim urlcanonical As String = ""
Riga 96: Try
Riga 97:
Riga 98: urlcanonical = ClientSite.RequestRawUrlCanonical()
Riga 99: 'Request.Url.Scheme.ToString + "://" + Request.Url.Authority.ToString + Request.Url.AbsolutePath.ToString + ClientSite.RequestUrlNoAnalitycsSystem()
Riga 100: If Request.Url.ToString.Contains("item") And Request.Url.ToString.Contains("code") Then
Riga 101:
Riga 102: 'fix element item?code=123123
Riga 103: urlcanonical = ClientSite.RequestRawUrlItemSystem()
Riga 104: 'redirect to seo_title item
Riga 105:
Riga 106:
Riga 107: End If
Riga 108: Catch ex As Exception
Riga 109: End Try
Riga 110:
Riga 111: If Not ClientSite.Data.GlobalSiteDataSet Then
Riga 112: ClientSite.Data.UpdateData(False)
Riga 113: End If
Riga 114: Try
Riga 115: If sessionContentPreference = "" And Request.Url.ToString.Contains("item.aspx") Then
Riga 116:
Riga 117: Dim itemCsite As String = ""
Riga 118: Try
Riga 119: itemCsite = ClientSite.valida_codice(Request("code").ToString.Trim.ToLower)
Riga 120: Catch ex As Exception
Riga 121: End Try
Riga 122: If itemCsite = "" Then
Riga 123: Try
Riga 124: itemCsite = Request.RawUrl.ToString.ToLower.Substring(6)
Riga 125: Catch ex As Exception
Riga 126: End Try
Riga 127: End If
Riga 128: sql3.CommandText = "select * from articoli_attributi where codice_articolo='" + itemCsite.Replace("'", "''") + "' and codice_attributo='custom_selection' and valore<>'' limit 0,1"
Riga 129: dtr3 = sql3.ExecuteReader
Riga 130: If dtr3.Read Then
Riga 131: sessionContentPreference = dtr3("valore").ToString()
Riga 132: End If
Riga 133: dtr3.Close()
Riga 134: ''//attivare in caso di profiling del sito ClientSite.setCookieValue("csite", sessionContentPreference)
Riga 135: End If
Riga 136: Catch ex As Exception
Riga 137:
Riga 138: End Try
Riga 139: Dim arrSeo As ArrayList = ClientSite.Seo.GetSeoPage()
Riga 140:
Riga 141: Dim seoH1 As String = ""
Riga 142: Dim seoH2 As String = ""
Riga 143: Dim seoH3 As String = ""
Riga 144: Dim seoTitle As String = ""
Riga 145: Dim seoDescription As String = ""
Riga 146: Dim seoTesto As String = ""
Riga 147: Dim seoTagScript As String = ""
Riga 148:
Riga 149: 'title
Riga 150: seoTitle = arrSeo(0).ToString
Riga 151:
Riga 152: If seoTitle = "" Then
Riga 153: seoTitle = ClientSite.SITO_NOME
Riga 154: End If
Riga 155:
Riga 156:
Riga 157: 'description
Riga 158: seoDescription = arrSeo(1).ToString
Riga 159: If seoDescription = "" Then
Riga 160: seoDescription = ClientSite.SITO_NOME
Riga 161: End If
Riga 162: 'h1
Riga 163: seoH1 = arrSeo(2).ToString
Riga 164: seoTesto = arrSeo(4).ToString
Riga 165: 'seotag
Riga 166: seoTagScript = arrSeo(3).ToString()
Riga 167:
Riga 168: seoH2 = arrSeo(6).ToString
Riga 169: seoH3 = arrSeo(7).ToString
Riga 170:
Riga 171: Dim cliente As String = mailUtente
Riga 172: 'impostare lista_desideri
Riga 173:
Riga 174: Dim tipo_carrello As String = "lista_desideri"
Riga 175:
Riga 176: Dim tot_qudes As Integer = 0
Riga 177:
Riga 178: Dim tot_qu As Integer = 0
Riga 179:
Riga 180: If cliente = "" Then
Riga 181: tipo_carrello = "lista_desideri_prov"
Riga 182: cliente = ClientSite.getCookieValue("carr_prov")
Riga 183: If cliente = "" Then
Riga 184: cliente = ClientSite.codice_provvissorio()
Riga 185: Response.Cookies("carr_prov").Value = cliente
Riga 186: Response.Cookies("carr_prov").Expires = DateTime.Now.AddYears(1)
Riga 187: End If
Riga 188: End If
Riga 189:
Riga 190: Dim wishArticoli As New List(Of String)()
Riga 191:
Riga 192: 'sql3.CommandText = "SELECT IFNULL(COUNT(DISTINCT articolo),0) as tot_articoli FROM " + tipo_carrello + " WHERE cliente='" + cliente.Replace("'", "''") + "' "
Riga 193:
Riga 194: 'If dtr3.Read Then
Riga 195: ' tot_qudes = dtr3("tot_articoli")
Riga 196: 'End If
Riga 197:
Riga 198: '** Recupera il count ed il codice dei prodotti in wishlist
Riga 199:
Riga 200: sql3.CommandText = "SELECT codice_articolo, (SELECT IFNULL(COUNT(DISTINCT articolo),0) FROM " + tipo_carrello + " WHERE cliente='" + cliente.Replace("'", "''") + "') as tot_articoli FROM " + tipo_carrello + " WHERE cliente='" + cliente.Replace("'", "''") + "'"
Riga 201: dtr3 = sql3.ExecuteReader()
Riga 202: While dtr3.Read()
Riga 203: wishArticoli.Add(dtr3("codice_articolo").ToString())
Riga 204: tot_qudes = dtr3("tot_articoli")
Riga 205: End While
Riga 206:
Riga 207:
Riga 208:
Riga 209: dtr3.Close()
Riga 210:
Riga 211: If ClientSite.isBannerVuoti(lingua) Then
Riga 212: ClientSite.UpdateBanner()
Riga 213: End If
Riga 214:
Riga 215: Dim lista_banner = ClientSite.GetArrBannerByID("banner", lingua)
Riga 216:
Riga 217: Dim lista_link = ClientSite.GetArrBannerByID("link", lingua)
Riga 218: Dim lista_titoli = ClientSite.GetArrBannerByID("titoli", lingua)
Riga 219: Dim lista_titoli_colori = ClientSite.GetArrBannerByID("titoli_colori", lingua)
Riga 220: Dim lista_sottotitoli = ClientSite.GetArrBannerByID("sottotitoli", lingua)
Riga 221: Dim lista_sottotitoli_colori = ClientSite.GetArrBannerByID("sottotitoli_colori", lingua)
Riga 222: Dim lista_slogan = ClientSite.GetArrBannerByID("slogan", lingua)
Riga 223: Dim lista_slogan_colori = ClientSite.GetArrBannerByID("slogan_colori", lingua)
Riga 224: Dim lista_pulsanti = ClientSite.GetArrBannerByID("pulsanti", lingua)
Riga 225: Dim lista_pulsanti_colori = ClientSite.GetArrBannerByID("pulsanti_colori", lingua)
Riga 226: Dim lista_pulsanti_colori_sfondo = ClientSite.GetArrBannerByID("pulsanti_colori_sfondo", lingua)
Riga 227: Dim lista_colori = ClientSite.GetArrBannerByID("colori", lingua)
Riga 228:
Riga 229: ' Dim caroselloProdotti As ArrayList
Riga 230: If Request.Url.ToString.ToLower.Trim.Contains("index") Then
Riga 231: 'If ClientSite.getListRandomItem.Count = 0 Then
Riga 232: ' ClientSite.GetRandomItem(40, "IT", 1.0, "€")
Riga 233: ' End If
Riga 234: ' caroselloProdotti = ClientSite.getListRandomItem
Riga 235: End If
Riga 236:
Riga 237: Dim cart_confirm = False
Riga 238:
Riga 239: '''''CALCOLO CARRELLO
Riga 240:
Riga 241: Dim clienteCar As String = mailUtente
Riga 242:
Riga 243: Dim tipo_carrelloCar As String = "carrello"
Riga 244:
Riga 245: If clienteCar = "" Then
Riga 246: tipo_carrelloCar = "carrello_prov"
Riga 247: clienteCar = ClientSite.getCookieValue("carr_prov")
Riga 248:
Riga 249: If clienteCar = "" Then
Riga 250: clienteCar = ClientSite.codice_provvissorio()
Riga 251: Response.Cookies("carr_prov").Value = clienteCar
Riga 252: Response.Cookies("carr_prov").Expires = DateTime.Now.AddYears(1)
Riga 253: End If
Riga 254: End If
Riga 255: Dim tot_quCar As Integer = 0
Riga 256:
Riga 257: Dim carr_pienoCar As Boolean = False
Riga 258: Dim ricaricaCar As Boolean = False
Riga 259: Dim mini_cart_conta_articoli As Integer = 0
Riga 260: Dim totale_generale As Decimal = 0
Riga 261: Dim stringa_articoli As String = ""
Riga 262:
Riga 263: If clienteCar <> "" Then
Riga 264:
Riga 265: 'Dim car_coupon As String = ""
Riga 266: 'Dim id_car_coupon As String = ""
Riga 267:
Riga 268: 'sql.CommandText = "SELECT MAX(coupon) as coupon FROM carrello WHERE cliente='" + clienteCar.Replace("'", "''") + "'"
Riga 269: 'dtr = sql.ExecuteReader
Riga 270: 'If dtr.Read Then
Riga 271: ' car_coupon = dtr("coupon").ToString
Riga 272: 'End If
Riga 273: 'dtr.Close()
Riga 274:
Riga 275: 'If car_coupon <> "" Then
Riga 276: ' sql.CommandText = "SELECT MAX(id_coupon) as id_coupon FROM carrello WHERE coupon='" + car_coupon.Replace("'", "''") + "' AND cliente='" + clienteCar.Replace("'", "''") + "'"
Riga 277: ' dtr = sql.ExecuteReader
Riga 278: ' If dtr.Read Then
Riga 279: ' id_car_coupon = dtr("id_coupon").ToString
Riga 280:
Riga 281: ' End If
Riga 282: ' dtr.Close()
Riga 283: 'End If
Riga 284:
Riga 285: 'If id_car_coupon = "" Then
Riga 286: ' id_car_coupon = "null"
Riga 287: 'End If
Riga 288:
Riga 289: 'sql.CommandText = "UPDATE carrello SET id_coupon=" + id_car_coupon + ", coupon='" + car_coupon.Replace("'", "''") + "' WHERE cliente='" + clienteCar.Replace("'", "''") + "'"
Riga 290: 'sql.ExecuteNonQuery()
Riga 291:
Riga 292: sql3.CommandText = "SELECT * FROM " + tipo_carrelloCar + " WHERE cliente='" + clienteCar.Replace("'", "''") + "'"
Riga 293: dtr3 = sql3.ExecuteReader()
Riga 294: While dtr3.Read()
Riga 295:
Riga 296: Dim lettoCart As Boolean = False
Riga 297: sql4.CommandText = "SELECT * FROM catalogo_" + lingua + ", articoli_child WHERE catalogo_" + lingua + ".CODICE=articoli_child.CODICE AND articoli_child.DISPO>0 AND articoli_child.ID='" + dtr3("id_taglia").ToString + "'"
Riga 298: dtr4 = sql4.ExecuteReader
Riga 299: If dtr4.Read Then
Riga 300: lettoCart = True
Riga 301: End If
Riga 302:
Riga 303: Try
Riga 304: dtr4.Close()
Riga 305: Catch ex As Exception
Riga 306: End Try
Riga 307: If Not lettoCart Then
Riga 308:
Riga 309: sql5.CommandText = "DELETE FROM " + tipo_carrelloCar + " WHERE id=" + dtr3("id").ToString + " AND cliente='" + clienteCar.Replace("'", "''") + "'"
Riga 310: sql5.ExecuteNonQuery()
Riga 311:
Riga 312: End If
Riga 313:
Riga 314: End While
Riga 315: dtr3.Close()
Riga 316:
Riga 317: sql3.CommandText = "SELECT articoli_child.DISPO, " + tipo_carrelloCar + ".quantita, " + tipo_carrelloCar + ".ID AS ID_CART, articoli_child.ID as id_taglia, articoli_child.PREZZO_NETTO FROM catalogo_" + lingua + ", articoli_child, " + tipo_carrelloCar + " WHERE catalogo_" + lingua + ".CODICE=articoli_child.CODICE AND articoli_child.DISPO>0 AND " + tipo_carrelloCar + ".ID_TAGLIA=articoli_child.ID AND " + tipo_carrelloCar + ".`cliente` = '" + clienteCar.Replace("'", "''") + "'"
Riga 318: 'Response.write(sql.CommandText)
Riga 319: dtr3 = sql3.ExecuteReader
Riga 320:
Riga 321: While dtr3.Read()
Riga 322:
Riga 323: Dim qu As Integer = dtr3("quantita")
Riga 324:
Riga 325: If dtr3("quantita") > dtr3("DISPO") Then
Riga 326:
Riga 327: sql4.CommandText = "UPDATE " + tipo_carrelloCar + " SET quantita=" + dtr3("DISPO").ToString + " WHERE id=" + dtr3("ID_CART").ToString
Riga 328: sql4.ExecuteNonQuery()
Riga 329:
Riga 330: qu = dtr3("DISPO")
Riga 331:
Riga 332: ricaricaCar = True
Riga 333:
Riga 334: End If
Riga 335: If qu > 0 Then
Riga 336: carr_pienoCar = True
Riga 337:
Riga 338: totale_generale += (qu * dtr3("PREZZO_NETTO"))
Riga 339: tot_quCar += qu
Riga 340:
Riga 341: mini_cart_conta_articoli += qu
Riga 342:
Riga 343: End If
Riga 344: End While
Riga 345: dtr3.Close()
Riga 346:
Riga 347: End If
Riga 348:
Riga 349:
Riga 350: ' listOfAsyncHtml.Add("footer_async", ClientSite.AsyncGetHtmlContentAsync("footer_async", lingua,, False))
Riga 351:
Riga 352: ''''FINE CALCOLO CARRELLO
Riga 353:
Riga 354: %>
Riga 355: <!doctype html>
Riga 356: <html lang="<%= (lingua.ToLower) %>">
Riga 357: <head>
Riga 358: <link rel="dns-prefetch" href="https://fonts.googleapis.com/" >
Riga 359: <%
Riga 360: Dim mappaHead As New List(Of Schema.NET.IBreadcrumbList)
Riga 361: Dim mappaHeadString = ""
Riga 362: Dim mappaHeadCount As Integer = 1
Riga 363: %>
Riga 364:
Riga 365:
Riga 366: <script>(function (w, d, s, l, i) { w[l] = w[l] || []; w[l].push({ 'gtm.start': new Date().getTime(), event: 'gtm.js' }); var f = d.getElementsByTagName(s)[0], j = d.createElement(s), dl = l != 'dataLayer' ? '&l=' + l : ''; j.async = true; j.src = 'https://www.googletagmanager.com/gtm.js?id=' + i + dl; f.parentNode.insertBefore(j, f); })(window, document, 'script', 'dataLayer', 'GTM-WPVFPRW6');</script>
Riga 367: <base href="<%= Request.Url.Scheme.ToString + "://" + Request.Url.Authority + "/" %>"/>
Riga 368: <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
Riga 369:
Riga 370: <!--Required Meta Tags-->
Riga 371: <meta charset="utf-8">
Riga 372: <meta http-equiv="x-ua-compatible" content="ie=edge">
Riga 373: <meta name="viewport" content="width=device-width, initial-scale=1, maximum-scale=1">
Riga 374:
Riga 375: <title><%: seoTitle %></title>
Riga 376: <meta name="description" content="<%: seoDescription %>" />
Riga 377:
Riga 378: <link rel="canonical" href="<%= urlcanonical %>">
Riga 379:
Riga 380: <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
Riga 381:
Riga 382:
Riga 383:
Riga 384: <%
Riga 385: Response.Write(ClientSite.Seo.metaRobots(Request))
Riga 386:
Riga 387: %>
Riga 388:
Riga 389: <meta property="og:locale" content="<%= lingua.ToLower + "-" + lingua.ToUpper %>">
Riga 390: <meta property="og:type" content="website">
Riga 391: <meta property="og:title" content="<%= seoTitle %>">
Riga 392: <meta property="og:description" content="<%= seoDescription %>">
Riga 393: <meta property="og:url" content="<%= urlcanonical %>">
Riga 394: <meta property="og:site_name" content="<%= ClientSite.SITO_NOME %>">
Riga 395: <meta name="twitter:card" content="summary">
Riga 396: <meta name="twitter:description" content="<%= seoDescription %>">
Riga 397: <meta name="twitter:title" content="<%= seoTitle %>">
Riga 398: <meta name="twitter:image" content="<%= ClientSite.SITO_URL + lista_banner(1)%>">
Riga 399: <meta property="og:image" content="<%= ClientSite.SITO_URL + lista_banner(1)%>">
Riga 400: <meta name="author" content="Syfer">
Riga 401: <!-- Favicon
Riga 402: <link rel="apple-touch-icon" sizes="180x180" href="/favicon/apple-touch-icon.png">
Riga 403: <link rel="icon" type="image/png" sizes="32x32" href="/favicon/favicon-32x32.png">
Riga 404: <link rel="icon" type="image/png" sizes="16x16" href="/favicon/favicon-16x16.png">
Riga 405: <link rel="manifest" href="/favicon/site.webmanifest"> -->
Riga 406: <link rel="shortcut icon" href="/favicon.ico">
Riga 407: <!--<meta name="msapplication-TileColor" content="#ffffff">
Riga 408: <meta name="msapplication-TileImage" content="/favicon/mstile-144x144.png">
Riga 409: <meta name="msapplication-config" content="/favicon/browserconfig.xml">
Riga 410: <meta name="theme-color" content="#ffffff"> -->
Riga 411: <meta name="apple-mobile-web-app-title" content="<%= ClientSite.SITO_NOME %>">
Riga 412: <meta name="application-name" content="<%= ClientSite.SITO_NOME %>">
Riga 413:
Riga 414: <!-- Plugins CSS -->
Riga 415:
Riga 416: <link href="<%= ClientSite.sourceTimeVersion("assets/css/selectize.min.css")%>" rel="stylesheet" async/>
Riga 417:
Riga 418: <link rel="stylesheet" href="<%= ClientSite.sourceTimeVersion("assets/css/plugins.min.css") %>" async/>
Riga 419: <!-- Main Style CSS -->
Riga 420: <link rel="stylesheet" href="<%= ClientSite.sourceTimeVersion("assets/css/style.min.css") %>" async/>
Riga 421: <link rel="stylesheet" href="<%= ClientSite.sourceTimeVersion("assets/css/responsive.min.css") %>" async/>
Riga 422: <link rel="stylesheet" href="<%= ClientSite.sourceTimeVersion("assets/css/syfer.min.css") %>" async/>
Riga 423: <script type="text/javascript" src="<%= ClientSite.sourceTimeVersion("assets/js/vendor/jquery-min.js") %>" defer></script>
Riga 424:
Riga 425:
Riga 426: <asp:PlaceHolder runat="server"></asp:PlaceHolder>
Riga 427:
Riga 428: </head>
Riga 429: <body class="template-index index-demo4">
Riga 430: <!-- Google Tag Manager (noscript) --><noscript><iframe src="https://www.googletagmanager.com/ns.html?id=GTM-K9SWM8C" height="0" width="0" style="display:none;visibility:hidden"></iframe></noscript><!-- End Google Tag Manager (noscript) -->
Riga 431: <!-- Page Loader -->
Riga 432: <div id="pre-loader"><img src="assets/images/loader.gif" alt="Loading..." /></div>
Riga 433: <!-- End Page Loader -->
Riga 434:
Riga 435: <!--Page Wrapper-->
Riga 436: <div class="page-wrapper">
Riga 437: <!--Header-->
Riga 438: <header class="header header-main mih-70 d-flex align-items-center header-4" id="header">
Riga 439: <div class="container">
Riga 440: <div class="row">
Riga 441:
Riga 442: <!--Logo / Menu Toggle-->
Riga 443: <div class="col-6 col-sm-6 col-md-6 col-lg-2 align-self-center justify-content-start d-flex">
Riga 444: <!--Mobile Toggle-->
Riga 445: <button type="button" class="btn--link site-header__menu js-mobile-nav-toggle mobile-nav--open me-3 d-lg-none" onclick="reinit_menu_mobile() "><i class="icon an an-times-l"></i><i class="icon an an-bars-l"></i></button>
Riga 446: <!--End Mobile Toggle-->
Riga 447: <!--Logo-->
Riga 448: <div class="logo mx-lg-auto"><a href="/">
Riga 449: <img class="logo-img " loading="lazy" src="/images/logo.png" alt="<%Response.Write(ClientSite.SITO_NOME) %>" title="<%Response.Write(ClientSite.SITO_NOME) %>" /><span class="logo-txt d-none"><%Response.Write(ClientSite.SITO_NOME) %></span></a></div>
Riga 450: <!--End Logo-->
Riga 451: </div>
Riga 452: <!--End Logo / Menu Toggle-->
Riga 453:
Riga 454: <%if not isBrowsedFromMobile Then %>
Riga 455: <!--Main Navigation Desktop-->
Riga 456: <%= ClientSite.getHtmlContentAsync("head_menu_async", lingua,, ) %>
Riga 457: <% else %>
Riga 458: <html-async-filter id="head_menu_async"></html-async-filter>
Riga 459: <!-- End Main Navigation Desktop-->
Riga 460: <%End if %>
Riga 461:
Riga 462: <!--Right Action-->
Riga 463: <div class="col-6 col-sm-6 col-md-6 col-lg-2 align-self-center icons-col d-flex justify-content-end">
Riga 464: <!--Search-->
Riga 465: <div class="site-search iconset"><i class="icon an an-search-l"></i><span class="tooltip-label"><%= ClientSite.dammi_traduzione_global(lingua, 4) %></span></div>
Riga 466: <!--End Search-->
Riga 467: <!--Setting Dropdown-->
Riga 468: <div class="user-link iconset">
Riga 469: <%if mailUtente = "" Then %> <a href="account"><%End if %>
Riga 470: <i class="icon an an-user-expand"></i><span class="tooltip-label"><% Response.Write(ClientSite.dammi_traduzione(lingua, 68)) %></span>
Riga 471: <%if mailUtente = "" Then %></a><%End if %>
Riga 472: </div>
Riga 473: <%if mailUtente <> "" Then %>
Riga 474: <div id="userLinks">
Riga 475: <ul class="user-links">
Riga 476:
Riga 477: <li>
Riga 478: <a class="<% If urlPagina.Contains("order") Then %>active<% End if %>"
Riga 479: title="<%= ClientSite.dammi_traduzione(lingua, 278) %>" href="/order">
Riga 480: <%= ClientSite.dammi_traduzione(lingua, 278) %></a>
Riga 481: </li>
Riga 482: <li>
Riga 483: <a class="<% If urlPagina.Contains("refund") Then %>active<% End if %>"
Riga 484: title="<%= ClientSite.dammi_traduzione(lingua, 279) %>" href="/refund">
Riga 485: <%= ClientSite.dammi_traduzione(lingua, 279) %></a>
Riga 486: </li>
Riga 487: <li>
Riga 488: <a class="<% If urlPagina.Contains("user") Then %>active<% End if %>"
Riga 489: title="<%= ClientSite.dammi_traduzione(lingua, 281) %>" href="/user">
Riga 490: <%= ClientSite.dammi_traduzione(lingua, 281) %></a>
Riga 491: </li>
Riga 492: <!--<li>
Riga 493: <a class="<% If urlPagina.Contains("address") Then %>active<% End if %>"
Riga 494: title="<%= ClientSite.dammi_traduzione(lingua, 282) %>" href="/address">
Riga 495: <%= ClientSite.dammi_traduzione(lingua, 282) %></a>
Riga 496: </li>
Riga 497: <li>
Riga 498: <a class="<% If urlPagina.Contains("preference_promotion") Then %>active<% End if %>"
Riga 499: title="<%= ClientSite.dammi_traduzione(lingua, 283) %>" href="/preference_promotion">
Riga 500: <%= ClientSite.dammi_traduzione(lingua, 283) %></a>
Riga 501: </li>-->
Riga 502: <li>
Riga 503: <a class="<% If urlPagina.Contains("password") Then %>active<% End if %>"
Riga 504: title="<%= ClientSite.dammi_traduzione(lingua, 137) %>" href="/password">
Riga 505: <%= ClientSite.dammi_traduzione(lingua, 137) %></a>
Riga 506: </li>
Riga 507: <li>
Riga 508: <a class="<% If urlPagina.Contains("help") Then %>active<% End if %>"
Riga 509: title="<%= ClientSite.dammi_traduzione(lingua, 287) %>" href="/help">
Riga 510: <%= ClientSite.dammi_traduzione(lingua, 287) %></a>
Riga 511: </li>
Riga 512: <li>
Riga 513: <a class="<% If urlPagina.Contains("logout") Then %>active<% End if %>"
Riga 514: title="<%= ClientSite.dammi_traduzione(lingua, 288) %>" href="/logout">
Riga 515: <%= ClientSite.dammi_traduzione(lingua, 288) %></a>
Riga 516: </li>
Riga 517:
Riga 518: </ul>
Riga 519: </div>
Riga 520: <%end if %>
Riga 521: <!--End Setting Dropdown-->
Riga 522: <!--Wishlist-->
Riga 523: <div class="wishlist-link iconset display-block">
Riga 524: <a href="wishlist"><i class="icon an an-heart-l"></i><span class="wishlist-count counter d-flex-center justify-content-center position-absolute translate-middle rounded-circle"><%= tot_qudes %></span><span class="tooltip-label"><%= Clientsite.dammi_traduzione_global(lingua, 54) %></span></a>
Riga 525: </div>
Riga 526: <!--End Wishlist-->
Riga 527:
Riga 528: <!--Minicart Drawer-->
Riga 529: <div class="header-cart iconset">
Riga 530: <a href="cart" class="site-header__cart <%If False then %> btn-minicart<%end if %>" <%IF False Then %> <%' #TODO: IMPLEMT IN ASYNC%> data-bs-toggle="modal" data-bs-target="#minicart-drawer" <%end if %>>
Riga 531: <i class="icon an an-sq-bag"></i><span class="site-cart-count counter d-flex-center justify-content-center position-absolute translate-middle rounded-circle"><%= tot_quCar %></span><span class="tooltip-label"><%= ClientSite.dammi_traduzione(lingua, 536) %></span>
Riga 532: </a>
Riga 533: </div>
Riga 534: <!--End Minicart Drawer-->
Riga 535: <!--Setting Dropdown-->
Riga 536:
Riga 537: </div>
Riga 538: <!--End Right Action-->
Riga 539: </div>
Riga 540:
Riga 541: </div>
Riga 542:
Riga 543:
Riga 544:
Riga 545: <!--Search Popup-->
Riga 546: <div id="search-popup" class="search-drawer">
Riga 547: <div class="container">
Riga 548: <span class="closeSearch an an-times-l"></span>
Riga 549: <form class="form minisearch" id="header-search" action="/shop" method="get">
Riga 550: <label class="label"><span><%= ClientSite.dammi_traduzione_global(lingua, 4) %></span></label>
Riga 551: <div class="control">
Riga 552: <div class="searchField">
Riga 553: <div class="search-category" style="display:none">
Riga 554: <select id="rgsearch-category" data-default="All Categories">
Riga 555: <option value="" label="All Categories" selected="selected">All Categories</option>
Riga 556: <optgroup id="rgsearch-shop" label="Shop">
Riga 557: <option value="0">- All</option>
Riga 558: <option value="1">- Men</option>
Riga 559: <option value="2">- Women</option>
Riga 560: <option value="3">- Shoes</option>
Riga 561: <option value="4">- Blouses</option>
Riga 562: <option value="5">- Pullovers</option>
Riga 563: <option value="6">- Bags</option>
Riga 564: <option value="7">- Accessories</option>
Riga 565: </optgroup>
Riga 566: </select>
Riga 567: </div>
Riga 568: <div class="input-box">
Riga 569: <button type="submit" title="<%= ClientSite.dammi_traduzione_global(lingua, 4) %>" class="action search" ><i class="icon an an-search-l"></i></button>
Riga 570: <input type="text" name="q" value="<%
Riga 571: Try
Riga 572: Response.Write(Request("q").ToString)
Riga 573: Catch ex As Exception
Riga 574: Response.Write("")
Riga 575: End Try
Riga 576: %>" placeholder="<%= ClientSite.dammi_traduzione_global(lingua, 4) %>" class="input-text" id="query-search">
Riga 577: </div>
Riga 578: </div>
Riga 579: </div>
Riga 580: </form>
Riga 581: </div>
Riga 582: </div>
Riga 583: <!--End Search Popup-->
Riga 584: </header>
Riga 585:
Riga 586:
Riga 587:
Riga 588:
Riga 589: <% If isBrowsedFromMobile Then %>
Riga 590: <%= ClientSite.getHtmlContentAsync("head_menu_mobile_async", lingua,, ) %>
Riga 591: <!--html-async-filter id="head_menu_mobile_async"></!--html-async-filter>
Riga 592: <%end if %>
Riga 593:
Riga 594: <!--Body Container-->
Riga 595: <div id="page-content">
Riga 596:
|