Line 1: #ExternalChecksum("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm","{ff1816ec-aa5e-4d10-87f7-6f4963833460}","B75F6539D78E32B600041EAABD31C9ECBE2C8DA0")
Line 2: '------------------------------------------------------------------------------
Line 3: ' <auto-generated>
Line 4: ' This code was generated by a tool.
Line 5: ' Runtime Version:4.0.30319.42000
Line 6: '
Line 7: ' Changes to this file may cause incorrect behavior and will be lost if
Line 8: ' the code is regenerated.
Line 9: ' </auto-generated>
Line 10: '------------------------------------------------------------------------------
Line 11:
Line 12: Option Strict Off
Line 13: Option Explicit On
Line 14:
Line 15: Imports Microsoft.VisualBasic
Line 16: Imports System
Line 17: Imports System.Collections
Line 18: Imports System.Collections.Generic
Line 19: Imports System.Collections.Specialized
Line 20: Imports System.ComponentModel.DataAnnotations
Line 21: Imports System.Configuration
Line 22: Imports System.Linq
Line 23: Imports System.Text
Line 24: Imports System.Text.RegularExpressions
Line 25: Imports System.Web
Line 26: Imports System.Web.Caching
Line 27: Imports System.Web.DynamicData
Line 28: Imports System.Web.Profile
Line 29: Imports System.Web.Security
Line 30: Imports System.Web.SessionState
Line 31: Imports System.Web.UI
Line 32: Imports System.Web.UI.HtmlControls
Line 33: Imports System.Web.UI.WebControls
Line 34: Imports System.Web.UI.WebControls.WebParts
Line 35: Imports System.Xml.Linq
Line 36:
Line 37: Namespace ASP
Line 38:
Line 39: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 40: Public Class chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm
Line 41: Inherits Global.System.Web.UI.Page
Line 42: Implements System.Web.SessionState.IRequiresSessionState, System.Web.IHttpHandler
Line 43:
Line 44: Private Shared __PageInspector_BeginRenderTracingMethod As System.Reflection.MethodInfo = Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__PageInspector_LoadHelper("BeginRenderTracing")
Line 45:
Line 46: Private Shared __PageInspector_EndRenderTracingMethod As System.Reflection.MethodInfo = Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__PageInspector_LoadHelper("EndRenderTracing")
Line 47:
Line 48: Private Shared __initialized As Boolean
Line 49:
Line 50: Private Shared __stringResource As Object
Line 51:
Line 52: Private Shared __fileDependencies As Object
Line 53:
Line 54: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 55: Public Sub New()
Line 56: MyBase.New
Line 57: Dim dependencies() As String
Line 58: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm"
Line 59: If (Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__initialized = false) Then
Line 60: Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__stringResource = Me.ReadStringResource
Line 61: dependencies = New String(0) {}
Line 62: dependencies(0) = "~/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm"
Line 63: Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 64: Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__initialized = true
Line 65: End If
Line 66: Me.Server.ScriptTimeout = 30000000
Line 67: End Sub
Line 68:
Line 69: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 70: Get
Line 71: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 72: End Get
Line 73: End Property
Line 74:
Line 75: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 76: Get
Line 77: Return false
Line 78: End Get
Line 79: End Property
Line 80:
Line 81: Protected ReadOnly Property ApplicationInstance() As System.Web.HttpApplication
Line 82: Get
Line 83: Return CType(Me.Context.ApplicationInstance,System.Web.HttpApplication)
Line 84: End Get
Line 85: End Property
Line 86:
Line 87: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 88: Private Sub __BuildControlTree(ByVal __ctrl As chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm)
Line 89:
Line 90: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",1)
Line 91: Me.InitializeCulture
Line 92:
Line 93: #End ExternalSource
Line 94: __ctrl.SetRenderMethodDelegate(AddressOf Me.__Render__control1)
Line 95: End Sub
Line 96:
Line 97: Private Sub __Render__control1(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Line 98: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 0, 2604, true})
Line 99: Me.WriteUTF8ResourceString(__w, 0, 2626, false)
Line 100: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 101: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 2604, 6061, false})
Line 102:
Line 103: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",38)
Line 104:
Line 105: '*******************************************************************************************************************************************
Line 106: '*** Compatibilità set caratteri ***
Line 107: '*******************************************************************************************************************************************
Line 108: Response.ContentType = "text/html"
Line 109: Response.AddHeader "Content-Type", "text/html;charset=UTF-8"
Line 110: Response.CodePage = 65001
Line 111: Response.CharSet = "UTF-8"
Line 112: '*******************************************************************************************************************************************
Line 113: '*** Fine Compatibilità set caratteri ***
Line 114: '*******************************************************************************************************************************************
Line 115: '*******************************************************************************************************************************************
Line 116: '*** Vettore Lettere Iniziali ***
Line 117: '*******************************************************************************************************************************************
Line 118: Dim Lettere_Iniziali(25)
Line 119: Lettere_Iniziali(1)="A"
Line 120: Lettere_Iniziali(2)="B"
Line 121: Lettere_Iniziali(3)="C"
Line 122: Lettere_Iniziali(4)="D"
Line 123: Lettere_Iniziali(5)="E"
Line 124: Lettere_Iniziali(6)="F"
Line 125: Lettere_Iniziali(7)="G"
Line 126: Lettere_Iniziali(8)="I"
Line 127: Lettere_Iniziali(9)="J"
Line 128: Lettere_Iniziali(10)="L"
Line 129: Lettere_Iniziali(11)="M"
Line 130: Lettere_Iniziali(12)="N"
Line 131: Lettere_Iniziali(13)="O"
Line 132: Lettere_Iniziali(14)="P"
Line 133: Lettere_Iniziali(15)="Q"
Line 134: Lettere_Iniziali(16)="R"
Line 135: Lettere_Iniziali(17)="S"
Line 136: Lettere_Iniziali(18)="T"
Line 137: Lettere_Iniziali(19)="U"
Line 138: Lettere_Iniziali(20)="V"
Line 139: Lettere_Iniziali(21)="Z"
Line 140: '*******************************************************************************************************************************************
Line 141: '*** Fine Vettore Lettere Iniziali ***
Line 142: '*******************************************************************************************************************************************
Line 143: '*******************************************************************************************************************************************
Line 144: '*** Apertura Database e Acquisizione Lettera Comune ricercato ***
Line 145: '*******************************************************************************************************************************************
Line 146: Dim Con
Line 147: Dim Rs
Line 148: Set Con =Server.CreateObject("ADODB.Connection")
Line 149: Set Rs =Server.CreateObject("ADODB.Recordset")
Line 150: Nome_DB ="Chiese.accdb" '*** Nome Database ***
Line 151: Con.Open("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & server.MapPath("/") & "\DB\" & Nome_DB & "; Persist Security Info=False;")
Line 152: lettera= request.querystring("voce")
Line 153: pro = request.querystring("scelta")
Line 154: IF PRO ="" THEN PRO=request.querystring("scelta1")
Line 155: pro1 =request.querystring ("scelta1")
Line 156: 'response.write (lettera)
Line 157: '*******************************************************************************************************************************************
Line 158: '*** Fine Apertura Database e Acquisizione Lettera Comune ricercato ***
Line 159: '*******************************************************************************************************************************************
Line 160: '*******************************************************************************************************************************************
Line 161: '*** Acquisizione Lettere Presenti ***
Line 162: '*******************************************************************************************************************************************
Line 163: SQL ="SELECT Left([LOCALITA],1) AS Iniziale FROM CHIESE where provincia ='" & pro & "' GROUP BY Left([LOCALITA],1);"
Line 164: SQLF ="SELECT Left([Frazione],1) AS Iniziale FROM CHIESE where provincia ='" & pro & "' GROUP BY Left([Frazione],1);"
Line 165: Set Rs=con.execute(SQL)
Line 166: Set RsF=con.execute(SQLF)
Line 167: Dim Iniziale(50)
Line 168: Dim InizialeK(50)
Line 169: Numero_LettereC=0
Line 170: Numero_LettereF=0
Line 171: While Not rs.EOF
Line 172: Numero_LettereC=Numero_LettereC+1
Line 173: Iniziale(Numero_LettereC)=Ucase(rs("Iniziale"))
Line 174: 'response.write Inizialei(Numero_LettereC)
Line 175: rs.MoveNext
Line 176: Wend
Line 177: While Not rsF.EOF
Line 178: Numero_LettereF=Numero_LettereF+1
Line 179: Iniziale(Numero_LettereF+Numero_LettereC)=Ucase(rsF("Iniziale"))
Line 180: 'response.write InizialeJ(Numero_LettereF)
Line 181: rsF.MoveNext
Line 182: Wend
Line 183: 'response.write Numero_LettereC &"<br>"
Line 184: 'response.write Numero_LettereF &"<br>"
Line 185: If Numero_LettereC > 0 then
Line 186: rs.MoveFirst
Line 187: End If
Line 188: If Numero_LettereF > 0 then
Line 189: rsF.MoveFirst
Line 190: End If
Line 191: dim strBuf1
Line 192: ' controlla che arrStrings sia effettivamente un array
Line 193: if isarray(Iniziale) then
Line 194: dim v, z
Line 195: ' per ogni stringa dell'array
Line 196: for v=0 to Numero_LettereC + Numero_lettereF-1
Line 197: ' scorri tutte le stringhe dell'array che non sono ancora ordinate
Line 198: for z=0 to Numero_LettereC + Numero_lettereF-1-v
Line 199: ' se la stringa attuale è "maggiore" della stringa successiva...
Line 200: if Iniziale(z)>Iniziale(z+1) then
Line 201: ' ...inverti la posizione delle due stringhe
Line 202: strBuf1 = Iniziale(z+1)
Line 203: Iniziale(z+1) = Iniziale(z)
Line 204: Iniziale(z) = strBuf1
Line 205: end if
Line 206: next
Line 207: next
Line 208: end if
Line 209: For k = 1 to Numero_LettereC + Numero_lettereF
Line 210: If Iniziale(k) = Iniziale (k+1) then
Line 211: Iniziale (k+1) = null
Line 212: End If
Line 213: Next
Line 214: ik=0
Line 215: For k = 1 to Numero_LettereC + Numero_lettereF
Line 216: If Iniziale(k) > "" then
Line 217: ik=ik+1
Line 218: InizialeK (ik) = Iniziale(k)
Line 219: End If
Line 220: Next
Line 221: For k = 1 to ik
Line 222: Iniziale(k) = InizialeK(k)
Line 223: ' response.write InizialeK(k) & "<br>"
Line 224: Next
Line 225: '*******************************************************************************************************************************************
Line 226: '*** Fine Acquisizione Lettere Presenti ***
Line 227: '*******************************************************************************************************************************************
Line 228:
Line 229:
Line 230: #End ExternalSource
Line 231: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 232: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 8665, 447, true})
Line 233: Me.WriteUTF8ResourceString(__w, 2626, 447, true)
Line 234: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 235: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 9112, 7, false})
Line 236:
Line 237: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",175)
Line 238: __w.Write(bg)
Line 239:
Line 240:
Line 241: #End ExternalSource
Line 242: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 243: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 9119, 7051, true})
Line 244: Me.WriteUTF8ResourceString(__w, 3073, 7052, false)
Line 245: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 246: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 16170, 355, false})
Line 247:
Line 248: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",238)
Line 249:
Line 250: if pro > "" then
Line 251: if pro = "AT" then Provincia="Asti"
Line 252: if pro = "AL" then Provincia="Alessandria"
Line 253: if pro = "BI" then Provincia="Biella"
Line 254: if pro = "CN" then Provincia="Cuneo"
Line 255: if pro = "NO" then Provincia="Novara"
Line 256: if pro = "TO" then Provincia="Torino"
Line 257: if pro = "VB" then Provincia="Verbania Cusio Ossola"
Line 258: if pro = "VC" then Provincia="Vercelli"
Line 259:
Line 260:
Line 261: #End ExternalSource
Line 262: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 263: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 16525, 447, true})
Line 264: Me.WriteUTF8ResourceString(__w, 10125, 447, true)
Line 265: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 266: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 16972, 14, false})
Line 267:
Line 268: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",256)
Line 269: __w.Write(provincia)
Line 270:
Line 271:
Line 272: #End ExternalSource
Line 273: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 274: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 16986, 537, true})
Line 275: Me.WriteUTF8ResourceString(__w, 10572, 537, true)
Line 276: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 277: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 17523, 119, false})
Line 278:
Line 279: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",267)
Line 280:
Line 281: For i = 1 to 6
Line 282: Presente=0
Line 283:
Line 284:
Line 285: #End ExternalSource
Line 286:
Line 287: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",271)
Line 288:
Line 289: For J= 1 to 6
Line 290: If Lettere_Iniziali(i) = Iniziale(J) then
Line 291: Presente=1
Line 292:
Line 293:
Line 294: #End ExternalSource
Line 295: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 296: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 17642, 290, true})
Line 297: Me.WriteUTF8ResourceString(__w, 11109, 290, true)
Line 298: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 299: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 17932, 31, false})
Line 300:
Line 301: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",276)
Line 302: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 303:
Line 304:
Line 305: #End ExternalSource
Line 306: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 307: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 17963, 8, true})
Line 308: __w.Write("&Scelta=")
Line 309: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 310: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 17971, 8, false})
Line 311:
Line 312: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",276)
Line 313: __w.Write(pro)
Line 314:
Line 315:
Line 316: #End ExternalSource
Line 317: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 318: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 17979, 87, true})
Line 319: __w.Write("#comuni'"" onmouseover=""this.style.background='#FFFFFF';document.getElementById('l"& _
Line 320: "ettera")
Line 321: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 322: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18066, 8, false})
Line 323:
Line 324: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",276)
Line 325: __w.Write(j )
Line 326:
Line 327:
Line 328: #End ExternalSource
Line 329: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 330: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18074, 102, true})
Line 331: __w.Write("').style.color='#f7631b'"" onmouseout=""this.style.background='#f7631b';document.ge"& _
Line 332: "tElementById('lettera")
Line 333: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 334: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18176, 8, false})
Line 335:
Line 336: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",276)
Line 337: __w.Write(j )
Line 338:
Line 339:
Line 340: #End ExternalSource
Line 341: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 342: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18184, 45, true})
Line 343: __w.Write("').style.color='#ffffff'"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a id=""lettera")
Line 344: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 345: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18229, 6, false})
Line 346:
Line 347: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",277)
Line 348: __w.Write(j)
Line 349:
Line 350:
Line 351: #End ExternalSource
Line 352: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 353: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18235, 95, true})
Line 354: __w.Write(""" class=""linkBiancobold"" href=""/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropoli"& _
Line 355: "tana.htm?voce=")
Line 356: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 357: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18330, 31, false})
Line 358:
Line 359: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",277)
Line 360: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 361:
Line 362:
Line 363: #End ExternalSource
Line 364: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 365: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18361, 12, true})
Line 366: __w.Write("&Scelta=")
Line 367: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 368: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18373, 8, false})
Line 369:
Line 370: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",277)
Line 371: __w.Write(pro)
Line 372:
Line 373:
Line 374: #End ExternalSource
Line 375: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 376: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18381, 9, true})
Line 377: __w.Write("#comuni"">")
Line 378: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 379: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18390, 31, false})
Line 380:
Line 381: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",277)
Line 382: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 383:
Line 384:
Line 385: #End ExternalSource
Line 386: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 387: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18421, 17, true})
Line 388: __w.Write("</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 389: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 390: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18438, 78, false})
Line 391:
Line 392: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",279)
Line 393:
Line 394: End If
Line 395: Next
Line 396: If Presente=0 then
Line 397: Non_presenti=Non_presenti+1
Line 398:
Line 399:
Line 400: #End ExternalSource
Line 401: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 402: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18516, 159, true})
Line 403: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""border:thin gray solid; border-radius: 5px; width:25px; height:2"& _
Line 404: "5px; vertical-align:middle; text-align:center; margin: 6px; float:left;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 405: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 406: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18675, 31, false})
Line 407:
Line 408: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",286)
Line 409: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 410:
Line 411:
Line 412: #End ExternalSource
Line 413: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 414: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18706, 13, true})
Line 415: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 416: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 417: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18719, 31, false})
Line 418:
Line 419: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",288)
Line 420:
Line 421: End If
Line 422:
Line 423:
Line 424: #End ExternalSource
Line 425:
Line 426: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",291)
Line 427:
Line 428: Next
Line 429:
Line 430:
Line 431: #End ExternalSource
Line 432: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 433: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 18750, 521, true})
Line 434: Me.WriteUTF8ResourceString(__w, 11399, 521, true)
Line 435: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 436: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19271, 134, false})
Line 437:
Line 438: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",306)
Line 439:
Line 440: For i = 7 to 12
Line 441: Presente=0
Line 442:
Line 443:
Line 444: #End ExternalSource
Line 445:
Line 446: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",310)
Line 447:
Line 448: For J= 7 to 12
Line 449: If Lettere_Iniziali(i) = Iniziale(J-Non_Presenti) then
Line 450: Presente=1
Line 451:
Line 452:
Line 453: #End ExternalSource
Line 454: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 455: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19405, 290, true})
Line 456: Me.WriteUTF8ResourceString(__w, 11920, 290, true)
Line 457: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 458: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19695, 31, false})
Line 459:
Line 460: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",315)
Line 461: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 462:
Line 463:
Line 464: #End ExternalSource
Line 465: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 466: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19726, 8, true})
Line 467: __w.Write("&Scelta=")
Line 468: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 469: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19734, 8, false})
Line 470:
Line 471: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",315)
Line 472: __w.Write(pro)
Line 473:
Line 474:
Line 475: #End ExternalSource
Line 476: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 477: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19742, 87, true})
Line 478: __w.Write("#comuni'"" onmouseover=""this.style.background='#FFFFFF';document.getElementById('l"& _
Line 479: "ettera")
Line 480: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 481: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19829, 8, false})
Line 482:
Line 483: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",315)
Line 484: __w.Write(j )
Line 485:
Line 486:
Line 487: #End ExternalSource
Line 488: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 489: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19837, 102, true})
Line 490: __w.Write("').style.color='#f7631b'"" onmouseout=""this.style.background='#f7631b';document.ge"& _
Line 491: "tElementById('lettera")
Line 492: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 493: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19939, 8, false})
Line 494:
Line 495: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",315)
Line 496: __w.Write(j )
Line 497:
Line 498:
Line 499: #End ExternalSource
Line 500: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 501: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19947, 45, true})
Line 502: __w.Write("').style.color='#ffffff'"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a id=""lettera")
Line 503: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 504: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19992, 6, false})
Line 505:
Line 506: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",316)
Line 507: __w.Write(j)
Line 508:
Line 509:
Line 510: #End ExternalSource
Line 511: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 512: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 19998, 96, true})
Line 513: __w.Write(""" class=""linkBiancobold"" href=""/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropol"& _
Line 514: "itana.htm?voce=")
Line 515: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 516: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20094, 31, false})
Line 517:
Line 518: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",316)
Line 519: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 520:
Line 521:
Line 522: #End ExternalSource
Line 523: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 524: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20125, 12, true})
Line 525: __w.Write("&Scelta=")
Line 526: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 527: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20137, 8, false})
Line 528:
Line 529: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",316)
Line 530: __w.Write(pro)
Line 531:
Line 532:
Line 533: #End ExternalSource
Line 534: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 535: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20145, 9, true})
Line 536: __w.Write("#comuni"">")
Line 537: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 538: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20154, 31, false})
Line 539:
Line 540: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",316)
Line 541: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 542:
Line 543:
Line 544: #End ExternalSource
Line 545: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 546: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20185, 17, true})
Line 547: __w.Write("</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 548: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 549: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20202, 78, false})
Line 550:
Line 551: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",318)
Line 552:
Line 553: End If
Line 554: Next
Line 555: If Presente=0 then
Line 556: Non_presenti=Non_presenti+1
Line 557:
Line 558:
Line 559: #End ExternalSource
Line 560: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 561: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20280, 159, true})
Line 562: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""border:thin gray solid; border-radius: 5px; width:25px; height:2"& _
Line 563: "5px; vertical-align:middle; text-align:center; margin: 6px; float:left;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 564: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 565: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20439, 31, false})
Line 566:
Line 567: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",325)
Line 568: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 569:
Line 570:
Line 571: #End ExternalSource
Line 572: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 573: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20470, 13, true})
Line 574: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 575: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 576: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20483, 31, false})
Line 577:
Line 578: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",327)
Line 579:
Line 580: End If
Line 581:
Line 582:
Line 583: #End ExternalSource
Line 584:
Line 585: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",330)
Line 586:
Line 587: Next
Line 588:
Line 589:
Line 590: #End ExternalSource
Line 591: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 592: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 20514, 549, true})
Line 593: Me.WriteUTF8ResourceString(__w, 12210, 549, true)
Line 594: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 595: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21063, 136, false})
Line 596:
Line 597: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",345)
Line 598:
Line 599: For i = 13 to 18
Line 600: Presente=0
Line 601:
Line 602:
Line 603: #End ExternalSource
Line 604:
Line 605: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",349)
Line 606:
Line 607: For J= 13 to 18
Line 608: If Lettere_Iniziali(i) = Iniziale(J-Non_Presenti) then
Line 609: Presente=1
Line 610:
Line 611:
Line 612: #End ExternalSource
Line 613: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 614: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21199, 290, true})
Line 615: Me.WriteUTF8ResourceString(__w, 12759, 290, true)
Line 616: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 617: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21489, 31, false})
Line 618:
Line 619: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",354)
Line 620: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 621:
Line 622:
Line 623: #End ExternalSource
Line 624: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 625: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21520, 8, true})
Line 626: __w.Write("&Scelta=")
Line 627: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 628: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21528, 8, false})
Line 629:
Line 630: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",354)
Line 631: __w.Write(pro)
Line 632:
Line 633:
Line 634: #End ExternalSource
Line 635: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 636: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21536, 87, true})
Line 637: __w.Write("#comuni'"" onmouseover=""this.style.background='#FFFFFF';document.getElementById('l"& _
Line 638: "ettera")
Line 639: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 640: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21623, 8, false})
Line 641:
Line 642: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",354)
Line 643: __w.Write(j )
Line 644:
Line 645:
Line 646: #End ExternalSource
Line 647: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 648: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21631, 102, true})
Line 649: __w.Write("').style.color='#f7631b'"" onmouseout=""this.style.background='#f7631b';document.ge"& _
Line 650: "tElementById('lettera")
Line 651: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 652: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21733, 8, false})
Line 653:
Line 654: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",354)
Line 655: __w.Write(j )
Line 656:
Line 657:
Line 658: #End ExternalSource
Line 659: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 660: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21741, 45, true})
Line 661: __w.Write("').style.color='#ffffff'"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a id=""lettera")
Line 662: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 663: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21786, 6, false})
Line 664:
Line 665: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",355)
Line 666: __w.Write(j)
Line 667:
Line 668:
Line 669: #End ExternalSource
Line 670: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 671: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21792, 95, true})
Line 672: __w.Write(""" class=""linkBiancobold"" href=""/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropoli"& _
Line 673: "tana.htm?voce=")
Line 674: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 675: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21887, 31, false})
Line 676:
Line 677: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",355)
Line 678: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 679:
Line 680:
Line 681: #End ExternalSource
Line 682: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 683: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21918, 12, true})
Line 684: __w.Write("&Scelta=")
Line 685: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 686: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21930, 8, false})
Line 687:
Line 688: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",355)
Line 689: __w.Write(pro)
Line 690:
Line 691:
Line 692: #End ExternalSource
Line 693: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 694: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21938, 9, true})
Line 695: __w.Write("#comuni"">")
Line 696: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 697: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21947, 31, false})
Line 698:
Line 699: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",355)
Line 700: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 701:
Line 702:
Line 703: #End ExternalSource
Line 704: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 705: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21978, 17, true})
Line 706: __w.Write("</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 707: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 708: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 21995, 78, false})
Line 709:
Line 710: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",357)
Line 711:
Line 712: End If
Line 713: Next
Line 714: If Presente=0 then
Line 715: Non_presenti=Non_presenti+1
Line 716:
Line 717:
Line 718: #End ExternalSource
Line 719: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 720: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 22073, 159, true})
Line 721: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""border:thin gray solid; border-radius: 5px; width:25px; height:2"& _
Line 722: "5px; vertical-align:middle; text-align:center; margin: 6px; float:left;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 723: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 724: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 22232, 31, false})
Line 725:
Line 726: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",364)
Line 727: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 728:
Line 729:
Line 730: #End ExternalSource
Line 731: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 732: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 22263, 13, true})
Line 733: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 734: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 735: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 22276, 31, false})
Line 736:
Line 737: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",366)
Line 738:
Line 739: End If
Line 740:
Line 741:
Line 742: #End ExternalSource
Line 743:
Line 744: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",369)
Line 745:
Line 746: Next
Line 747:
Line 748:
Line 749: #End ExternalSource
Line 750: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 751: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 22307, 565, true})
Line 752: Me.WriteUTF8ResourceString(__w, 13049, 565, true)
Line 753: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 754: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 22872, 136, false})
Line 755:
Line 756: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",384)
Line 757:
Line 758: For i = 19 to 21
Line 759: Presente=0
Line 760:
Line 761:
Line 762: #End ExternalSource
Line 763:
Line 764: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",388)
Line 765:
Line 766: For J= 19 to 21
Line 767: If Lettere_Iniziali(i) = Iniziale(J-Non_Presenti) then
Line 768: Presente=1
Line 769:
Line 770:
Line 771: #End ExternalSource
Line 772: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 773: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23008, 290, true})
Line 774: Me.WriteUTF8ResourceString(__w, 13614, 290, true)
Line 775: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 776: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23298, 31, false})
Line 777:
Line 778: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",393)
Line 779: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 780:
Line 781:
Line 782: #End ExternalSource
Line 783: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 784: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23329, 8, true})
Line 785: __w.Write("&Scelta=")
Line 786: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 787: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23337, 8, false})
Line 788:
Line 789: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",393)
Line 790: __w.Write(pro)
Line 791:
Line 792:
Line 793: #End ExternalSource
Line 794: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 795: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23345, 87, true})
Line 796: __w.Write("#comuni'"" onmouseover=""this.style.background='#FFFFFF';document.getElementById('l"& _
Line 797: "ettera")
Line 798: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 799: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23432, 8, false})
Line 800:
Line 801: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",393)
Line 802: __w.Write(j )
Line 803:
Line 804:
Line 805: #End ExternalSource
Line 806: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 807: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23440, 102, true})
Line 808: __w.Write("').style.color='#f7631b'"" onmouseout=""this.style.background='#f7631b';document.ge"& _
Line 809: "tElementById('lettera")
Line 810: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 811: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23542, 8, false})
Line 812:
Line 813: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",393)
Line 814: __w.Write(j )
Line 815:
Line 816:
Line 817: #End ExternalSource
Line 818: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 819: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23550, 45, true})
Line 820: __w.Write("').style.color='#ffffff'"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a id=""lettera")
Line 821: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 822: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23595, 6, false})
Line 823:
Line 824: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",394)
Line 825: __w.Write(j)
Line 826:
Line 827:
Line 828: #End ExternalSource
Line 829: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 830: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23601, 96, true})
Line 831: __w.Write(""" class=""linkBiancobold"" href=""/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropol"& _
Line 832: "itana.htm?voce=")
Line 833: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 834: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23697, 31, false})
Line 835:
Line 836: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",394)
Line 837: __w.Write(Lcase(Lettere_Iniziali(i)))
Line 838:
Line 839:
Line 840: #End ExternalSource
Line 841: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 842: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23728, 12, true})
Line 843: __w.Write("&Scelta=")
Line 844: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 845: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23740, 8, false})
Line 846:
Line 847: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",394)
Line 848: __w.Write(pro)
Line 849:
Line 850:
Line 851: #End ExternalSource
Line 852: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 853: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23748, 9, true})
Line 854: __w.Write("#comuni"">")
Line 855: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 856: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23757, 31, false})
Line 857:
Line 858: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",394)
Line 859: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 860:
Line 861:
Line 862: #End ExternalSource
Line 863: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 864: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23788, 17, true})
Line 865: __w.Write("</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 866: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 867: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23805, 78, false})
Line 868:
Line 869: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",396)
Line 870:
Line 871: End If
Line 872: Next
Line 873: If Presente=0 then
Line 874: Non_presenti=Non_presenti+1
Line 875:
Line 876:
Line 877: #End ExternalSource
Line 878: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 879: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 23883, 159, true})
Line 880: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""border:thin gray solid; border-radius: 5px; width:25px; height:2"& _
Line 881: "5px; vertical-align:middle; text-align:center; margin: 6px; float:left;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 882: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 883: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 24042, 31, false})
Line 884:
Line 885: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",403)
Line 886: __w.Write(Ucase(Lettere_Iniziali(i)))
Line 887:
Line 888:
Line 889: #End ExternalSource
Line 890: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 891: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 24073, 13, true})
Line 892: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 893: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 894: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 24086, 31, false})
Line 895:
Line 896: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",405)
Line 897:
Line 898: End If
Line 899:
Line 900:
Line 901: #End ExternalSource
Line 902:
Line 903: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",408)
Line 904:
Line 905: Next
Line 906:
Line 907:
Line 908: #End ExternalSource
Line 909: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 910: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 24117, 487, true})
Line 911: Me.WriteUTF8ResourceString(__w, 13904, 487, true)
Line 912: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 913: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 24604, 2142, false})
Line 914:
Line 915: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",422)
Line 916:
Line 917: If lettera > "" then
Line 918: SQL ="SELECT localita,ccomune FROM chiese WHERE LEFT(localita,1)='" & lettera & "' and provincia ='" & pro & "' and localita <> 'zz' group by localita,ccomune ORDER BY localita;"
Line 919: SQLF ="SELECT frazione,localita,ccomune FROM chiese WHERE LEFT(frazione,1)='" & lettera & "' and provincia ='" & pro & "' group by frazione,localita,ccomune ORDER BY frazione,localita;"
Line 920: Set Rs=con.execute(SQL)
Line 921: Set RsF=con.execute(SQLF)
Line 922: Dim NC(500)
Line 923: Dim CC(500)
Line 924: Dim NF(100)
Line 925: Dim NCL(500)
Line 926: i=0
Line 927: While Not rs.EOF
Line 928: i=i+1
Line 929: NC(i)=rs("localita")
Line 930: CC(i)=rs("ccomune")
Line 931: rs.MoveNext
Line 932: wend
Line 933: j=0
Line 934: While Not rsF.EOF
Line 935: j=j+1
Line 936: NC(I+J)=rsF("Frazione")& " (" & rsF("localita") & ")"
Line 937: CC(I+J)=rsF("ccomune")
Line 938: rsF.MoveNext
Line 939: wend
Line 940: if j > 0 then
Line 941: rsF.MoveFirst
Line 942: end if
Line 943: if i > 0 then
Line 944: rs.MoveFirst
Line 945: end if
Line 946: I=I+J
Line 947:
Line 948: 'response.write "? " & ubound(NC)
Line 949:
Line 950: ' funzione di ordinamento stringhe tramite algoritmo Bubble Sort
Line 951: 'function SortStringArray(arrStrings)
Line 952: dim strBuf
Line 953: ' controlla che arrStrings sia effettivamente un array
Line 954: if isarray(NC) then
Line 955: dim a, b
Line 956: ' per ogni stringa dell'array
Line 957: for a=0 to i-1
Line 958: ' scorri tutte le stringhe dell'array che non sono ancora ordinate
Line 959: for b=0 to i-1-a
Line 960: ' se la stringa attuale è "maggiore" della stringa successiva...
Line 961: if NC(b)>NC(b+1) and NC(b) > "" then
Line 962: ' ...inverti la posizione delle due stringhe
Line 963: strBuf = NC(b+1)
Line 964: strBufC = CC(b+1)
Line 965: NC(b+1) = NC(b)
Line 966: CC(b+1) = CC(b)
Line 967: NC(b) = strBuf
Line 968: CC(b) = strBufC
Line 969: end if
Line 970: next
Line 971: next
Line 972: end if
Line 973: ' SortStringArray = arrStrings
Line 974: 'end function
Line 975: 'response.write "? " & ubound(NC)
Line 976: 'For u = 1 to 500
Line 977: 'response.write u &"-" & NC(u)
Line 978: 'Next
Line 979: NC_1C = Round(I/3+0.5)
Line 980: NC_2C = NC_1C
Line 981: NC_3C = NC_1C
Line 982: 'response.write "NC_1C: " & NC_1C & "<br>"
Line 983: 'response.write "NC_2C: " & NC_2C & "<br>"
Line 984: 'response.write "NC_3C: " & NC_3C & "<br>"
Line 985:
Line 986: For u = 1 to i
Line 987: if instr(NC(u),"(") > 0 then
Line 988: Sx = instr(NC(u),"(")+1
Line 989: Dx = instr(NC(u),")")
Line 990: Lx=DX-Sx
Line 991: NCL(u) = mid(nc(u),Sx,Lx)
Line 992: Else
Line 993: NCL(u) = NC(u)
Line 994: End If
Line 995: Next
Line 996:
Line 997:
Line 998: #End ExternalSource
Line 999: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1000: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 26746, 623, true})
Line 1001: Me.WriteUTF8ResourceString(__w, 14391, 623, true)
Line 1002: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1003: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27369, 19, false})
Line 1004:
Line 1005: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",512)
Line 1006: __w.Write(Ucase(lettera))
Line 1007:
Line 1008:
Line 1009: #End ExternalSource
Line 1010: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1011: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27388, 142, true})
Line 1012: __w.Write("</span></h2>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<div class=""col-lg-4 cta-left"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <table clas"& _
Line 1013: "s=""tabella100p"" style=""height:100%; table-layout:fixed"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 1014: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1015: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27530, 60, false})
Line 1016:
Line 1017: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",516)
Line 1018:
Line 1019: '*** Prima Colonna
Line 1020: For I = 1 to NC_1C
Line 1021:
Line 1022:
Line 1023:
Line 1024: #End ExternalSource
Line 1025: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1026: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27590, 281, true})
Line 1027: Me.WriteUTF8ResourceString(__w, 15014, 281, true)
Line 1028: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1029: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27871, 10, false})
Line 1030:
Line 1031: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",523)
Line 1032: __w.Write(CC(i))
Line 1033:
Line 1034:
Line 1035: #End ExternalSource
Line 1036: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1037: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27881, 81, true})
Line 1038: __w.Write("'"" onmouseover=""this.style.background='#FFFFFF'; document.getElementById('comunea"& _
Line 1039: "")
Line 1040: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1041: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27962, 8, false})
Line 1042:
Line 1043: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",523)
Line 1044: __w.Write(i )
Line 1045:
Line 1046:
Line 1047: #End ExternalSource
Line 1048: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1049: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 27970, 102, true})
Line 1050: __w.Write("').style.color='#f7631b'"" onmouseout=""this.style.background='#f7631b';document.ge"& _
Line 1051: "tElementById('comunea")
Line 1052: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1053: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28072, 8, false})
Line 1054:
Line 1055: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",523)
Line 1056: __w.Write(i )
Line 1057:
Line 1058:
Line 1059: #End ExternalSource
Line 1060: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1061: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28080, 46, true})
Line 1062: __w.Write("').style.color='#ffffff'"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a id=""comunea")
Line 1063: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1064: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28126, 6, false})
Line 1065:
Line 1066: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",524)
Line 1067: __w.Write(i)
Line 1068:
Line 1069:
Line 1070: #End ExternalSource
Line 1071: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1072: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28132, 31, true})
Line 1073: __w.Write(""" style=""color:#ffffff"" title=""")
Line 1074: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1075: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28163, 10, false})
Line 1076:
Line 1077: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",524)
Line 1078: __w.Write(NC(i))
Line 1079:
Line 1080:
Line 1081: #End ExternalSource
Line 1082: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1083: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28173, 70, true})
Line 1084: __w.Write(""" href=""/Chiese-Romaniche-Gotiche-Piemonte-Presenta-Chiese.htm?chiave=")
Line 1085: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1086: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28243, 10, false})
Line 1087:
Line 1088: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",524)
Line 1089: __w.Write(CC(i))
Line 1090:
Line 1091:
Line 1092: #End ExternalSource
Line 1093: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1094: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28253, 2, true})
Line 1095: __w.Write(""">")
Line 1096: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1097: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28255, 10, false})
Line 1098:
Line 1099: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",524)
Line 1100: __w.Write(NC(i))
Line 1101:
Line 1102:
Line 1103: #End ExternalSource
Line 1104: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1105: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28265, 42, true})
Line 1106: __w.Write("</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 1107: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1108: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28307, 18, false})
Line 1109:
Line 1110: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",528)
Line 1111:
Line 1112: next
Line 1113:
Line 1114:
Line 1115: #End ExternalSource
Line 1116: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1117: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28325, 143, true})
Line 1118: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<div class=""col-lg-4 cta-left"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <table cla"& _
Line 1119: "ss=""tabella100p"" style=""height:100%; table-layout:fixed"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 1120: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1121: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28468, 138, false})
Line 1122:
Line 1123: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",536)
Line 1124:
Line 1125: '*** Seconda Colonna
Line 1126: For I = 1 to NC_2C
Line 1127: if NC(i+NC_1C) < "." then NC(i+NC_1C)=" ": Visibile="Visibility:Hidden"
Line 1128:
Line 1129:
Line 1130: #End ExternalSource
Line 1131: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1132: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28606, 193, true})
Line 1133: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td class=""tdw100pneutro"" style=""height:20px; text-align:center"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""height: 25px; overflow:hidden; border:thin #ffffff solid; bord"& _
Line 1134: "er-radius: 5px; cursor:pointer; ")
Line 1135: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1136: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28799, 13, false})
Line 1137:
Line 1138: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",543)
Line 1139: __w.Write(Visibile)
Line 1140:
Line 1141:
Line 1142: #End ExternalSource
Line 1143: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1144: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28812, 90, true})
Line 1145: __w.Write(""" onclick=""window.location='/Chiese-Romaniche-Gotiche-Piemonte-Presenta-Chiese.ht"& _
Line 1146: "m?chiave=")
Line 1147: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1148: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28902, 16, false})
Line 1149:
Line 1150: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",543)
Line 1151: __w.Write(CC(i+NC_1C))
Line 1152:
Line 1153:
Line 1154: #End ExternalSource
Line 1155: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1156: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28918, 81, true})
Line 1157: __w.Write("'"" onmouseover=""this.style.background='#FFFFFF'; document.getElementById('comuneb"& _
Line 1158: "")
Line 1159: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1160: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 28999, 8, false})
Line 1161:
Line 1162: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",543)
Line 1163: __w.Write(i )
Line 1164:
Line 1165:
Line 1166: #End ExternalSource
Line 1167: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1168: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29007, 102, true})
Line 1169: __w.Write("').style.color='#f7631b'"" onmouseout=""this.style.background='#f7631b';document.ge"& _
Line 1170: "tElementById('comuneb")
Line 1171: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1172: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29109, 8, false})
Line 1173:
Line 1174: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",543)
Line 1175: __w.Write(i )
Line 1176:
Line 1177:
Line 1178: #End ExternalSource
Line 1179: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1180: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29117, 47, true})
Line 1181: __w.Write("').style.color='#ffffff'"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a id=""comuneb")
Line 1182: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1183: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29164, 6, false})
Line 1184:
Line 1185: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",544)
Line 1186: __w.Write(i)
Line 1187:
Line 1188:
Line 1189: #End ExternalSource
Line 1190: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1191: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29170, 29, true})
Line 1192: __w.Write(""" style=""color:white"" title=""")
Line 1193: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1194: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29199, 16, false})
Line 1195:
Line 1196: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",544)
Line 1197: __w.Write(NC(i+NC_1C))
Line 1198:
Line 1199:
Line 1200: #End ExternalSource
Line 1201: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1202: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29215, 70, true})
Line 1203: __w.Write(""" href=""/Chiese-Romaniche-Gotiche-Piemonte-Presenta-Chiese.htm?chiave=")
Line 1204: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1205: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29285, 16, false})
Line 1206:
Line 1207: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",544)
Line 1208: __w.Write(CC(i+NC_1C))
Line 1209:
Line 1210:
Line 1211: #End ExternalSource
Line 1212: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1213: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29301, 2, true})
Line 1214: __w.Write(""">")
Line 1215: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1216: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29303, 16, false})
Line 1217:
Line 1218: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",544)
Line 1219: __w.Write(NC(i+NC_1C))
Line 1220:
Line 1221:
Line 1222: #End ExternalSource
Line 1223: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1224: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29319, 40, true})
Line 1225: __w.Write("</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 1226: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1227: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29359, 17, false})
Line 1228:
Line 1229: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",548)
Line 1230:
Line 1231: next
Line 1232:
Line 1233:
Line 1234: #End ExternalSource
Line 1235: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1236: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29376, 142, true})
Line 1237: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<div class=""col-lg-4 cta-left"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <table cl"& _
Line 1238: "ass=""tabella100p"" style=""height:100% ; table-layout:fixed"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 1239: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1240: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29518, 136, false})
Line 1241:
Line 1242: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",556)
Line 1243:
Line 1244: '*** Terza Colonna
Line 1245: For I = 1 to NC_3C
Line 1246: if NC(i+NC_1C+NC_2C) < "." then NC(i+NC_1C+NC_2C)=" ": Visibile="Visibility:Hidden"
Line 1247:
Line 1248:
Line 1249: #End ExternalSource
Line 1250: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1251: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29654, 193, true})
Line 1252: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td class=""tdw100pneutro"" style=""height:20px; text-align:center"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""height: 25px; overflow:hidden; border:thin #ffffff solid; bord"& _
Line 1253: "er-radius: 5px; cursor:pointer; ")
Line 1254: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1255: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29847, 13, false})
Line 1256:
Line 1257: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",563)
Line 1258: __w.Write(Visibile)
Line 1259:
Line 1260:
Line 1261: #End ExternalSource
Line 1262: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1263: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29860, 90, true})
Line 1264: __w.Write(""" onclick=""window.location='/Chiese-Romaniche-Gotiche-Piemonte-Presenta-Chiese.ht"& _
Line 1265: "m?chiave=")
Line 1266: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1267: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29950, 22, false})
Line 1268:
Line 1269: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",563)
Line 1270: __w.Write(CC(i+NC_1C+NC_2C))
Line 1271:
Line 1272:
Line 1273: #End ExternalSource
Line 1274: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1275: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 29972, 81, true})
Line 1276: __w.Write("'"" onmouseover=""this.style.background='#FFFFFF'; document.getElementById('comunec"& _
Line 1277: "")
Line 1278: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1279: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30053, 8, false})
Line 1280:
Line 1281: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",563)
Line 1282: __w.Write(i )
Line 1283:
Line 1284:
Line 1285: #End ExternalSource
Line 1286: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1287: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30061, 102, true})
Line 1288: __w.Write("').style.color='#f7631b'"" onmouseout=""this.style.background='#f7631b';document.ge"& _
Line 1289: "tElementById('comunec")
Line 1290: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1291: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30163, 8, false})
Line 1292:
Line 1293: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",563)
Line 1294: __w.Write(i )
Line 1295:
Line 1296:
Line 1297: #End ExternalSource
Line 1298: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1299: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30171, 46, true})
Line 1300: __w.Write("').style.color='#ffffff'"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a id=""comunec")
Line 1301: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1302: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30217, 6, false})
Line 1303:
Line 1304: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",564)
Line 1305: __w.Write(i)
Line 1306:
Line 1307:
Line 1308: #End ExternalSource
Line 1309: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1310: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30223, 29, true})
Line 1311: __w.Write(""" style=""color:white"" title=""")
Line 1312: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1313: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30252, 22, false})
Line 1314:
Line 1315: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",564)
Line 1316: __w.Write(NC(i+NC_1C+NC_2C))
Line 1317:
Line 1318:
Line 1319: #End ExternalSource
Line 1320: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1321: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30274, 70, true})
Line 1322: __w.Write(""" href=""/Chiese-Romaniche-Gotiche-Piemonte-Presenta-Chiese.htm?chiave=")
Line 1323: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1324: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30344, 22, false})
Line 1325:
Line 1326: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",564)
Line 1327: __w.Write(CC(i+NC_1C+NC_2C))
Line 1328:
Line 1329:
Line 1330: #End ExternalSource
Line 1331: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1332: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30366, 2, true})
Line 1333: __w.Write(""">")
Line 1334: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1335: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30368, 22, false})
Line 1336:
Line 1337: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",564)
Line 1338: __w.Write(NC(i+NC_1C+NC_2C))
Line 1339:
Line 1340:
Line 1341: #End ExternalSource
Line 1342: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1343: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30390, 40, true})
Line 1344: __w.Write("</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 1345: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1346: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30430, 12, false})
Line 1347:
Line 1348: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",568)
Line 1349:
Line 1350: next
Line 1351:
Line 1352:
Line 1353: #End ExternalSource
Line 1354: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1355: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30442, 233, true})
Line 1356: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<div class=""col-lg-12 cta-left"" style=""text-align"& _
Line 1357: ":center; padding-top:40px"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<a class=""genric-btn primary-border circle"" "& _
Line 1358: "href=""/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm?Scelta=")
Line 1359: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1360: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30675, 8, false})
Line 1361:
Line 1362: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",574)
Line 1363: __w.Write(pro)
Line 1364:
Line 1365:
Line 1366: #End ExternalSource
Line 1367: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1368: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30683, 179, true})
Line 1369: __w.Write("#lettere""><i class=""fa-solid fa-magnifying-glass""></i> Oppure Seleziona un'altra "& _
Line 1370: "lettera</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</section>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<!-- End "& _
Line 1371: "cta-two Area -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 1372: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1373: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30862, 23, false})
Line 1374:
Line 1375: #ExternalSource("C:\inetpub\wwwroot\chieseromaniche\Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm",580)
Line 1376:
Line 1377: End If
Line 1378: End If
Line 1379:
Line 1380:
Line 1381: #End ExternalSource
Line 1382: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1383: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/Chiese-Romaniche-Gotiche-Piemonte-Citta-metropolitana.htm", 30885, 286, true})
Line 1384: Me.WriteUTF8ResourceString(__w, 15295, 286, true)
Line 1385: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 1386: End Sub
Line 1387:
Line 1388: Private Shared Function __PageInspector_LoadHelper(ByVal helperName As String) As System.Reflection.MethodInfo
Line 1389: Dim helperClass As System.Type = System.Type.GetType("Microsoft.WebTools.BrowserLink.Runtime.WebForms.TraceHelpers, Microsoft.WebTools."& _
Line 1390: "BrowserLink.Tracing, Version=17.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f1"& _
Line 1391: "1d50a3a", false, false)
Line 1392: If (Not (helperClass) Is Nothing) Then
Line 1393: Return helperClass.GetMethod(helperName)
Line 1394: End If
Line 1395: Return Nothing
Line 1396: End Function
Line 1397:
Line 1398: Private Sub __PageInspector_BeginRenderTracing(ByVal parameters() As Object)
Line 1399: If (Not (Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__PageInspector_BeginRenderTracingMethod) Is Nothing) Then
Line 1400: Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__PageInspector_BeginRenderTracingMethod.Invoke(Nothing, parameters)
Line 1401: End If
Line 1402: End Sub
Line 1403:
Line 1404: Private Sub __PageInspector_EndRenderTracing(ByVal parameters() As Object)
Line 1405: If (Not (Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__PageInspector_EndRenderTracingMethod) Is Nothing) Then
Line 1406: Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__PageInspector_EndRenderTracingMethod.Invoke(Nothing, parameters)
Line 1407: End If
Line 1408: End Sub
Line 1409:
Line 1410: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1411: Protected Overrides Sub FrameworkInitialize()
Line 1412: MyBase.FrameworkInitialize
Line 1413: Me.SetStringResourcePointer(Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__stringResource, 0)
Line 1414: Me.__BuildControlTree(Me)
Line 1415: Me.AddWrappedFileDependencies(Global.ASP.chiese_romaniche_gotiche_piemonte_citta_metropolitana_htm.__fileDependencies)
Line 1416: Me.Request.ValidateInput
Line 1417: End Sub
Line 1418:
Line 1419: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1420: Public Overrides Function GetTypeHashCode() As Integer
Line 1421: Return -30775164
Line 1422: End Function
Line 1423:
Line 1424: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1425: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 1426: MyBase.ProcessRequest(context)
Line 1427: End Sub
Line 1428: End Class
Line 1429: End Namespace
Line 1430:
|