Satır 1: #ExternalChecksum("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx","{ff1816ec-aa5e-4d10-87f7-6f4963833460}","4A8FAA4719D84FF33B84A41DD574D3C5D63AD520")
Satır 2: '------------------------------------------------------------------------------
Satır 3: ' <auto-generated>
Satır 4: ' Bu kod araç tarafından oluşturuldu.
Satır 5: ' Çalışma Zamanı Sürümü:4.0.30319.42000
Satır 6: '
Satır 7: ' Bu dosyada yapılacak değişiklikler yanlış davranışa neden olabilir ve
Satır 8: ' kod yeniden oluşturulursa kaybolur.
Satır 9: ' </auto-generated>
Satır 10: '------------------------------------------------------------------------------
Satır 11:
Satır 12: Option Strict Off
Satır 13: Option Explicit On
Satır 14:
Satır 15: Imports Microsoft.VisualBasic
Satır 16: Imports System
Satır 17: Imports System.Collections
Satır 18: Imports System.Collections.Generic
Satır 19: Imports System.Collections.Specialized
Satır 20: Imports System.ComponentModel.DataAnnotations
Satır 21: Imports System.Configuration
Satır 22: Imports System.Linq
Satır 23: Imports System.Text
Satır 24: Imports System.Text.RegularExpressions
Satır 25: Imports System.Web
Satır 26: Imports System.Web.Caching
Satır 27: Imports System.Web.DynamicData
Satır 28: Imports System.Web.Profile
Satır 29: Imports System.Web.Security
Satır 30: Imports System.Web.SessionState
Satır 31: Imports System.Web.UI
Satır 32: Imports System.Web.UI.HtmlControls
Satır 33: Imports System.Web.UI.WebControls
Satır 34: Imports System.Web.UI.WebControls.WebParts
Satır 35: Imports System.Xml.Linq
Satır 36:
Satır 37: Namespace ASP
Satır 38:
Satır 39: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Satır 40: Public Class ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx
Satır 41: Inherits Global.System.Web.UI.Page
Satır 42: Implements System.Web.SessionState.IRequiresSessionState, System.Web.IHttpHandler
Satır 43:
Satır 44:
Satır 45: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",108)
Satır 46: Protected WithEvents form1 As Global.System.Web.UI.HtmlControls.HtmlForm
Satır 47:
Satır 48: #End ExternalSource
Satır 49:
Satır 50: Private Shared __initialized As Boolean
Satır 51:
Satır 52: Private Shared __stringResource As Object
Satır 53:
Satır 54: Private Shared __fileDependencies As Object
Satır 55:
Satır 56:
Satır 57: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",5)
Satır 58:
Satır 59: dim ulkesi, ulke, sayfasi, ulkesi_sehirleri, tarih, sehir, plaka, bayrak, sql, sql1, ulkesi_1, harita, firma_adi, sql4, sql5, renk, renk1, sayfasi4, renk4, firma_adi4
Satır 60:
Satır 61: #End ExternalSource
Satır 62:
Satır 63:
Satır 64: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 65: Public Sub New()
Satır 66: MyBase.New
Satır 67: Dim dependencies() As String
Satır 68: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/ayrinti_siralamasi/karayolu-nakliyat-firmalari-liste.aspx"
Satır 69: If (Global.ASP.ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx.__initialized = false) Then
Satır 70: Global.ASP.ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx.__stringResource = Me.ReadStringResource
Satır 71: dependencies = New String(0) {}
Satır 72: dependencies(0) = "~/ayrinti_siralamasi/karayolu-nakliyat-firmalari-liste.aspx"
Satır 73: Global.ASP.ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Satır 74: Global.ASP.ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx.__initialized = true
Satır 75: End If
Satır 76: Me.Server.ScriptTimeout = 30000000
Satır 77: End Sub
Satır 78:
Satır 79: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Satır 80: Get
Satır 81: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Satır 82: End Get
Satır 83: End Property
Satır 84:
Satır 85: Protected ReadOnly Property ApplicationInstance() As System.Web.HttpApplication
Satır 86: Get
Satır 87: Return CType(Me.Context.ApplicationInstance,System.Web.HttpApplication)
Satır 88: End Get
Satır 89: End Property
Satır 90:
Satır 91: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 92: Private Function __BuildControl__control3() As Global.System.Web.UI.HtmlControls.HtmlTitle
Satır 93: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlTitle
Satır 94:
Satır 95: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",69)
Satır 96: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlTitle()
Satır 97:
Satır 98: #End ExternalSource
Satır 99: __ctrl.SetRenderMethodDelegate(AddressOf Me.__Render__control3)
Satır 100: Return __ctrl
Satır 101: End Function
Satır 102:
Satır 103: Private Sub __Render__control3(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Satır 104:
Satır 105: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",69)
Satır 106: __w.Write(ulkesi)
Satır 107:
Satır 108:
Satır 109: #End ExternalSource
Satır 110: __w.Write(" Kara Yolu Taşıma - Nakliyerehberim")
Satır 111: End Sub
Satır 112:
Satır 113: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 114: Private Function __BuildControl__control4() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 115: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 116:
Satır 117: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",70)
Satır 118: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 119:
Satır 120: #End ExternalSource
Satır 121:
Satır 122: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",70)
Satır 123: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "X-UA-Compatible")
Satır 124:
Satır 125: #End ExternalSource
Satır 126:
Satır 127: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",70)
Satır 128: __ctrl.Content = "IE=EmulateIE7"
Satır 129:
Satır 130: #End ExternalSource
Satır 131: Return __ctrl
Satır 132: End Function
Satır 133:
Satır 134: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 135: Private Function __BuildControl__control5() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 136: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 137:
Satır 138: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",71)
Satır 139: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 140:
Satır 141: #End ExternalSource
Satır 142:
Satır 143: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",71)
Satır 144: __ctrl.Name = "Description"
Satır 145:
Satır 146: #End ExternalSource
Satır 147:
Satır 148: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",71)
Satır 149: __ctrl.Content = "<%=ulkesi%> Karayolu Taşıma - Nakliyerehberim"
Satır 150:
Satır 151: #End ExternalSource
Satır 152: Return __ctrl
Satır 153: End Function
Satır 154:
Satır 155: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 156: Private Function __BuildControl__control6() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 157: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 158:
Satır 159: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",72)
Satır 160: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 161:
Satır 162: #End ExternalSource
Satır 163:
Satır 164: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",72)
Satır 165: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("HTTP-EQUIV", "Content-Type")
Satır 166:
Satır 167: #End ExternalSource
Satır 168:
Satır 169: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",72)
Satır 170: __ctrl.Content = "text/html; charset=windows-1254"
Satır 171:
Satır 172: #End ExternalSource
Satır 173: Return __ctrl
Satır 174: End Function
Satır 175:
Satır 176: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 177: Private Function __BuildControl__control7() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 178: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 179:
Satır 180: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",73)
Satır 181: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 182:
Satır 183: #End ExternalSource
Satır 184:
Satır 185: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",73)
Satır 186: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "X-UA-Compatible")
Satır 187:
Satır 188: #End ExternalSource
Satır 189:
Satır 190: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",73)
Satır 191: __ctrl.Content = "IE = 9"
Satır 192:
Satır 193: #End ExternalSource
Satır 194: Return __ctrl
Satır 195: End Function
Satır 196:
Satır 197: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 198: Private Function __BuildControl__control8() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 199: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 200:
Satır 201: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",74)
Satır 202: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 203:
Satır 204: #End ExternalSource
Satır 205:
Satır 206: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",74)
Satır 207: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "X-UA-Compatible")
Satır 208:
Satır 209: #End ExternalSource
Satır 210:
Satır 211: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",74)
Satır 212: __ctrl.Content = "IE = 8"
Satır 213:
Satır 214: #End ExternalSource
Satır 215: Return __ctrl
Satır 216: End Function
Satır 217:
Satır 218: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 219: Private Function __BuildControl__control9() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 220: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 221:
Satır 222: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",75)
Satır 223: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 224:
Satır 225: #End ExternalSource
Satır 226:
Satır 227: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",75)
Satır 228: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "X-UA-Compatible")
Satır 229:
Satır 230: #End ExternalSource
Satır 231:
Satır 232: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",75)
Satır 233: __ctrl.Content = "IE = 7"
Satır 234:
Satır 235: #End ExternalSource
Satır 236: Return __ctrl
Satır 237: End Function
Satır 238:
Satır 239: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 240: Private Function __BuildControl__control10() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 241: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 242:
Satır 243: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",76)
Satır 244: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 245:
Satır 246: #End ExternalSource
Satır 247:
Satır 248: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",76)
Satır 249: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "X-UA-Compatible")
Satır 250:
Satır 251: #End ExternalSource
Satır 252:
Satır 253: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",76)
Satır 254: __ctrl.Content = "IE = 6"
Satır 255:
Satır 256: #End ExternalSource
Satır 257: Return __ctrl
Satır 258: End Function
Satır 259:
Satır 260: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 261: Private Function __BuildControl__control11() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 262: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 263:
Satır 264: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",77)
Satır 265: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 266:
Satır 267: #End ExternalSource
Satır 268:
Satır 269: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",77)
Satır 270: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "X-UA-Compatible")
Satır 271:
Satır 272: #End ExternalSource
Satır 273:
Satır 274: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",77)
Satır 275: __ctrl.Content = "IE = 5"
Satır 276:
Satır 277: #End ExternalSource
Satır 278: Return __ctrl
Satır 279: End Function
Satır 280:
Satır 281: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 282: Private Function __BuildControl__control12() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 283: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 284:
Satır 285: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",78)
Satır 286: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 287:
Satır 288: #End ExternalSource
Satır 289:
Satır 290: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",78)
Satır 291: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "X-UA-Compatible")
Satır 292:
Satır 293: #End ExternalSource
Satır 294:
Satır 295: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",78)
Satır 296: __ctrl.Content = "IE = 9"
Satır 297:
Satır 298: #End ExternalSource
Satır 299: Return __ctrl
Satır 300: End Function
Satır 301:
Satır 302: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 303: Private Function __BuildControl__control13() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 304: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 305:
Satır 306: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",79)
Satır 307: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 308:
Satır 309: #End ExternalSource
Satır 310:
Satır 311: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",79)
Satır 312: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("charset", "utf-8")
Satır 313:
Satır 314: #End ExternalSource
Satır 315: Return __ctrl
Satır 316: End Function
Satır 317:
Satır 318: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 319: Private Function __BuildControl__control14() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 320: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 321:
Satır 322: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",80)
Satır 323: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 324:
Satır 325: #End ExternalSource
Satır 326:
Satır 327: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",80)
Satır 328: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("HTTP-EQUIV", "Content-Type")
Satır 329:
Satır 330: #End ExternalSource
Satır 331:
Satır 332: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",80)
Satır 333: __ctrl.Content = "text/html; charset=ISO-8859-9"
Satır 334:
Satır 335: #End ExternalSource
Satır 336: Return __ctrl
Satır 337: End Function
Satır 338:
Satır 339: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 340: Private Function __BuildControl__control15() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 341: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 342:
Satır 343: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",81)
Satır 344: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 345:
Satır 346: #End ExternalSource
Satır 347:
Satır 348: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",81)
Satır 349: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "content-language")
Satır 350:
Satır 351: #End ExternalSource
Satır 352:
Satır 353: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",81)
Satır 354: __ctrl.Content = "TR"
Satır 355:
Satır 356: #End ExternalSource
Satır 357: Return __ctrl
Satır 358: End Function
Satır 359:
Satır 360: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 361: Private Function __BuildControl__control16() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 362: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 363:
Satır 364: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",82)
Satır 365: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 366:
Satır 367: #End ExternalSource
Satır 368:
Satır 369: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",82)
Satır 370: __ctrl.Name = "Pragma"
Satır 371:
Satır 372: #End ExternalSource
Satır 373:
Satır 374: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",82)
Satır 375: __ctrl.Content = "no-cache"
Satır 376:
Satır 377: #End ExternalSource
Satır 378: Return __ctrl
Satır 379: End Function
Satır 380:
Satır 381: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 382: Private Function __BuildControl__control17() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 383: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 384:
Satır 385: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",83)
Satır 386: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 387:
Satır 388: #End ExternalSource
Satır 389:
Satır 390: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",83)
Satır 391: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("HTTP-EQUIV", "cache-control")
Satır 392:
Satır 393: #End ExternalSource
Satır 394:
Satır 395: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",83)
Satır 396: __ctrl.Content = "no-cache"
Satır 397:
Satır 398: #End ExternalSource
Satır 399: Return __ctrl
Satır 400: End Function
Satır 401:
Satır 402: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 403: Private Function __BuildControl__control18() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 404: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 405:
Satır 406: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",85)
Satır 407: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 408:
Satır 409: #End ExternalSource
Satır 410:
Satır 411: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",85)
Satır 412: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("HTTP-EQUIV", "Expires")
Satır 413:
Satır 414: #End ExternalSource
Satır 415:
Satır 416: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",85)
Satır 417: __ctrl.Content = "<%=tarih%>"
Satır 418:
Satır 419: #End ExternalSource
Satır 420: Return __ctrl
Satır 421: End Function
Satır 422:
Satır 423: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 424: Private Function __BuildControl__control19() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 425: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 426:
Satır 427: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",86)
Satır 428: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 429:
Satır 430: #End ExternalSource
Satır 431:
Satır 432: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",86)
Satır 433: __ctrl.Name = "robots"
Satır 434:
Satır 435: #End ExternalSource
Satır 436:
Satır 437: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",86)
Satır 438: __ctrl.Content = "index,follow"
Satır 439:
Satır 440: #End ExternalSource
Satır 441: Return __ctrl
Satır 442: End Function
Satır 443:
Satır 444: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 445: Private Function __BuildControl__control20() As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 446: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 447:
Satır 448: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",87)
Satır 449: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Satır 450:
Satır 451: #End ExternalSource
Satır 452:
Satır 453: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",87)
Satır 454: __ctrl.Name = "keywords"
Satır 455:
Satır 456: #End ExternalSource
Satır 457:
Satır 458: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",87)
Satır 459: __ctrl.Content = "<%=ulkesi%> Karayolu Taşıma, Nakliyerehberim, <%=ulkesi_sehirleri%>, Karayolu taş"& _
Satır 460: "ıma, Karayolu nakliye, Karayolu lojistik, Karayolu nakliyat"
Satır 461:
Satır 462: #End ExternalSource
Satır 463: Return __ctrl
Satır 464: End Function
Satır 465:
Satır 466: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 467: Private Function __BuildControl__control2() As Global.System.Web.UI.HtmlControls.HtmlHead
Satır 468: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlHead
Satır 469:
Satır 470: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 471: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlHead("head")
Satır 472:
Satır 473: #End ExternalSource
Satır 474: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlTitle
Satır 475:
Satır 476: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 477: __ctrl1 = Me.__BuildControl__control3
Satır 478:
Satır 479: #End ExternalSource
Satır 480: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Satır 481:
Satır 482: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 483: __parser.AddParsedSubObject(__ctrl1)
Satır 484:
Satır 485: #End ExternalSource
Satır 486: Dim __ctrl2 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 487:
Satır 488: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 489: __ctrl2 = Me.__BuildControl__control4
Satır 490:
Satır 491: #End ExternalSource
Satır 492:
Satır 493: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 494: __parser.AddParsedSubObject(__ctrl2)
Satır 495:
Satır 496: #End ExternalSource
Satır 497: Dim __ctrl3 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 498:
Satır 499: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 500: __ctrl3 = Me.__BuildControl__control5
Satır 501:
Satır 502: #End ExternalSource
Satır 503:
Satır 504: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 505: __parser.AddParsedSubObject(__ctrl3)
Satır 506:
Satır 507: #End ExternalSource
Satır 508: Dim __ctrl4 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 509:
Satır 510: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 511: __ctrl4 = Me.__BuildControl__control6
Satır 512:
Satır 513: #End ExternalSource
Satır 514:
Satır 515: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 516: __parser.AddParsedSubObject(__ctrl4)
Satır 517:
Satır 518: #End ExternalSource
Satır 519: Dim __ctrl5 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 520:
Satır 521: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 522: __ctrl5 = Me.__BuildControl__control7
Satır 523:
Satır 524: #End ExternalSource
Satır 525:
Satır 526: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 527: __parser.AddParsedSubObject(__ctrl5)
Satır 528:
Satır 529: #End ExternalSource
Satır 530: Dim __ctrl6 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 531:
Satır 532: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 533: __ctrl6 = Me.__BuildControl__control8
Satır 534:
Satır 535: #End ExternalSource
Satır 536:
Satır 537: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 538: __parser.AddParsedSubObject(__ctrl6)
Satır 539:
Satır 540: #End ExternalSource
Satır 541: Dim __ctrl7 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 542:
Satır 543: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 544: __ctrl7 = Me.__BuildControl__control9
Satır 545:
Satır 546: #End ExternalSource
Satır 547:
Satır 548: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 549: __parser.AddParsedSubObject(__ctrl7)
Satır 550:
Satır 551: #End ExternalSource
Satır 552: Dim __ctrl8 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 553:
Satır 554: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 555: __ctrl8 = Me.__BuildControl__control10
Satır 556:
Satır 557: #End ExternalSource
Satır 558:
Satır 559: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 560: __parser.AddParsedSubObject(__ctrl8)
Satır 561:
Satır 562: #End ExternalSource
Satır 563: Dim __ctrl9 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 564:
Satır 565: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 566: __ctrl9 = Me.__BuildControl__control11
Satır 567:
Satır 568: #End ExternalSource
Satır 569:
Satır 570: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 571: __parser.AddParsedSubObject(__ctrl9)
Satır 572:
Satır 573: #End ExternalSource
Satır 574: Dim __ctrl10 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 575:
Satır 576: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 577: __ctrl10 = Me.__BuildControl__control12
Satır 578:
Satır 579: #End ExternalSource
Satır 580:
Satır 581: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 582: __parser.AddParsedSubObject(__ctrl10)
Satır 583:
Satır 584: #End ExternalSource
Satır 585: Dim __ctrl11 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 586:
Satır 587: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 588: __ctrl11 = Me.__BuildControl__control13
Satır 589:
Satır 590: #End ExternalSource
Satır 591:
Satır 592: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 593: __parser.AddParsedSubObject(__ctrl11)
Satır 594:
Satır 595: #End ExternalSource
Satır 596: Dim __ctrl12 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 597:
Satır 598: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 599: __ctrl12 = Me.__BuildControl__control14
Satır 600:
Satır 601: #End ExternalSource
Satır 602:
Satır 603: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 604: __parser.AddParsedSubObject(__ctrl12)
Satır 605:
Satır 606: #End ExternalSource
Satır 607: Dim __ctrl13 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 608:
Satır 609: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 610: __ctrl13 = Me.__BuildControl__control15
Satır 611:
Satır 612: #End ExternalSource
Satır 613:
Satır 614: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 615: __parser.AddParsedSubObject(__ctrl13)
Satır 616:
Satır 617: #End ExternalSource
Satır 618: Dim __ctrl14 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 619:
Satır 620: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 621: __ctrl14 = Me.__BuildControl__control16
Satır 622:
Satır 623: #End ExternalSource
Satır 624:
Satır 625: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 626: __parser.AddParsedSubObject(__ctrl14)
Satır 627:
Satır 628: #End ExternalSource
Satır 629: Dim __ctrl15 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 630:
Satır 631: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 632: __ctrl15 = Me.__BuildControl__control17
Satır 633:
Satır 634: #End ExternalSource
Satır 635:
Satır 636: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 637: __parser.AddParsedSubObject(__ctrl15)
Satır 638:
Satır 639: #End ExternalSource
Satır 640: Dim __ctrl16 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 641:
Satır 642: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 643: __ctrl16 = Me.__BuildControl__control18
Satır 644:
Satır 645: #End ExternalSource
Satır 646:
Satır 647: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 648: __parser.AddParsedSubObject(__ctrl16)
Satır 649:
Satır 650: #End ExternalSource
Satır 651: Dim __ctrl17 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 652:
Satır 653: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 654: __ctrl17 = Me.__BuildControl__control19
Satır 655:
Satır 656: #End ExternalSource
Satır 657:
Satır 658: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 659: __parser.AddParsedSubObject(__ctrl17)
Satır 660:
Satır 661: #End ExternalSource
Satır 662: Dim __ctrl18 As Global.System.Web.UI.HtmlControls.HtmlMeta
Satır 663:
Satır 664: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 665: __ctrl18 = Me.__BuildControl__control20
Satır 666:
Satır 667: #End ExternalSource
Satır 668:
Satır 669: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",10)
Satır 670: __parser.AddParsedSubObject(__ctrl18)
Satır 671:
Satır 672: #End ExternalSource
Satır 673: __ctrl.SetRenderMethodDelegate(AddressOf Me.__Render__control2)
Satır 674: Return __ctrl
Satır 675: End Function
Satır 676:
Satır 677: Private Sub __Render__control2(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Satır 678:
Satır 679: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",13)
Satır 680:
Satır 681: Dim karakter1
Satır 682: dim artan=0
Satır 683: dim dizi_ulkesi(800),artan1
Satır 684:
Satır 685: ulke = Split(Request.QueryString("ulke"),"-")
Satır 686:
Satır 687: if ulke.Length>=2 then
Satır 688: sayfasi=ulke(0)
Satır 689: ulkesi=MyReplace.ReplaceTR(ulke(1))
Satır 690: else
Satır 691: response.redirect("https://www.nakliyerehberim.com")
Satır 692: end if
Satır 693:
Satır 694:
Satır 695:
Satır 696: #End ExternalSource
Satır 697:
Satır 698: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",29)
Satır 699:
Satır 700: Dim Cnn10 As New System.Data.OleDb.OleDbConnection("Provider=SQLOLEDB;Data Source=89.19.10.114;Initial Catalog=alperen1999;Persist Security Info=True;User ID=zeynep2001;Password=Sa.2016.")
Satır 701: Cnn10.Open()
Satır 702: Dim cmd10 As New System.Data.OleDb.OleDbCommand("Select * from ulkeler_sehirler where turkce='"& ulkesi &"' ORDER BY [ID] desc ", Cnn10)
Satır 703: Dim dr10 As System.Data.OleDb.OleDbDataReader
Satır 704:
Satır 705:
Satır 706: #End ExternalSource
Satır 707:
Satır 708: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",35)
Satır 709:
Satır 710: dr10 = cmd10.ExecuteReader()
Satır 711: While dr10.Read()
Satır 712: if dr10.Item("turkce").tostring()=ulkesi then
Satır 713: dizi_ulkesi(artan)= dr10.Item("Sehir").tostring()
Satır 714: artan=artan+1
Satır 715:
Satır 716:
Satır 717: #End ExternalSource
Satır 718:
Satır 719: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",42)
Satır 720:
Satır 721: end if
Satır 722: End While
Satır 723: dr10.Close()
Satır 724: Cnn10.Close()
Satır 725: ulkesi_sehirleri=""
Satır 726: for artan1=1 to artan-1
Satır 727: ulkesi_sehirleri= dizi_ulkesi(artan1).tostring() + ", " + ulkesi_sehirleri.tostring()
Satır 728: next
Satır 729: ulkesi_sehirleri=ulkesi_sehirleri.Replace("0, ", "")
Satır 730: if ulkesi_sehirleri.length <5 then ulkesi_sehirleri="VERİ YOK"
Satır 731: karakter1=len(ulkesi_sehirleri)
Satır 732: if mid(ulkesi_sehirleri,karakter1,karakter1)=" " then
Satır 733: karakter1=karakter1-1
Satır 734: ulkesi_sehirleri=mid(ulkesi_sehirleri,1,karakter1)
Satır 735: end if
Satır 736:
Satır 737: karakter1=len(ulkesi_sehirleri)
Satır 738: if mid(ulkesi_sehirleri,karakter1,karakter1)="," then
Satır 739: karakter1=karakter1-1
Satır 740: ulkesi_sehirleri=mid(ulkesi_sehirleri,1,karakter1)
Satır 741: end if
Satır 742:
Satır 743:
Satır 744:
Satır 745:
Satır 746: #End ExternalSource
Satır 747: parameterContainer.Controls(0).RenderControl(__w)
Satır 748: parameterContainer.Controls(1).RenderControl(__w)
Satır 749: parameterContainer.Controls(2).RenderControl(__w)
Satır 750: parameterContainer.Controls(3).RenderControl(__w)
Satır 751: parameterContainer.Controls(4).RenderControl(__w)
Satır 752: parameterContainer.Controls(5).RenderControl(__w)
Satır 753: parameterContainer.Controls(6).RenderControl(__w)
Satır 754: parameterContainer.Controls(7).RenderControl(__w)
Satır 755: parameterContainer.Controls(8).RenderControl(__w)
Satır 756: parameterContainer.Controls(9).RenderControl(__w)
Satır 757: parameterContainer.Controls(10).RenderControl(__w)
Satır 758: parameterContainer.Controls(11).RenderControl(__w)
Satır 759: parameterContainer.Controls(12).RenderControl(__w)
Satır 760: parameterContainer.Controls(13).RenderControl(__w)
Satır 761: parameterContainer.Controls(14).RenderControl(__w)
Satır 762:
Satır 763: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",84)
Satır 764: tarih=date.now()
Satır 765:
Satır 766: #End ExternalSource
Satır 767: parameterContainer.Controls(15).RenderControl(__w)
Satır 768: parameterContainer.Controls(16).RenderControl(__w)
Satır 769: parameterContainer.Controls(17).RenderControl(__w)
Satır 770: Me.WriteUTF8ResourceString(__w, 175928, 1115, true)
Satır 771: End Sub
Satır 772:
Satır 773: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 774: Private Function __BuildControlform1() As Global.System.Web.UI.HtmlControls.HtmlForm
Satır 775: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlForm
Satır 776:
Satır 777: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",108)
Satır 778: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlForm()
Satır 779:
Satır 780: #End ExternalSource
Satır 781: Me.form1 = __ctrl
Satır 782:
Satır 783: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",108)
Satır 784: __ctrl.ID = "form1"
Satır 785:
Satır 786: #End ExternalSource
Satır 787: __ctrl.SetRenderMethodDelegate(AddressOf Me.__Renderform1)
Satır 788: Return __ctrl
Satır 789: End Function
Satır 790:
Satır 791: Private Sub __Renderform1(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Satır 792: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 793:
Satır 794: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",111)
Satır 795:
Satır 796: sehir = Request.QueryString("il") + ".gif"
Satır 797: plaka = Request.QueryString("il") + ".bmp"
Satır 798: bayrak = ulkesi + ".jpg"
Satır 799:
Satır 800:
Satır 801: #End ExternalSource
Satır 802:
Satır 803: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",119)
Satır 804:
Satır 805: ulkesi_1=ulkesi.Replace("Ö", "O")
Satır 806: ulkesi_1=ulkesi_1.Replace("Ü", "U")
Satır 807: ulkesi_1=ulkesi_1.Replace("o", "ö")
Satır 808: ulkesi_1=ulkesi_1.Replace("u", "ü")
Satır 809: ulkesi_1=ulkesi_1.Replace("ı", "i")
Satır 810: ulkesi_1=ulkesi_1.Replace("Ç", "�")
Satır 811:
Satır 812:
Satır 813: #End ExternalSource
Satır 814:
Satır 815: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",129)
Satır 816:
Satır 817: harita = ulkesi + ".gif"
Satır 818:
Satır 819:
Satır 820: #End ExternalSource
Satır 821:
Satır 822: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",132)
Satır 823:
Satır 824: ulkesi=ulkesi
Satır 825: sql = "Select Count(Kimlik) from kullanici_sifre where (onay=1 and karayolu='1') and (en_iyi_1='"& ulke_deger &"' or en_iyi_2='"& ulke_deger &"' or en_iyi_3='"& ulke_deger &"' or en_iyi_4='"& ulke_deger &"')"
Satır 826: sql1 = "Select firma_unvani, firma_no, logo_ismi, yetkili_kisi, is_telefonu, cep_telefonu, e_posta,en_iyi_1, en_iyi_2,en_iyi_3,en_iyi_4,sehirler_arasi_sehir_1,sehirler_arasi_sehir_2,sehirler_arasi_sehir_3,sehirler_arasi_sehir_4 from kullanici_sifre where (onay=1 and karayolu='1') and (en_iyi_1='"& ulke_deger &"' or en_iyi_2='"& ulke_deger &"' or en_iyi_3='"& ulke_deger &"' or en_iyi_4='"& ulke_deger &"') ORDER BY [Kimlik] desc "
Satır 827:
Satır 828:
Satır 829: #End ExternalSource
Satır 830: Me.WriteUTF8ResourceString(__w, 177043, 22735, false)
Satır 831:
Satır 832: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",664)
Satır 833: __w.Write(ulkesi)
Satır 834:
Satır 835:
Satır 836: #End ExternalSource
Satır 837: __w.Write(" "&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)&Global.Microsoft.VisualBasic.ChrW(9)&"Karayolu Çalışan Nakliye Firmaları</TD>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 838: " <TD class=arama_ust_kategori vAlign=center "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 839: "align=left width=101> <img border=""0"" src=""https://www.nakliyerehberim.com.tr/ul"& _
Satır 840: "kesiler_gelen/")
Satır 841:
Satır 842: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",667)
Satır 843: __w.Write(bayrak )
Satır 844:
Satır 845:
Satır 846: #End ExternalSource
Satır 847: Me.WriteUTF8ResourceString(__w, 199778, 2177, false)
Satır 848:
Satır 849: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",710)
Satır 850:
Satır 851: dim firma_numarasi_sponsor
Satır 852: dim firma_numarasi_sponsor2
Satır 853: dim sponsor_var=0
Satır 854: dim sponsor_var2=0
Satır 855: dim sql_sponsor, sql1_sponsor,renk_sponsor,renk1, firma_adi_sponsor, logosu_sponsor
Satır 856:
Satır 857: dim sql1_sponsor2,sql_sponsor2, firma_adi_sponsor2, logosu_sponsor2
Satır 858:
Satır 859:
Satır 860: if UCase(ulkesi)=UCase("Tunus") then
Satır 861: sponsor_var=1
Satır 862: firma_numarasi_sponsor="23209"
Satır 863: sql_sponsor = "Select Count(Kimlik) from kullanici_sifre where (onay=1) and (firma_no='"& firma_numarasi_sponsor &"')"
Satır 864: sql1_sponsor = "Select firma_unvani,logo_ismi,yetkili_kisi,firma_no,is_telefonu,cep_telefonu,e_posta,sehirler_arasi_sehir_1,sehirler_arasi_sehir_2,sehirler_arasi_sehir_3,sehirler_arasi_sehir_4, en_iyi_1, en_iyi_2, en_iyi_3, en_iyi_4 ,il,ilce from kullanici_sifre where (onay=1) and (firma_no='"& firma_numarasi_sponsor &"') ORDER BY [Kimlik] desc "
Satır 865:
Satır 866: end if
Satır 867:
Satır 868:
Satır 869:
Satır 870:
Satır 871: #End ExternalSource
Satır 872:
Satır 873: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",732)
Satır 874: if sponsor_var=1 then
Satır 875:
Satır 876: #End ExternalSource
Satır 877: __w.Write(""&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<p> </p>"&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)&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)&" ")
Satır 878:
Satır 879: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",736)
Satır 880:
Satır 881: Dim dt_sponsor2 As Data.DataTable
Satır 882: Dim cnn_sponsor2 As New Data.OleDb.OleDbConnection("Provider=SQLOLEDB;Data Source=89.19.10.114;Initial Catalog=alperen1999;Persist Security Info=True;User ID=zeynep2001;Password=Sa.2016.")
Satır 883:
Satır 884: if sponsor_var2=1 then
Satır 885: Dim cmd_sponsor2 As New System.Data.OleDb.OleDbCommand(sql_sponsor2, cnn_sponsor2)
Satır 886: Dim da_sponsor2 As New System.Data.OleDb.OleDbDataAdapter(sql1_sponsor2, cnn_sponsor2)
Satır 887:
Satır 888: Dim ds_sponsor2 As New Data.DataSet
Satır 889: cnn_sponsor2.Open()
Satır 890: da_sponsor2.Fill(ds_sponsor2, "kullanici_sifre")
Satır 891: dt_sponsor2 = ds_sponsor2.Tables(0)
Satır 892: end if
Satır 893:
Satır 894:
Satır 895: Dim a_sponsor
Satır 896: Dim pagePerRecord_sponsor As Integer = 20
Satır 897: Dim showMaxPageCount_sponsor As Integer = 20
Satır 898: Dim currentPagePart_sponsor As Integer = 1
Satır 899: Dim cnn_sponsor As New Data.OleDb.OleDbConnection("Provider=SQLOLEDB;Data Source=89.19.10.114;Initial Catalog=alperen1999;Persist Security Info=True;User ID=zeynep2001;Password=Sa.2016.")
Satır 900:
Satır 901: Dim cmd_sponsor As New System.Data.OleDb.OleDbCommand(sql_sponsor, cnn_sponsor)
Satır 902: Dim da_sponsor As New System.Data.OleDb.OleDbDataAdapter(sql1_sponsor, cnn_sponsor)
Satır 903:
Satır 904: Dim ds_sponsor As New Data.DataSet
Satır 905: cnn_sponsor.Open()
Satır 906: Dim recordCount_sponsor As Integer = cmd_sponsor.ExecuteScalar()
Satır 907:
Satır 908: '" & Trim$(Text1.Text) & "'
Satır 909: If IsNumeric(1) Then
Satır 910: currentPagePart_sponsor = Convert.ToInt16(1)
Satır 911: End If
Satır 912:
Satır 913: 'da.Fill(ds, currentPagePart * pagePerRecord, pagePerRecord, "bayi")
Satır 914: da_sponsor.Fill(ds_sponsor, (currentPagePart_sponsor - 1) * pagePerRecord_sponsor, pagePerRecord_sponsor, "kullanici_sifre")
Satır 915:
Satır 916:
Satır 917: Dim dt_sponsor As Data.DataTable = ds_sponsor.Tables(0)
Satır 918:
Satır 919: For i_sponsor As Integer = 0 To dt_sponsor.Rows.Count - 1
Satır 920: a_sponsor = a_sponsor + 1
Satır 921:
Satır 922:
Satır 923:
Satır 924: #End ExternalSource
Satır 925:
Satır 926: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",780)
Satır 927: If a_sponsor Mod 2 = 0 Then
Satır 928: renk_sponsor=renk1
Satır 929: else
Satır 930: renk_sponsor="#FFFFFF"
Satır 931:
Satır 932: end if
Satır 933:
Satır 934:
Satır 935: #End ExternalSource
Satır 936:
Satır 937: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",787)
Satır 938:
Satır 939:
Satır 940:
Satır 941: if sponsor_var2=1 then
Satır 942:
Satır 943: dim karakter_sponsor2
Satır 944: firma_adi_sponsor2=dt_sponsor2.Rows(0)("firma_unvani").ToString().Replace(" ", "-")
Satır 945: firma_adi_sponsor2=firma_adi_sponsor2.Replace(".", "-")
Satır 946: firma_adi_sponsor2=firma_adi_sponsor2.Replace("(", "")
Satır 947: firma_adi_sponsor2=firma_adi_sponsor2.Replace(")", "")
Satır 948: firma_adi_sponsor2=firma_adi_sponsor2.Replace("\", "")
Satır 949: firma_adi_sponsor2=firma_adi_sponsor2.Replace("/", "")
Satır 950: firma_adi_sponsor2=firma_adi_sponsor2.Replace(",", "")
Satır 951: firma_adi_sponsor2=firma_adi_sponsor2.Replace("&", "")
Satır 952: firma_adi_sponsor2=firma_adi_sponsor2.Replace(":", "")
Satır 953: firma_adi_sponsor2=firma_adi_sponsor2.Replace("=", "")
Satır 954:
Satır 955:
Satır 956: firma_adi_sponsor2=firma_adi_sponsor2.Replace("?", "")
Satır 957: firma_adi_sponsor2=firma_adi_sponsor2.Replace("*", "")
Satır 958: firma_adi_sponsor2=firma_adi_sponsor2.Replace("!", "")
Satır 959: firma_adi_sponsor2=firma_adi_sponsor2.Replace("@", "")
Satır 960: firma_adi_sponsor2=firma_adi_sponsor2.Replace("+", "")
Satır 961: firma_adi_sponsor2=firma_adi_sponsor2.Replace("-----", "-")
Satır 962: firma_adi_sponsor2=firma_adi_sponsor2.Replace("----", "-")
Satır 963: firma_adi_sponsor2=firma_adi_sponsor2.Replace("---", "-")
Satır 964: firma_adi_sponsor2=firma_adi_sponsor2.Replace("--", "-")
Satır 965: firma_adi_sponsor2=trim(firma_adi_sponsor2)
Satır 966: firma_adi_sponsor2=lcase(firma_adi_sponsor2)
Satır 967: karakter_sponsor2=len(firma_adi_sponsor2)
Satır 968:
Satır 969: firma_adi_sponsor2=firma_adi_sponsor2.Replace("ı", "i")
Satır 970: firma_adi_sponsor2=firma_adi_sponsor2.Replace("ş", "s")
Satır 971: firma_adi_sponsor2=firma_adi_sponsor2.Replace("ç", "c")
Satır 972: firma_adi_sponsor2=firma_adi_sponsor2.Replace("ğ", "g")
Satır 973: firma_adi_sponsor2=firma_adi_sponsor2.Replace("ö", "o")
Satır 974: firma_adi_sponsor2=firma_adi_sponsor2.Replace("ü", "u")
Satır 975:
Satır 976: if mid(firma_adi_sponsor2,karakter_sponsor2,karakter_sponsor2)="-" then
Satır 977: karakter_sponsor2=karakter_sponsor2-1
Satır 978: firma_adi_sponsor2=mid(firma_adi_sponsor2,1,karakter_sponsor2)
Satır 979: end if
Satır 980:
Satır 981: if dt_sponsor2.Rows(0)("logo_ismi").ToString()="" or dt_sponsor2.Rows(0)("logo_ismi").ToString()="yok.jpg" then
Satır 982: logosu_sponsor2="yok.jpg"
Satır 983: else
Satır 984: logosu_sponsor2=dt_sponsor2.Rows(0)("logo_ismi").ToString()
Satır 985: end if
Satır 986:
Satır 987: end if
Satır 988:
Satır 989:
Satır 990: dim karakter_sponsor
Satır 991: firma_adi_sponsor=dt_sponsor.Rows(i_sponsor)("firma_unvani").ToString().Replace(" ", "-")
Satır 992: firma_adi_sponsor=firma_adi_sponsor.Replace(".", "-")
Satır 993: firma_adi_sponsor=firma_adi_sponsor.Replace("(", "")
Satır 994: firma_adi_sponsor=firma_adi_sponsor.Replace(")", "")
Satır 995: firma_adi_sponsor=firma_adi_sponsor.Replace("\", "")
Satır 996: firma_adi_sponsor=firma_adi_sponsor.Replace("/", "")
Satır 997: firma_adi_sponsor=firma_adi_sponsor.Replace(",", "")
Satır 998: firma_adi_sponsor=firma_adi_sponsor.Replace("&", "")
Satır 999: firma_adi_sponsor=firma_adi_sponsor.Replace(":", "")
Satır 1000: firma_adi_sponsor=firma_adi_sponsor.Replace("=", "")
Satır 1001:
Satır 1002:
Satır 1003: firma_adi_sponsor=firma_adi_sponsor.Replace("?", "")
Satır 1004: firma_adi_sponsor=firma_adi_sponsor.Replace("*", "")
Satır 1005: firma_adi_sponsor=firma_adi_sponsor.Replace("!", "")
Satır 1006: firma_adi_sponsor=firma_adi_sponsor.Replace("@", "")
Satır 1007: firma_adi_sponsor=firma_adi_sponsor.Replace("+", "")
Satır 1008: firma_adi_sponsor=firma_adi_sponsor.Replace("-----", "-")
Satır 1009: firma_adi_sponsor=firma_adi_sponsor.Replace("----", "-")
Satır 1010: firma_adi_sponsor=firma_adi_sponsor.Replace("---", "-")
Satır 1011: firma_adi_sponsor=firma_adi_sponsor.Replace("--", "-")
Satır 1012: firma_adi_sponsor=trim(firma_adi_sponsor)
Satır 1013: firma_adi_sponsor=lcase(firma_adi_sponsor)
Satır 1014: karakter_sponsor=len(firma_adi_sponsor)
Satır 1015:
Satır 1016: firma_adi_sponsor=firma_adi_sponsor.Replace("ı", "i")
Satır 1017: firma_adi_sponsor=firma_adi_sponsor.Replace("ş", "s")
Satır 1018: firma_adi_sponsor=firma_adi_sponsor.Replace("ç", "c")
Satır 1019: firma_adi_sponsor=firma_adi_sponsor.Replace("ğ", "g")
Satır 1020: firma_adi_sponsor=firma_adi_sponsor.Replace("ö", "o")
Satır 1021: firma_adi_sponsor=firma_adi_sponsor.Replace("ü", "u")
Satır 1022:
Satır 1023: if mid(firma_adi_sponsor,karakter_sponsor,karakter_sponsor)="-" then
Satır 1024: karakter_sponsor=karakter_sponsor-1
Satır 1025: firma_adi_sponsor=mid(firma_adi_sponsor,1,karakter_sponsor)
Satır 1026: end if
Satır 1027:
Satır 1028:
Satır 1029: if dt_sponsor.Rows(i_sponsor)("logo_ismi").ToString()="" or dt_sponsor.Rows(i_sponsor)("logo_ismi").ToString()="yok.jpg" then
Satır 1030: logosu_sponsor="yok.jpg"
Satır 1031: else
Satır 1032: logosu_sponsor=dt_sponsor.Rows(i_sponsor)("logo_ismi").ToString()
Satır 1033: end if
Satır 1034:
Satır 1035:
Satır 1036: #End ExternalSource
Satır 1037: Me.WriteUTF8ResourceString(__w, 201955, 536, true)
Satır 1038:
Satır 1039: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",890)
Satır 1040: __w.Write(ucase(ulkesi))
Satır 1041:
Satır 1042:
Satır 1043: #End ExternalSource
Satır 1044: __w.Write(" GOLD ÜLKE SPONSORU</font></td>"&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)&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)&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<td style=""border-s"& _
Satır 1045: "tyle: none; border-width: medium"" width=""300"" bgcolor=""#DCDCDC"">"&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)&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)& _
Satır 1046: ""&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<p align=""center""><font size=""4"">")
Satır 1047:
Satır 1048: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",892)
Satır 1049: __w.Write(ucase(ulkesi))
Satır 1050:
Satır 1051:
Satır 1052: #End ExternalSource
Satır 1053: Me.WriteUTF8ResourceString(__w, 202491, 1473, false)
Satır 1054:
Satır 1055: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",913)
Satır 1056: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_unvani").ToString())
Satır 1057:
Satır 1058:
Satır 1059: #End ExternalSource
Satır 1060: __w.Write(" vAlign=""center"" align=""left"">"&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)&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)&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)&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)&"<p align=""center""><fo"& _
Satır 1061: "nt style=""font-weight: 700"" face=""Tahoma"" size=""5"">")
Satır 1062:
Satır 1063: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",914)
Satır 1064: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_unvani").ToString())
Satır 1065:
Satır 1066:
Satır 1067: #End ExternalSource
Satır 1068: Me.WriteUTF8ResourceString(__w, 203964, 1256, false)
Satır 1069:
Satır 1070: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",934)
Satır 1071: if sponsor_var2=1 then
Satır 1072:
Satır 1073: #End ExternalSource
Satır 1074: __w.Write(""&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)&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)&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)&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)&"<tr>"&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)&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)&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)&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)&"<td style=""border-st"& _
Satır 1075: "yle: none; border-width: medium"">"&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)&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)&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)&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)&"<p align=""center""><"& _
Satır 1076: "font style=""font-weight: 700"" face=""Tahoma"" size=""5"">")
Satır 1077:
Satır 1078: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",938)
Satır 1079: __w.Write(dt_sponsor2.Rows(0)("firma_unvani").ToString())
Satır 1080:
Satır 1081:
Satır 1082: #End ExternalSource
Satır 1083: __w.Write("</font></td>"&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)&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)&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</tr>"&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)&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)&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9))
Satır 1084:
Satır 1085: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",940)
Satır 1086: end if
Satır 1087:
Satır 1088: #End ExternalSource
Satır 1089: Me.WriteUTF8ResourceString(__w, 205220, 2167, false)
Satır 1090:
Satır 1091: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",986)
Satır 1092: __w.Write(dt_sponsor.Rows(i_sponsor)("il").ToString())
Satır 1093:
Satır 1094:
Satır 1095: #End ExternalSource
Satır 1096: __w.Write(" "&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"/ ")
Satır 1097:
Satır 1098: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",987)
Satır 1099: __w.Write(dt_sponsor.Rows(i_sponsor)("ilce").ToString())
Satır 1100:
Satır 1101:
Satır 1102: #End ExternalSource
Satır 1103: __w.Write("</font></b></td>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<td width=""28""> </td>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<td width=""128""><"& _
Satır 1104: "b>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<a target=""_blank"" href=""../ayrinti_siralamasi/firmanin_yukleri.as"& _
Satır 1105: "px?firma_no=")
Satır 1106:
Satır 1107: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",990)
Satır 1108: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_no").ToString())
Satır 1109:
Satır 1110:
Satır 1111: #End ExternalSource
Satır 1112: Me.WriteUTF8ResourceString(__w, 207387, 305, false)
Satır 1113:
Satır 1114: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",995)
Satır 1115: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_no").ToString())
Satır 1116:
Satır 1117:
Satır 1118: #End ExternalSource
Satır 1119: Me.WriteUTF8ResourceString(__w, 207692, 293, false)
Satır 1120:
Satır 1121: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1000)
Satır 1122: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_no").ToString())
Satır 1123:
Satır 1124:
Satır 1125: #End ExternalSource
Satır 1126: Me.WriteUTF8ResourceString(__w, 207985, 605, false)
Satır 1127:
Satır 1128: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1010)
Satır 1129: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_no").ToString())
Satır 1130:
Satır 1131:
Satır 1132: #End ExternalSource
Satır 1133: __w.Write("_")
Satır 1134:
Satır 1135: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1010)
Satır 1136: __w.Write(firma_adi_sponsor)
Satır 1137:
Satır 1138:
Satır 1139: #End ExternalSource
Satır 1140: __w.Write("')"" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" class=""bevel noshine"" height=100 "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 1141: " alt=""Detaylı Bilgi İçin Tıklayınız! "" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 1142: " src=""https://www.nakliyerehberim.com.tr/Logolar/")
Satır 1143:
Satır 1144: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1013)
Satır 1145: __w.Write(logosu_sponsor)
Satır 1146:
Satır 1147:
Satır 1148: #End ExternalSource
Satır 1149: Me.WriteUTF8ResourceString(__w, 208590, 1178, true)
Satır 1150:
Satır 1151: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1028)
Satır 1152: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_no").ToString())
Satır 1153:
Satır 1154:
Satır 1155: #End ExternalSource
Satır 1156: __w.Write("_")
Satır 1157:
Satır 1158: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1028)
Satır 1159: __w.Write(firma_adi_sponsor)
Satır 1160:
Satır 1161:
Satır 1162: #End ExternalSource
Satır 1163: __w.Write("')"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_baslik_yazi title=""")
Satır 1164:
Satır 1165: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1029)
Satır 1166: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_unvani").ToString())
Satır 1167:
Satır 1168:
Satır 1169: #End ExternalSource
Satır 1170: __w.Write(""" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" vAlign=center align=left colspan=""2"">"&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)& _
Satır 1171: ""&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<font face=""Tahoma"" style=""font-size: 9pt; font-weight:700"" color=""#FFFFFF"">")
Satır 1172:
Satır 1173: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1031)
Satır 1174: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_unvani").ToString())
Satır 1175:
Satır 1176:
Satır 1177: #End ExternalSource
Satır 1178: __w.Write("</font></TD></TR>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TR style=""CURSOR: hand"" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 1179: " onclick=""window.open('https://www.nakliyerehberim.c"& _
Satır 1180: "om.tr/ayrinti_siralamasi/detay/")
Satır 1181:
Satır 1182: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1033)
Satır 1183: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_no").ToString())
Satır 1184:
Satır 1185:
Satır 1186: #End ExternalSource
Satır 1187: __w.Write("_")
Satır 1188:
Satır 1189: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1033)
Satır 1190: __w.Write(firma_adi_sponsor)
Satır 1191:
Satır 1192:
Satır 1193: #End ExternalSource
Satır 1194: __w.Write("')"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_icerik_yazi title=""")
Satır 1195:
Satır 1196: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1034)
Satır 1197: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_unvani").ToString())
Satır 1198:
Satır 1199:
Satır 1200: #End ExternalSource
Satır 1201: __w.Write(""" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" vAlign=center align=left height=""58"" width=""6"& _
Satır 1202: "4%"">"&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)&Global.Microsoft.VisualBasic.ChrW(9)&"<font face=""Tahoma"" style=""font-size: 8pt"" color=""#FFFFFF"">")
Satır 1203:
Satır 1204: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1036)
Satır 1205: __w.Write(dt_sponsor.Rows(i_sponsor)("yetkili_kisi").ToString())
Satır 1206:
Satır 1207:
Satır 1208: #End ExternalSource
Satır 1209: __w.Write("<br />")
Satır 1210:
Satır 1211: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1036)
Satır 1212: __w.Write(dt_sponsor.Rows(i_sponsor)("is_telefonu").ToString())
Satır 1213:
Satır 1214:
Satır 1215: #End ExternalSource
Satır 1216: __w.Write("<br />")
Satır 1217:
Satır 1218: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1036)
Satır 1219: __w.Write(dt_sponsor.Rows(i_sponsor)("cep_telefonu").ToString())
Satır 1220:
Satır 1221:
Satır 1222: #End ExternalSource
Satır 1223: __w.Write("<br />")
Satır 1224:
Satır 1225: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1036)
Satır 1226: __w.Write(dt_sponsor.Rows(i_sponsor)("e_posta").ToString())
Satır 1227:
Satır 1228:
Satır 1229: #End ExternalSource
Satır 1230: __w.Write("</font></TD>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_icerik_yazi titl"& _
Satır 1231: "e=""")
Satır 1232:
Satır 1233: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1037)
Satır 1234: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_unvani").ToString())
Satır 1235:
Satır 1236:
Satır 1237: #End ExternalSource
Satır 1238: Me.WriteUTF8ResourceString(__w, 209768, 583, true)
Satır 1239:
Satır 1240: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1043)
Satır 1241: __w.Write(dt_sponsor.Rows(i_sponsor)("firma_no").ToString())
Satır 1242:
Satır 1243:
Satır 1244: #End ExternalSource
Satır 1245: Me.WriteUTF8ResourceString(__w, 210351, 1925, false)
Satır 1246:
Satır 1247: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1071)
Satır 1248: __w.Write(dt_sponsor.Rows(i_sponsor)("en_iyi_1").ToString())
Satır 1249:
Satır 1250:
Satır 1251: #End ExternalSource
Satır 1252: Me.WriteUTF8ResourceString(__w, 212276, 620, true)
Satır 1253:
Satır 1254: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1081)
Satır 1255: __w.Write(dt_sponsor.Rows(i_sponsor)("en_iyi_2").ToString())
Satır 1256:
Satır 1257:
Satır 1258: #End ExternalSource
Satır 1259: Me.WriteUTF8ResourceString(__w, 212896, 620, true)
Satır 1260:
Satır 1261: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1091)
Satır 1262: __w.Write(dt_sponsor.Rows(i_sponsor)("en_iyi_3").ToString())
Satır 1263:
Satır 1264:
Satır 1265: #End ExternalSource
Satır 1266: Me.WriteUTF8ResourceString(__w, 213516, 620, true)
Satır 1267:
Satır 1268: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1101)
Satır 1269: __w.Write(dt_sponsor.Rows(i_sponsor)("en_iyi_4").ToString())
Satır 1270:
Satır 1271:
Satır 1272: #End ExternalSource
Satır 1273: Me.WriteUTF8ResourceString(__w, 214136, 2055, false)
Satır 1274:
Satır 1275: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1133)
Satır 1276: __w.Write(dt_sponsor.Rows(i_sponsor)("sehirler_arasi_sehir_1").ToString())
Satır 1277:
Satır 1278:
Satır 1279: #End ExternalSource
Satır 1280: Me.WriteUTF8ResourceString(__w, 216191, 620, true)
Satır 1281:
Satır 1282: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1143)
Satır 1283: __w.Write(dt_sponsor.Rows(i_sponsor)("sehirler_arasi_sehir_2").ToString())
Satır 1284:
Satır 1285:
Satır 1286: #End ExternalSource
Satır 1287: Me.WriteUTF8ResourceString(__w, 216811, 620, true)
Satır 1288:
Satır 1289: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1153)
Satır 1290: __w.Write(dt_sponsor.Rows(i_sponsor)("sehirler_arasi_sehir_3").ToString())
Satır 1291:
Satır 1292:
Satır 1293: #End ExternalSource
Satır 1294: Me.WriteUTF8ResourceString(__w, 217431, 620, true)
Satır 1295:
Satır 1296: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1163)
Satır 1297: __w.Write(dt_sponsor.Rows(i_sponsor)("sehirler_arasi_sehir_4").ToString())
Satır 1298:
Satır 1299:
Satır 1300: #End ExternalSource
Satır 1301: Me.WriteUTF8ResourceString(__w, 218051, 868, true)
Satır 1302:
Satır 1303: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1176)
Satır 1304: __w.Write(dt_sponsor.Rows(0)("firma_no").ToString())
Satır 1305:
Satır 1306:
Satır 1307: #End ExternalSource
Satır 1308: Me.WriteUTF8ResourceString(__w, 218919, 361, false)
Satır 1309:
Satır 1310: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1178)
Satır 1311: __w.Write(dt_sponsor.Rows(0)("firma_no").ToString())
Satır 1312:
Satır 1313:
Satır 1314: #End ExternalSource
Satır 1315: Me.WriteUTF8ResourceString(__w, 219280, 363, false)
Satır 1316:
Satır 1317: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1180)
Satır 1318: __w.Write(dt_sponsor.Rows(0)("firma_no").ToString())
Satır 1319:
Satır 1320:
Satır 1321: #End ExternalSource
Satır 1322: Me.WriteUTF8ResourceString(__w, 219643, 309, false)
Satır 1323:
Satır 1324: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1182)
Satır 1325: __w.Write(dt_sponsor.Rows(0)("firma_no").ToString())
Satır 1326:
Satır 1327:
Satır 1328: #End ExternalSource
Satır 1329: __w.Write("""><font style=""FONT-SIZE: 9pt; FONT-WEIGHT: 700; TEXT-DECORATION: none"" color=""#f"& _
Satır 1330: "fffff"" face=""Tahoma"">Firmaya Mesaj Gönder</font></a></td>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</tr>"&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)& _
Satır 1331: ""&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 1332: "")
Satır 1333:
Satır 1334: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1187)
Satır 1335:
Satır 1336: Next
Satır 1337: cnn_sponsor.Close()
Satır 1338:
Satır 1339:
Satır 1340: #End ExternalSource
Satır 1341: Me.WriteUTF8ResourceString(__w, 219952, 730, true)
Satır 1342:
Satır 1343: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1213)
Satır 1344: if sponsor_var2=1 then
Satır 1345:
Satır 1346: #End ExternalSource
Satır 1347: Me.WriteUTF8ResourceString(__w, 220682, 1480, true)
Satır 1348:
Satır 1349: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1235)
Satır 1350: __w.Write(dt_sponsor2.Rows(0)("il").ToString())
Satır 1351:
Satır 1352:
Satır 1353: #End ExternalSource
Satır 1354: __w.Write(" "&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"/ ")
Satır 1355:
Satır 1356: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1236)
Satır 1357: __w.Write(dt_sponsor2.Rows(0)("ilce").ToString())
Satır 1358:
Satır 1359:
Satır 1360: #End ExternalSource
Satır 1361: __w.Write("</font></b></td>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<td width=""28""> </td>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<td width=""128""><"& _
Satır 1362: "b>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<a target=""_blank"" href=""../ayrinti_siralamasi/firmanin_yukleri.as"& _
Satır 1363: "px?firma_no=")
Satır 1364:
Satır 1365: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1239)
Satır 1366: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1367:
Satır 1368:
Satır 1369: #End ExternalSource
Satır 1370: Me.WriteUTF8ResourceString(__w, 222162, 305, false)
Satır 1371:
Satır 1372: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1244)
Satır 1373: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1374:
Satır 1375:
Satır 1376: #End ExternalSource
Satır 1377: Me.WriteUTF8ResourceString(__w, 222467, 293, false)
Satır 1378:
Satır 1379: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1249)
Satır 1380: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1381:
Satır 1382:
Satır 1383: #End ExternalSource
Satır 1384: Me.WriteUTF8ResourceString(__w, 222760, 611, false)
Satır 1385:
Satır 1386: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1259)
Satır 1387: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1388:
Satır 1389:
Satır 1390: #End ExternalSource
Satır 1391: __w.Write("_")
Satır 1392:
Satır 1393: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1259)
Satır 1394: __w.Write(firma_adi_sponsor2)
Satır 1395:
Satır 1396:
Satır 1397: #End ExternalSource
Satır 1398: __w.Write("')"" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" class=""bevel noshine"" height=100 "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 1399: " alt=""Detaylı Bilgi İçin Tıklayınız! "" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 1400: " src=""https://www.nakliyerehberim.com.tr/Logolar/")
Satır 1401:
Satır 1402: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1262)
Satır 1403: __w.Write(logosu_sponsor2)
Satır 1404:
Satır 1405:
Satır 1406: #End ExternalSource
Satır 1407: Me.WriteUTF8ResourceString(__w, 223371, 1200, true)
Satır 1408:
Satır 1409: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1277)
Satır 1410: __w.Write(dt_sponsor.Rows(0)("firma_no").ToString())
Satır 1411:
Satır 1412:
Satır 1413: #End ExternalSource
Satır 1414: __w.Write("_")
Satır 1415:
Satır 1416: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1277)
Satır 1417: __w.Write(firma_adi_sponsor2)
Satır 1418:
Satır 1419:
Satır 1420: #End ExternalSource
Satır 1421: __w.Write("')"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_baslik_yazi title=""")
Satır 1422:
Satır 1423: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1278)
Satır 1424: __w.Write(dt_sponsor2.Rows(0)("firma_unvani").ToString())
Satır 1425:
Satır 1426:
Satır 1427: #End ExternalSource
Satır 1428: __w.Write(""" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" vAlign=center align=left colspan=""2"">"&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)& _
Satır 1429: ""&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<font face=""Tahoma"" style=""font-size: 9pt; font-weight:700"">")
Satır 1430:
Satır 1431: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1280)
Satır 1432: __w.Write(dt_sponsor2.Rows(0)("firma_unvani").ToString())
Satır 1433:
Satır 1434:
Satır 1435: #End ExternalSource
Satır 1436: __w.Write("</font></TD></TR>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TR style=""CURSOR: hand"" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 1437: " onclick=""window.open('https://www.nakliyerehberim.c"& _
Satır 1438: "om.tr/ayrinti_siralamasi/detay/")
Satır 1439:
Satır 1440: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1282)
Satır 1441: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1442:
Satır 1443:
Satır 1444: #End ExternalSource
Satır 1445: __w.Write("_")
Satır 1446:
Satır 1447: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1282)
Satır 1448: __w.Write(firma_adi_sponsor2)
Satır 1449:
Satır 1450:
Satır 1451: #End ExternalSource
Satır 1452: __w.Write("')"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_icerik_yazi title=""")
Satır 1453:
Satır 1454: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1283)
Satır 1455: __w.Write(dt_sponsor2.Rows(0)("firma_unvani").ToString())
Satır 1456:
Satır 1457:
Satır 1458: #End ExternalSource
Satır 1459: __w.Write(""" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" vAlign=center align=left height=""58"" width=""6"& _
Satır 1460: "4%"">"&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)&Global.Microsoft.VisualBasic.ChrW(9)&"<font face=""Tahoma"" style=""font-size: 8pt"">")
Satır 1461:
Satır 1462: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1285)
Satır 1463: __w.Write(dt_sponsor2.Rows(0)("yetkili_kisi").ToString())
Satır 1464:
Satır 1465:
Satır 1466: #End ExternalSource
Satır 1467: __w.Write("<br />")
Satır 1468:
Satır 1469: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1285)
Satır 1470: __w.Write(dt_sponsor2.Rows(0)("is_telefonu").ToString())
Satır 1471:
Satır 1472:
Satır 1473: #End ExternalSource
Satır 1474: __w.Write("<br />")
Satır 1475:
Satır 1476: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1285)
Satır 1477: __w.Write(dt_sponsor2.Rows(0)("cep_telefonu").ToString())
Satır 1478:
Satır 1479:
Satır 1480: #End ExternalSource
Satır 1481: __w.Write("<br />")
Satır 1482:
Satır 1483: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1285)
Satır 1484: __w.Write(dt_sponsor2.Rows(0)("e_posta").ToString())
Satır 1485:
Satır 1486:
Satır 1487: #End ExternalSource
Satır 1488: __w.Write("</font></TD>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_icerik_yazi titl"& _
Satır 1489: "e=""")
Satır 1490:
Satır 1491: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1286)
Satır 1492: __w.Write(dt_sponsor2.Rows(0)("firma_unvani").ToString())
Satır 1493:
Satır 1494:
Satır 1495: #End ExternalSource
Satır 1496: Me.WriteUTF8ResourceString(__w, 224571, 567, true)
Satır 1497:
Satır 1498: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1292)
Satır 1499: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1500:
Satır 1501:
Satır 1502: #End ExternalSource
Satır 1503: Me.WriteUTF8ResourceString(__w, 225138, 1899, false)
Satır 1504:
Satır 1505: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1320)
Satır 1506: __w.Write(dt_sponsor2.Rows(0)("en_iyi_1").ToString())
Satır 1507:
Satır 1508:
Satır 1509: #End ExternalSource
Satır 1510: Me.WriteUTF8ResourceString(__w, 227037, 588, true)
Satır 1511:
Satır 1512: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1330)
Satır 1513: __w.Write(dt_sponsor2.Rows(0)("en_iyi_2").ToString())
Satır 1514:
Satır 1515:
Satır 1516: #End ExternalSource
Satır 1517: Me.WriteUTF8ResourceString(__w, 227625, 588, true)
Satır 1518:
Satır 1519: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1340)
Satır 1520: __w.Write(dt_sponsor2.Rows(0)("en_iyi_3").ToString())
Satır 1521:
Satır 1522:
Satır 1523: #End ExternalSource
Satır 1524: Me.WriteUTF8ResourceString(__w, 228213, 588, true)
Satır 1525:
Satır 1526: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1350)
Satır 1527: __w.Write(dt_sponsor2.Rows(0)("en_iyi_4").ToString())
Satır 1528:
Satır 1529:
Satır 1530: #End ExternalSource
Satır 1531: Me.WriteUTF8ResourceString(__w, 228801, 2051, false)
Satır 1532:
Satır 1533: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1382)
Satır 1534: __w.Write(dt_sponsor2.Rows(0)("sehirler_arasi_sehir_1").ToString())
Satır 1535:
Satır 1536:
Satır 1537: #End ExternalSource
Satır 1538: Me.WriteUTF8ResourceString(__w, 230852, 588, true)
Satır 1539:
Satır 1540: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1392)
Satır 1541: __w.Write(dt_sponsor2.Rows(0)("sehirler_arasi_sehir_2").ToString())
Satır 1542:
Satır 1543:
Satır 1544: #End ExternalSource
Satır 1545: Me.WriteUTF8ResourceString(__w, 231440, 588, true)
Satır 1546:
Satır 1547: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1402)
Satır 1548: __w.Write(dt_sponsor2.Rows(0)("sehirler_arasi_sehir_3").ToString())
Satır 1549:
Satır 1550:
Satır 1551: #End ExternalSource
Satır 1552: Me.WriteUTF8ResourceString(__w, 232028, 588, true)
Satır 1553:
Satır 1554: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1412)
Satır 1555: __w.Write(dt_sponsor2.Rows(0)("sehirler_arasi_sehir_4").ToString())
Satır 1556:
Satır 1557:
Satır 1558: #End ExternalSource
Satır 1559: Me.WriteUTF8ResourceString(__w, 232616, 900, true)
Satır 1560:
Satır 1561: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1422)
Satır 1562: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1563:
Satır 1564:
Satır 1565: #End ExternalSource
Satır 1566: Me.WriteUTF8ResourceString(__w, 233516, 600, false)
Satır 1567:
Satır 1568: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1426)
Satır 1569: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1570:
Satır 1571:
Satır 1572: #End ExternalSource
Satır 1573: Me.WriteUTF8ResourceString(__w, 234116, 460, false)
Satır 1574:
Satır 1575: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1428)
Satır 1576: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1577:
Satır 1578:
Satır 1579: #End ExternalSource
Satır 1580: Me.WriteUTF8ResourceString(__w, 234576, 406, false)
Satır 1581:
Satır 1582: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1430)
Satır 1583: __w.Write(dt_sponsor2.Rows(0)("firma_no").ToString())
Satır 1584:
Satır 1585:
Satır 1586: #End ExternalSource
Satır 1587: Me.WriteUTF8ResourceString(__w, 234982, 710, false)
Satır 1588:
Satır 1589: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1445)
Satır 1590:
Satır 1591: end if
Satır 1592: if sponsor_var2=1 then
Satır 1593:
Satır 1594: cnn_sponsor2.Close()
Satır 1595: end if
Satır 1596:
Satır 1597: end if
Satır 1598:
Satır 1599: #End ExternalSource
Satır 1600: Me.WriteUTF8ResourceString(__w, 235692, 533, true)
Satır 1601:
Satır 1602: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1479)
Satır 1603:
Satır 1604:
Satır 1605:
Satır 1606: Dim a
Satır 1607: Dim pagePerRecord As Integer = 10
Satır 1608: Dim showMaxPageCount As Integer = 20
Satır 1609: Dim currentPagePart As Integer = 1
Satır 1610: Dim cnn As New Data.OleDb.OleDbConnection("Provider=SQLOLEDB;Data Source=89.19.10.114;Initial Catalog=alperen1999;Persist Security Info=True;User ID=zeynep2001;Password=Sa.2016.")
Satır 1611:
Satır 1612: Dim cmd As New System.Data.OleDb.OleDbCommand(sql, cnn)
Satır 1613: Dim da As New System.Data.OleDb.OleDbDataAdapter(sql1, cnn)
Satır 1614:
Satır 1615: Dim ds As New Data.DataSet
Satır 1616: cnn.Open()
Satır 1617: Dim recordCount As Integer = cmd.ExecuteScalar()
Satır 1618:
Satır 1619: '" & Trim$(Text1.Text) & "'
Satır 1620: If IsNumeric(sayfasi) Then
Satır 1621: currentPagePart = Convert.ToInt16(sayfasi)
Satır 1622: End If
Satır 1623:
Satır 1624: 'da.Fill(ds, currentPagePart * pagePerRecord, pagePerRecord, "bayi")
Satır 1625: da.Fill(ds, (currentPagePart - 1) * pagePerRecord, pagePerRecord, "kullanici_sifre")
Satır 1626:
Satır 1627:
Satır 1628: Dim dt As Data.DataTable = ds.Tables(0)
Satır 1629:
Satır 1630: For i As Integer = 0 To dt.Rows.Count - 1
Satır 1631: a = a + 1
Satır 1632:
Satır 1633:
Satır 1634:
Satır 1635: #End ExternalSource
Satır 1636:
Satır 1637: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1511)
Satır 1638: If a Mod 2 = 0 Then
Satır 1639: renk=renk1
Satır 1640: else
Satır 1641: renk="#FFFFFF"
Satır 1642:
Satır 1643: end if
Satır 1644:
Satır 1645:
Satır 1646: #End ExternalSource
Satır 1647:
Satır 1648: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1519)
Satır 1649:
Satır 1650: dim karakter
Satır 1651: firma_adi=dt.Rows(i)("firma_unvani").ToString().Replace(" ", "-")
Satır 1652: firma_adi=firma_adi.Replace(".", "-")
Satır 1653: firma_adi=firma_adi.Replace("(", "")
Satır 1654: firma_adi=firma_adi.Replace(")", "")
Satır 1655: firma_adi=firma_adi.Replace("\", "")
Satır 1656: firma_adi=firma_adi.Replace("/", "")
Satır 1657: firma_adi=firma_adi.Replace(",", "")
Satır 1658: firma_adi=firma_adi.Replace("&", "")
Satır 1659: firma_adi=firma_adi.Replace(":", "")
Satır 1660: firma_adi=firma_adi.Replace("=", "")
Satır 1661:
Satır 1662:
Satır 1663: firma_adi=firma_adi.Replace("?", "")
Satır 1664: firma_adi=firma_adi.Replace("*", "")
Satır 1665: firma_adi=firma_adi.Replace("!", "")
Satır 1666: firma_adi=firma_adi.Replace("@", "")
Satır 1667: firma_adi=firma_adi.Replace("+", "")
Satır 1668: firma_adi=firma_adi.Replace("-----", "-")
Satır 1669: firma_adi=firma_adi.Replace("----", "-")
Satır 1670: firma_adi=firma_adi.Replace("---", "-")
Satır 1671: firma_adi=firma_adi.Replace("--", "-")
Satır 1672: firma_adi=trim(firma_adi)
Satır 1673: firma_adi=lcase(firma_adi)
Satır 1674: karakter=len(firma_adi)
Satır 1675:
Satır 1676: firma_adi=firma_adi.Replace("ı", "i")
Satır 1677: firma_adi=firma_adi.Replace("ş", "s")
Satır 1678: firma_adi=firma_adi.Replace("ç", "c")
Satır 1679: firma_adi=firma_adi.Replace("ğ", "g")
Satır 1680: firma_adi=firma_adi.Replace("ö", "o")
Satır 1681: firma_adi=firma_adi.Replace("ü", "u")
Satır 1682:
Satır 1683: if mid(firma_adi,karakter,karakter)="-" then
Satır 1684: karakter=karakter-1
Satır 1685: firma_adi=mid(firma_adi,1,karakter)
Satır 1686: end if
Satır 1687:
Satır 1688:
Satır 1689: #End ExternalSource
Satır 1690: Me.WriteUTF8ResourceString(__w, 236225, 663, true)
Satır 1691:
Satır 1692: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1569)
Satır 1693: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1694:
Satır 1695:
Satır 1696: #End ExternalSource
Satır 1697: __w.Write("_")
Satır 1698:
Satır 1699: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1569)
Satır 1700: __w.Write(firma_adi)
Satır 1701:
Satır 1702:
Satır 1703: #End ExternalSource
Satır 1704: __w.Write(""">"&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)&Global.Microsoft.VisualBasic.ChrW(9)&"<img style=""CURSOR: hand"" class=""bevel noshine"" height=""100"" alt=""Det"& _
Satır 1705: "aylı Bilgi İçin Tıklayınız! "" src=""https://www.nakliyerehberim.com.tr/Logolar/")
Satır 1706:
Satır 1707: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1570)
Satır 1708: __w.Write(dt.Rows(i)("logo_ismi").ToString())
Satır 1709:
Satır 1710:
Satır 1711: #End ExternalSource
Satır 1712: Me.WriteUTF8ResourceString(__w, 236888, 625, true)
Satır 1713:
Satır 1714: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1578)
Satır 1715: __w.Write(dt.Rows(i)("firma_unvani").ToString())
Satır 1716:
Satır 1717:
Satır 1718: #End ExternalSource
Satır 1719: __w.Write(""" vAlign=""center"" align=""left"">")
Satır 1720:
Satır 1721: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1578)
Satır 1722: __w.Write(dt.Rows(i)("firma_unvani").ToString())
Satır 1723:
Satır 1724:
Satır 1725: #End ExternalSource
Satır 1726: __w.Write("</td>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</tr>"&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)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<tr style=""CURSOR: hand"">"&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)&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)&"<td cl"& _
Satır 1727: "ass=""firmalar_icerik_yazi"" title=""")
Satır 1728:
Satır 1729: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1581)
Satır 1730: __w.Write(dt.Rows(i)("firma_unvani").ToString())
Satır 1731:
Satır 1732:
Satır 1733: #End ExternalSource
Satır 1734: __w.Write(""" vAlign=""center"" align=""left"" height=""58"">")
Satır 1735:
Satır 1736: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1581)
Satır 1737: __w.Write(dt.Rows(i)("yetkili_kisi").ToString())
Satır 1738:
Satır 1739:
Satır 1740: #End ExternalSource
Satır 1741: __w.Write("<br>"&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)&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))
Satır 1742:
Satır 1743: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1582)
Satır 1744: __w.Write(dt.Rows(i)("is_telefonu").ToString())
Satır 1745:
Satır 1746:
Satır 1747: #End ExternalSource
Satır 1748: __w.Write("<br>"&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)&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))
Satır 1749:
Satır 1750: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1583)
Satır 1751: __w.Write(dt.Rows(i)("cep_telefonu").ToString())
Satır 1752:
Satır 1753:
Satır 1754: #End ExternalSource
Satır 1755: __w.Write("<br>"&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)&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))
Satır 1756:
Satır 1757: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1584)
Satır 1758: __w.Write(dt.Rows(i)("e_posta").ToString())
Satır 1759:
Satır 1760:
Satır 1761: #End ExternalSource
Satır 1762: Me.WriteUTF8ResourceString(__w, 237513, 304, true)
Satır 1763:
Satır 1764: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1588)
Satır 1765: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1766:
Satır 1767:
Satır 1768: #End ExternalSource
Satır 1769: __w.Write(""">"&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)&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)&"<img border=""0"" src=""https://www.nakliyerehberim.com.tr/ayrinti"& _
Satır 1770: "_siralamasi/firmaya-mesaj-gonder.gif""></a><a target=""_blank"" href=""https://www.n"& _
Satır 1771: "akliyerehberim.com.tr/nakliyeyukborsasi/firma_yuk_gonder.asp?firma_no=")
Satır 1772:
Satır 1773: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1589)
Satır 1774: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1775:
Satır 1776:
Satır 1777: #End ExternalSource
Satır 1778: __w.Write("""><img border=""0"" src=""https://www.nakliyerehberim.com.tr/ayrinti_siralamasi/deta"& _
Satır 1779: "y_yuk_formu.gif"" width=""142"" height=""43""></a><a href=""https://www.nakliyerehberi"& _
Satır 1780: "m.com.tr/ayrinti_siralamasi/detay/")
Satır 1781:
Satır 1782: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1589)
Satır 1783: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1784:
Satır 1785:
Satır 1786: #End ExternalSource
Satır 1787: __w.Write("_")
Satır 1788:
Satır 1789: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1589)
Satır 1790: __w.Write(firma_adi)
Satır 1791:
Satır 1792:
Satır 1793: #End ExternalSource
Satır 1794: Me.WriteUTF8ResourceString(__w, 237817, 1535, false)
Satır 1795:
Satır 1796: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1617)
Satır 1797: __w.Write(dt.Rows(i)("en_iyi_1").ToString())
Satır 1798:
Satır 1799:
Satır 1800: #End ExternalSource
Satır 1801: Me.WriteUTF8ResourceString(__w, 239352, 390, true)
Satır 1802:
Satır 1803: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1623)
Satır 1804: __w.Write(dt.Rows(i)("en_iyi_2").ToString())
Satır 1805:
Satır 1806:
Satır 1807: #End ExternalSource
Satır 1808: Me.WriteUTF8ResourceString(__w, 239742, 379, true)
Satır 1809:
Satır 1810: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1629)
Satır 1811: __w.Write(dt.Rows(i)("en_iyi_3").ToString())
Satır 1812:
Satır 1813:
Satır 1814: #End ExternalSource
Satır 1815: Me.WriteUTF8ResourceString(__w, 240121, 379, true)
Satır 1816:
Satır 1817: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1635)
Satır 1818: __w.Write(dt.Rows(i)("en_iyi_4").ToString())
Satır 1819:
Satır 1820:
Satır 1821: #End ExternalSource
Satır 1822: Me.WriteUTF8ResourceString(__w, 240500, 813, false)
Satır 1823:
Satır 1824: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1651)
Satır 1825: __w.Write(dt.Rows(i)("sehirler_arasi_sehir_1").ToString())
Satır 1826:
Satır 1827:
Satır 1828: #End ExternalSource
Satır 1829: Me.WriteUTF8ResourceString(__w, 241313, 356, true)
Satır 1830:
Satır 1831: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1657)
Satır 1832: __w.Write(dt.Rows(i)("sehirler_arasi_sehir_2").ToString())
Satır 1833:
Satır 1834:
Satır 1835: #End ExternalSource
Satır 1836: Me.WriteUTF8ResourceString(__w, 241669, 356, true)
Satır 1837:
Satır 1838: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1663)
Satır 1839: __w.Write(dt.Rows(i)("sehirler_arasi_sehir_3").ToString())
Satır 1840:
Satır 1841:
Satır 1842: #End ExternalSource
Satır 1843: Me.WriteUTF8ResourceString(__w, 242025, 356, true)
Satır 1844:
Satır 1845: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1669)
Satır 1846: __w.Write(dt.Rows(i)("sehirler_arasi_sehir_4").ToString())
Satır 1847:
Satır 1848:
Satır 1849: #End ExternalSource
Satır 1850: Me.WriteUTF8ResourceString(__w, 242381, 745, true)
Satır 1851:
Satır 1852: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1685)
Satır 1853: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1854:
Satır 1855:
Satır 1856: #End ExternalSource
Satır 1857: Me.WriteUTF8ResourceString(__w, 243126, 520, false)
Satır 1858:
Satır 1859: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1693)
Satır 1860: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1861:
Satır 1862:
Satır 1863: #End ExternalSource
Satır 1864: Me.WriteUTF8ResourceString(__w, 243646, 508, false)
Satır 1865:
Satır 1866: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1701)
Satır 1867: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1868:
Satır 1869:
Satır 1870: #End ExternalSource
Satır 1871: Me.WriteUTF8ResourceString(__w, 244154, 668, false)
Satır 1872:
Satır 1873: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1713)
Satır 1874: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1875:
Satır 1876:
Satır 1877: #End ExternalSource
Satır 1878: Me.WriteUTF8ResourceString(__w, 244822, 535, false)
Satır 1879:
Satır 1880: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1721)
Satır 1881: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1882:
Satır 1883:
Satır 1884: #End ExternalSource
Satır 1885: Me.WriteUTF8ResourceString(__w, 245357, 530, false)
Satır 1886:
Satır 1887: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1729)
Satır 1888: __w.Write(dt.Rows(i)("firma_no").ToString())
Satır 1889:
Satır 1890:
Satır 1891: #End ExternalSource
Satır 1892: Me.WriteUTF8ResourceString(__w, 245887, 1144, false)
Satır 1893:
Satır 1894: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1762)
Satır 1895:
Satır 1896: Next
Satır 1897: cnn.Close()
Satır 1898:
Satır 1899:
Satır 1900: #End ExternalSource
Satır 1901: __w.Write(" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&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)&"<table width=""120%"""& _
Satır 1902: ">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr><td colspan=2 align=center>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 1903:
Satır 1904: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1770)
Satır 1905:
Satır 1906: Dim pageCount As Integer = (recordCount / pagePerRecord)
Satır 1907:
Satır 1908: If ((pageCount * pagePerRecord) < recordCount) Then
Satır 1909: pageCount += 1
Satır 1910: End If
Satır 1911:
Satır 1912: Dim startPage As Integer = currentPagePart - (showMaxPageCount / 2)
Satır 1913: Dim LastShowPage As Integer = currentPagePart + (showMaxPageCount / 2) - 1
Satır 1914:
Satır 1915:
Satır 1916: If startPage < 1 Then startPage = 1
Satır 1917: If LastShowPage > pageCount Then LastShowPage = pageCount
Satır 1918: Dim arr As New ArrayList
Satır 1919: If pageCount > 1 Then
Satır 1920:
Satır 1921:
Satır 1922: #End ExternalSource
Satır 1923: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <img src=""https://www.nakliyerehberim.com.tr/ayrint"& _
Satır 1924: "i_siralamasi/N.gif""> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 1925:
Satır 1926: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1788)
Satır 1927: For i As Integer = startPage To LastShowPage
Satır 1928: If i = currentPagePart Then
Satır 1929:
Satır 1930:
Satır 1931: #End ExternalSource
Satır 1932: __w.Write(" <b><font face=""Tahoma"" size=""2""><a href=""https://www.nakliyerehberim.com.tr/kara"& _
Satır 1933: "yolu-nakliye-firmalari-liste/")
Satır 1934:
Satır 1935: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1790)
Satır 1936: __w.Write(i.ToString() )
Satır 1937:
Satır 1938:
Satır 1939: #End ExternalSource
Satır 1940: __w.Write("-")
Satır 1941:
Satır 1942: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1790)
Satır 1943: __w.Write(ulkesi)
Satır 1944:
Satır 1945:
Satır 1946: #End ExternalSource
Satır 1947: __w.Write("-parsiyel-tasima""><img border=""0"" src=""https://www.nakliyerehberim.com.tr/ayrinti"& _
Satır 1948: "_siralamasi/a.gif""></a></font> </b> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 1949:
Satır 1950: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1792)
Satır 1951:
Satır 1952: Else
Satır 1953:
Satır 1954:
Satır 1955: #End ExternalSource
Satır 1956: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <font face=""Tahoma"" size=""2""><a href=""https://www.nakliyere"& _
Satır 1957: "hberim.com.tr/karayolu-nakliye-firmalari-liste/")
Satır 1958:
Satır 1959: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1795)
Satır 1960: __w.Write(i.ToString() )
Satır 1961:
Satır 1962:
Satır 1963: #End ExternalSource
Satır 1964: __w.Write("-")
Satır 1965:
Satır 1966: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1795)
Satır 1967: __w.Write(ulkesi)
Satır 1968:
Satır 1969:
Satır 1970: #End ExternalSource
Satır 1971: __w.Write("-parsiyel-tasima""><img border=""0"" src=""https://www.nakliyerehberim.com.tr/ayrinti"& _
Satır 1972: "_siralamasi/a.gif""></a></font> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 1973:
Satır 1974: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1796)
Satır 1975:
Satır 1976: End If
Satır 1977: arr.Add(i.ToString())
Satır 1978: Next
Satır 1979:
Satır 1980:
Satır 1981: #End ExternalSource
Satır 1982: __w.Write(" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <img src=""https://www.nakliyerehberim.com.tr/ayrinti_sira"& _
Satır 1983: "lamasi/kliye.gif""> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td></tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 1984:
Satır 1985: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1803)
Satır 1986:
Satır 1987: End If
Satır 1988:
Satır 1989:
Satır 1990: #End ExternalSource
Satır 1991: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr><td colspan=2 align=cente"& _
Satır 1992: "r>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <font face=""Tahoma""><font size=""2"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 1993:
Satır 1994: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1811)
Satır 1995:
Satır 1996:
Satır 1997:
Satır 1998: If ((pageCount * pagePerRecord) < recordCount) Then
Satır 1999: 'pageCount += 1
Satır 2000: End If
Satır 2001:
Satır 2002:
Satır 2003:
Satır 2004: If startPage < 1 Then startPage = 1
Satır 2005: If LastShowPage > pageCount Then LastShowPage = pageCount
Satır 2006:
Satır 2007: If pageCount > 1 Then
Satır 2008: If currentPagePart > 1 Then
Satır 2009:
Satır 2010:
Satır 2011: #End ExternalSource
Satır 2012: __w.Write(" <a href=""https://www.nakliyerehberim.com.tr/karayolu-nakliye-firmalari-liste/1-")
Satır 2013:
Satır 2014: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1825)
Satır 2015: __w.Write(ulkesi)
Satır 2016:
Satır 2017:
Satır 2018: #End ExternalSource
Satır 2019: __w.Write("-parsiyel-tasima""><span style=""text-decoration: none"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<<</span></a>&nbs"& _
Satır 2020: "p;"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<a href=""https://www.nakliyerehberim.com.tr/karayolu-nakliye-firmalari-lis"& _
Satır 2021: "te/")
Satır 2022:
Satır 2023: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1827)
Satır 2024: __w.Write( (currentPagePart - 1).ToString() )
Satır 2025:
Satır 2026:
Satır 2027: #End ExternalSource
Satır 2028: __w.Write("-")
Satır 2029:
Satır 2030: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1827)
Satır 2031: __w.Write(ulkesi)
Satır 2032:
Satır 2033:
Satır 2034: #End ExternalSource
Satır 2035: __w.Write("-parsiyel-tasima"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<span style=""text-decoration: none""><</span></a> &n"& _
Satır 2036: "bsp; "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 2037:
Satır 2038: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1829)
Satır 2039:
Satır 2040: End If
Satır 2041:
Satır 2042: For i As Integer = startPage To LastShowPage
Satır 2043: If i = currentPagePart Then
Satır 2044:
Satır 2045:
Satır 2046: #End ExternalSource
Satır 2047: __w.Write(" <a href=""https://www.nakliyerehberim.com.tr/karayolu-nakliye-firmalari-liste/")
Satır 2048:
Satır 2049: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1834)
Satır 2050: __w.Write(i.ToString() )
Satır 2051:
Satır 2052:
Satır 2053: #End ExternalSource
Satır 2054: __w.Write("-")
Satır 2055:
Satır 2056: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1834)
Satır 2057: __w.Write(ulkesi)
Satır 2058:
Satır 2059:
Satır 2060: #End ExternalSource
Satır 2061: __w.Write("-parsiyel-tasima""><b>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<span style=""text-decoration: none"">")
Satır 2062:
Satır 2063: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1835)
Satır 2064: __w.Write( i.ToString())
Satır 2065:
Satır 2066:
Satır 2067: #End ExternalSource
Satır 2068: __w.Write("</span></b></a> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 2069:
Satır 2070: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1837)
Satır 2071:
Satır 2072: Else
Satır 2073:
Satır 2074:
Satır 2075: #End ExternalSource
Satır 2076: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a href=""https://www.nakliyerehberim.com.tr/karayolu-nakliy"& _
Satır 2077: "e-firmalari-liste/")
Satır 2078:
Satır 2079: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1840)
Satır 2080: __w.Write( i.ToString())
Satır 2081:
Satır 2082:
Satır 2083: #End ExternalSource
Satır 2084: __w.Write("-")
Satır 2085:
Satır 2086: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1840)
Satır 2087: __w.Write(ulkesi)
Satır 2088:
Satır 2089:
Satır 2090: #End ExternalSource
Satır 2091: __w.Write("-parsiyel-tasima"" >"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<span style=""text-decoration: none"">")
Satır 2092:
Satır 2093: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1841)
Satır 2094: __w.Write( i.ToString() )
Satır 2095:
Satır 2096:
Satır 2097: #End ExternalSource
Satır 2098: __w.Write("</span></a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 2099:
Satır 2100: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1842)
Satır 2101:
Satır 2102: End If
Satır 2103: arr.Add(i.ToString())
Satır 2104: Next
Satır 2105: If currentPagePart < pageCount Then
Satır 2106:
Satır 2107:
Satır 2108: #End ExternalSource
Satır 2109: __w.Write(" <a href=""https://www.nakliyerehberim.com.tr/karayolu-nakliye-f"& _
Satır 2110: "irmalari-liste/")
Satır 2111:
Satır 2112: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1847)
Satır 2113: __w.Write((currentPagePart + 1).ToString() )
Satır 2114:
Satır 2115:
Satır 2116: #End ExternalSource
Satır 2117: __w.Write("-")
Satır 2118:
Satır 2119: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1847)
Satır 2120: __w.Write(ulkesi)
Satır 2121:
Satır 2122:
Satır 2123: #End ExternalSource
Satır 2124: __w.Write("-parsiyel-tasima"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<span style=""text-decoration: none"">></span></a> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _
Satır 2125: ""&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<a href=""https://www.nakliyerehberim.com.tr/karayolu-nakliye-firmalari-liste/")
Satır 2126:
Satır 2127: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1849)
Satır 2128: __w.Write(pageCount.ToString() )
Satır 2129:
Satır 2130:
Satır 2131: #End ExternalSource
Satır 2132: __w.Write("-")
Satır 2133:
Satır 2134: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1849)
Satır 2135: __w.Write(ulkesi)
Satır 2136:
Satır 2137:
Satır 2138: #End ExternalSource
Satır 2139: __w.Write("-parsiyel-tasima"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<span style=""text-decoration: none"">>></span></a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 2140: " ")
Satır 2141:
Satır 2142: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1851)
Satır 2143:
Satır 2144: End If
Satır 2145:
Satır 2146:
Satır 2147: #End ExternalSource
Satır 2148: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </font><select name=""pages"" id=""pages"" onchange="& _
Satır 2149: """JumpPage(this.value);"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 2150:
Satır 2151: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1855)
Satır 2152:
Satır 2153: For i As Integer = 1 To pageCount
Satır 2154: If i = currentPagePart Then
Satır 2155:
Satır 2156:
Satır 2157:
Satır 2158: #End ExternalSource
Satır 2159: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <option selected value=""")
Satır 2160:
Satır 2161: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1860)
Satır 2162: __w.Write( i.ToString() )
Satır 2163:
Satır 2164:
Satır 2165: #End ExternalSource
Satır 2166: __w.Write(""" >")
Satır 2167:
Satır 2168: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1860)
Satır 2169: __w.Write( i.ToString() )
Satır 2170:
Satır 2171:
Satır 2172: #End ExternalSource
Satır 2173: __w.Write("</option>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 2174:
Satır 2175: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1861)
Satır 2176:
Satır 2177: Else
Satır 2178:
Satır 2179:
Satır 2180: #End ExternalSource
Satır 2181: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <option value=""")
Satır 2182:
Satır 2183: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1864)
Satır 2184: __w.Write( i.ToString())
Satır 2185:
Satır 2186:
Satır 2187: #End ExternalSource
Satır 2188: __w.Write(""" >")
Satır 2189:
Satır 2190: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1864)
Satır 2191: __w.Write( i.ToString() )
Satır 2192:
Satır 2193:
Satır 2194: #End ExternalSource
Satır 2195: __w.Write("</option>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Satır 2196:
Satır 2197: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1865)
Satır 2198:
Satır 2199: End If
Satır 2200: Next
Satır 2201:
Satır 2202:
Satır 2203: #End ExternalSource
Satır 2204: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </select><font size=""2""> </font></font> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td></tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _
Satır 2205: " ")
Satır 2206:
Satır 2207: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1871)
Satır 2208:
Satır 2209: End If
Satır 2210:
Satır 2211:
Satır 2212: #End ExternalSource
Satır 2213: Me.WriteUTF8ResourceString(__w, 247031, 4844, false)
Satır 2214:
Satır 2215: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1964)
Satır 2216: __w.Write(ulkesi)
Satır 2217:
Satır 2218:
Satır 2219: #End ExternalSource
Satır 2220: Me.WriteUTF8ResourceString(__w, 251875, 1242, false)
Satır 2221:
Satır 2222: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1984)
Satır 2223:
Satır 2224: sql4 = "Select Count(*) from kullanici_sifre where (onay=1 and parsiyel_kargo_tasimalar='1') and (deniz_hava_ulkeler like '%" & ulkesi & "%')"
Satır 2225: sql5 = "Select* from kullanici_sifre where (onay=1 and parsiyel_kargo_tasimalar='1') and (deniz_hava_ulkeler like '%" & ulkesi & "%') ORDER BY [Kimlik] desc "
Satır 2226:
Satır 2227: Dim a4
Satır 2228: Dim pagePerRecord4 As Integer = 15
Satır 2229: Dim showMaxPageCount4 As Integer = 20
Satır 2230: Dim currentPagePart4 As Integer = 1
Satır 2231: Dim cnn4 As New Data.OleDb.OleDbConnection("Provider=SQLOLEDB;Data Source=89.19.10.114;Initial Catalog=alperen1999;Persist Security Info=True;User ID=zeynep2001;Password=Sa.2016.")
Satır 2232:
Satır 2233: Dim cmd4 As New System.Data.OleDb.OleDbCommand(sql4, cnn4)
Satır 2234: Dim da4 As New System.Data.OleDb.OleDbDataAdapter(sql5, cnn4)
Satır 2235:
Satır 2236: Dim ds4 As New Data.DataSet
Satır 2237: cnn4.Open()
Satır 2238: Dim recordCount4 As Integer = cmd4.ExecuteScalar()
Satır 2239:
Satır 2240: '" & Trim$(Text1.Text) & "'
Satır 2241: If IsNumeric(sayfasi4) Then
Satır 2242: currentPagePart4 = Convert.ToInt16(sayfasi4)
Satır 2243: End If
Satır 2244:
Satır 2245: 'da.Fill(ds4, currentPagePart4 * pagePerRecord4, pagePerRecord4, "bayi")
Satır 2246: da4.Fill(ds4, (currentPagePart4 - 1) * pagePerRecord4, pagePerRecord4, "kullanici_sifre")
Satır 2247:
Satır 2248:
Satır 2249: Dim dt4 As Data.DataTable = ds4.Tables(0)
Satır 2250:
Satır 2251: For i4 As Integer = 0 To dt4.Rows.Count - 1
Satır 2252: a4 = a4 + 1
Satır 2253:
Satır 2254:
Satır 2255:
Satır 2256: #End ExternalSource
Satır 2257:
Satır 2258: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2017)
Satır 2259: If a4 Mod 2 = 0 Then
Satır 2260: renk4=renk4
Satır 2261: else
Satır 2262: renk4="#FFFFFF"
Satır 2263:
Satır 2264: end if
Satır 2265:
Satır 2266:
Satır 2267: #End ExternalSource
Satır 2268:
Satır 2269: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2025)
Satır 2270:
Satır 2271: dim karakter4
Satır 2272: firma_adi4=dt4.Rows(i4)("firma_unvani").ToString().Replace(" ", "-")
Satır 2273: firma_adi4=firma_adi4.Replace(".", "-")
Satır 2274: firma_adi4=firma_adi4.Replace("(", "")
Satır 2275: firma_adi4=firma_adi4.Replace(")", "")
Satır 2276: firma_adi4=firma_adi4.Replace("\", "")
Satır 2277: firma_adi4=firma_adi4.Replace("/", "")
Satır 2278: firma_adi4=firma_adi4.Replace(",", "")
Satır 2279: firma_adi4=firma_adi4.Replace("&", "")
Satır 2280: firma_adi4=firma_adi4.Replace(":", "")
Satır 2281: firma_adi4=firma_adi4.Replace("=", "")
Satır 2282:
Satır 2283:
Satır 2284: firma_adi4=firma_adi4.Replace("?", "")
Satır 2285: firma_adi4=firma_adi4.Replace("*", "")
Satır 2286: firma_adi4=firma_adi4.Replace("!", "")
Satır 2287: firma_adi4=firma_adi4.Replace("@", "")
Satır 2288: firma_adi4=firma_adi4.Replace("+", "")
Satır 2289: firma_adi4=firma_adi4.Replace("-----", "-")
Satır 2290: firma_adi4=firma_adi4.Replace("----", "-")
Satır 2291: firma_adi4=firma_adi4.Replace("---", "-")
Satır 2292: firma_adi4=firma_adi4.Replace("--", "-")
Satır 2293: firma_adi4=trim(firma_adi4)
Satır 2294: firma_adi4=lcase(firma_adi4)
Satır 2295: karakter4=len(firma_adi4)
Satır 2296:
Satır 2297: firma_adi4=firma_adi4.Replace("ı", "i")
Satır 2298: firma_adi4=firma_adi4.Replace("ş", "s")
Satır 2299: firma_adi4=firma_adi4.Replace("ç", "c")
Satır 2300: firma_adi4=firma_adi4.Replace("ğ", "g")
Satır 2301: firma_adi4=firma_adi4.Replace("ö", "o")
Satır 2302: firma_adi4=firma_adi4.Replace("ü", "u")
Satır 2303:
Satır 2304: if mid(firma_adi4,karakter4,karakter4)="-" then
Satır 2305: karakter4=karakter4-1
Satır 2306: firma_adi4=mid(firma_adi4,1,karakter4)
Satır 2307: end if
Satır 2308:
Satır 2309:
Satır 2310: #End ExternalSource
Satır 2311: Me.WriteUTF8ResourceString(__w, 253117, 848, true)
Satır 2312:
Satır 2313: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2076)
Satır 2314: __w.Write(dt4.Rows(i4)("firma_no").ToString())
Satır 2315:
Satır 2316:
Satır 2317: #End ExternalSource
Satır 2318: __w.Write("_")
Satır 2319:
Satır 2320: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2076)
Satır 2321: __w.Write(firma_adi4)
Satır 2322:
Satır 2323:
Satır 2324: #End ExternalSource
Satır 2325: __w.Write("')"" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" class=""bevel noshine"" height=100 "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 2326: " alt=""Detaylı Bilgi İçin Tıklayınız! "" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 2327: " src=""https://www.nakliyerehberim.com.tr/Logolar/")
Satır 2328:
Satır 2329: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2079)
Satır 2330: __w.Write(dt4.Rows(i4)("logo_ismi").ToString())
Satır 2331:
Satır 2332:
Satır 2333: #End ExternalSource
Satır 2334: Me.WriteUTF8ResourceString(__w, 253965, 1053, true)
Satır 2335:
Satır 2336: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2094)
Satır 2337: __w.Write(dt4.Rows(i4)("firma_no").ToString())
Satır 2338:
Satır 2339:
Satır 2340: #End ExternalSource
Satır 2341: __w.Write("_")
Satır 2342:
Satır 2343: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2094)
Satır 2344: __w.Write(firma_adi4)
Satır 2345:
Satır 2346:
Satır 2347: #End ExternalSource
Satır 2348: __w.Write("')"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_baslik_yazi title=""")
Satır 2349:
Satır 2350: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2095)
Satır 2351: __w.Write(dt4.Rows(i4)("firma_unvani").ToString())
Satır 2352:
Satır 2353:
Satır 2354: #End ExternalSource
Satır 2355: __w.Write(""" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" vAlign=center align=left>")
Satır 2356:
Satır 2357: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2096)
Satır 2358: __w.Write(dt4.Rows(i4)("firma_unvani").ToString())
Satır 2359:
Satır 2360:
Satır 2361: #End ExternalSource
Satır 2362: __w.Write("</TD></TR>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TR style=""CURSOR: hand"" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Satır 2363: " onclick=""window.open('https://www.nakliyerehberim.com.tr/a"& _
Satır 2364: "yrinti_siralamasi/detay/")
Satır 2365:
Satır 2366: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2098)
Satır 2367: __w.Write(dt4.Rows(i4)("firma_no").ToString())
Satır 2368:
Satır 2369:
Satır 2370: #End ExternalSource
Satır 2371: __w.Write("_")
Satır 2372:
Satır 2373: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2098)
Satır 2374: __w.Write(firma_adi)
Satır 2375:
Satır 2376:
Satır 2377: #End ExternalSource
Satır 2378: __w.Write("')"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <TD class=firmalar_icerik_yazi title=""")
Satır 2379:
Satır 2380: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2099)
Satır 2381: __w.Write(dt4.Rows(i4)("firma_unvani").ToString())
Satır 2382:
Satır 2383:
Satır 2384: #End ExternalSource
Satır 2385: __w.Write(""" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" vAlign=center align=left height=""58"">")
Satır 2386:
Satır 2387: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2100)
Satır 2388: __w.Write(dt4.Rows(i4)("yetkili_kisi").ToString())
Satır 2389:
Satır 2390:
Satır 2391: #End ExternalSource
Satır 2392: __w.Write("<br />")
Satır 2393:
Satır 2394: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2100)
Satır 2395: __w.Write(dt4.Rows(i4)("is_telefonu").ToString())
Satır 2396:
Satır 2397:
Satır 2398: #End ExternalSource
Satır 2399: __w.Write("<br />")
Satır 2400:
Satır 2401: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2100)
Satır 2402: __w.Write(dt4.Rows(i4)("cep_telefonu").ToString())
Satır 2403:
Satır 2404:
Satır 2405: #End ExternalSource
Satır 2406: __w.Write("<br />")
Satır 2407:
Satır 2408: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2100)
Satır 2409: __w.Write(dt4.Rows(i4)("e_posta").ToString())
Satır 2410:
Satır 2411:
Satır 2412: #End ExternalSource
Satır 2413: Me.WriteUTF8ResourceString(__w, 255018, 2130, false)
Satır 2414:
Satır 2415: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2135)
Satır 2416: __w.Write(dt4.Rows(i4)("en_iyi_1").ToString())
Satır 2417:
Satır 2418:
Satır 2419: #End ExternalSource
Satır 2420: Me.WriteUTF8ResourceString(__w, 257148, 564, true)
Satır 2421:
Satır 2422: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2143)
Satır 2423: __w.Write(dt4.Rows(i4)("en_iyi_2").ToString())
Satır 2424:
Satır 2425:
Satır 2426: #End ExternalSource
Satır 2427: Me.WriteUTF8ResourceString(__w, 257712, 555, true)
Satır 2428:
Satır 2429: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2151)
Satır 2430: __w.Write(dt4.Rows(i4)("en_iyi_3").ToString())
Satır 2431:
Satır 2432:
Satır 2433: #End ExternalSource
Satır 2434: Me.WriteUTF8ResourceString(__w, 258267, 555, true)
Satır 2435:
Satır 2436: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2159)
Satır 2437: __w.Write(dt4.Rows(i4)("en_iyi_4").ToString())
Satır 2438:
Satır 2439:
Satır 2440: #End ExternalSource
Satır 2441: Me.WriteUTF8ResourceString(__w, 258822, 1168, false)
Satır 2442:
Satır 2443: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2178)
Satır 2444: __w.Write(dt4.Rows(i4)("sehirler_arasi_sehir_1").ToString())
Satır 2445:
Satır 2446:
Satır 2447: #End ExternalSource
Satır 2448: Me.WriteUTF8ResourceString(__w, 259990, 532, true)
Satır 2449:
Satır 2450: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2186)
Satır 2451: __w.Write(dt4.Rows(i4)("sehirler_arasi_sehir_2").ToString())
Satır 2452:
Satır 2453:
Satır 2454: #End ExternalSource
Satır 2455: Me.WriteUTF8ResourceString(__w, 260522, 532, true)
Satır 2456:
Satır 2457: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2194)
Satır 2458: __w.Write(dt4.Rows(i4)("sehirler_arasi_sehir_3").ToString())
Satır 2459:
Satır 2460:
Satır 2461: #End ExternalSource
Satır 2462: Me.WriteUTF8ResourceString(__w, 261054, 532, true)
Satır 2463:
Satır 2464: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2202)
Satır 2465: __w.Write(dt4.Rows(i4)("sehirler_arasi_sehir_4").ToString())
Satır 2466:
Satır 2467:
Satır 2468: #End ExternalSource
Satır 2469: Me.WriteUTF8ResourceString(__w, 261586, 734, true)
Satır 2470:
Satır 2471: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2219)
Satır 2472:
Satır 2473: Next
Satır 2474: cnn4.Close()
Satır 2475:
Satır 2476:
Satır 2477: #End ExternalSource
Satır 2478: __w.Write(" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</td>"&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)&"</tr>"&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)&"<tr>"&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)&"<td height=""19"" bgcolor=""#FFEA93"">&nbs"& _
Satır 2479: "p;</td>"&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)&"</tr>"&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)&"<tr>"&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)&"<td height=""51"" bgcolor=""#F4F4F4""><font"& _
Satır 2480: " face=""Tahoma"" size=""3""> ")
Satır 2481:
Satır 2482: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2229)
Satır 2483: __w.Write(ulkesi)
Satır 2484:
Satır 2485:
Satır 2486: #End ExternalSource
Satır 2487: __w.Write(" Parsiyel Şehirler</font></td>"&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)&"</tr>"&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)&"<tr>"&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)&"<td bgcolor=""#F9F"& _
Satır 2488: "9F9"">"&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)&"<p align=""left"">"&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)&"<font face=""Tahoma"" style=""font-size: 9pt"& _
Satır 2489: """ color=""#336699"">")
Satır 2490:
Satır 2491: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2234)
Satır 2492: __w.Write(ulkesi_sehirleri)
Satır 2493:
Satır 2494:
Satır 2495: #End ExternalSource
Satır 2496: Me.WriteUTF8ResourceString(__w, 262320, 915, true)
Satır 2497:
Satır 2498: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2261)
Satır 2499: __w.Write(ulkesi)
Satır 2500:
Satır 2501:
Satır 2502: #End ExternalSource
Satır 2503: Me.WriteUTF8ResourceString(__w, 263235, 1089, false)
Satır 2504:
Satır 2505: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2288)
Satır 2506: __w.Write(ulkesi)
Satır 2507:
Satır 2508:
Satır 2509: #End ExternalSource
Satır 2510: Me.WriteUTF8ResourceString(__w, 264324, 1443, false)
Satır 2511:
Satır 2512: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2322)
Satır 2513: __w.Write(ulkesi)
Satır 2514:
Satır 2515:
Satır 2516: #End ExternalSource
Satır 2517: Me.WriteUTF8ResourceString(__w, 265767, 1225, false)
Satır 2518:
Satır 2519: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",2349)
Satır 2520: __w.Write(ulkesi)
Satır 2521:
Satır 2522:
Satır 2523: #End ExternalSource
Satır 2524: Me.WriteUTF8ResourceString(__w, 266992, 7221, false)
Satır 2525: End Sub
Satır 2526:
Satır 2527: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 2528: Private Sub __BuildControlTree(ByVal __ctrl As ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx)
Satır 2529:
Satır 2530: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2531: __ctrl.EnableViewStateMac = false
Satır 2532:
Satır 2533: #End ExternalSource
Satır 2534:
Satır 2535: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2536: __ctrl.EnableEventValidation = false
Satır 2537:
Satır 2538: #End ExternalSource
Satır 2539:
Satır 2540: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2541: Me.InitializeCulture
Satır 2542:
Satır 2543: #End ExternalSource
Satır 2544: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Satır 2545:
Satır 2546: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2547: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<!DOCTYPE html PUBLIC ""-//W3C//DTD XHTML 1.0 Transitional//EN"" ""https://www.w"& _
Satır 2548: "3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Satır 2549:
Satır 2550: #End ExternalSource
Satır 2551:
Satır 2552: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2553: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<html xmlns=""https://www.w3.org/1999/xhtml"" >"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Satır 2554:
Satır 2555: #End ExternalSource
Satır 2556: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlHead
Satır 2557:
Satır 2558: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2559: __ctrl1 = Me.__BuildControl__control2
Satır 2560:
Satır 2561: #End ExternalSource
Satır 2562:
Satır 2563: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2564: __parser.AddParsedSubObject(__ctrl1)
Satır 2565:
Satır 2566: #End ExternalSource
Satır 2567:
Satır 2568: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2569: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<body onload=""window.scroll(0,520);"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Satır 2570:
Satır 2571: #End ExternalSource
Satır 2572: Dim __ctrl2 As Global.System.Web.UI.HtmlControls.HtmlForm
Satır 2573:
Satır 2574: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2575: __ctrl2 = Me.__BuildControlform1
Satır 2576:
Satır 2577: #End ExternalSource
Satır 2578:
Satır 2579: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2580: __parser.AddParsedSubObject(__ctrl2)
Satır 2581:
Satır 2582: #End ExternalSource
Satır 2583:
Satır 2584: #ExternalSource("C:\WEBS\Arac\nakliyerehberim.com.tr\www\ayrinti_siralamasi\karayolu-nakliyat-firmalari-liste.aspx",1)
Satır 2585: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</body>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</html>"))
Satır 2586:
Satır 2587: #End ExternalSource
Satır 2588: End Sub
Satır 2589:
Satır 2590: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 2591: Protected Overrides Sub FrameworkInitialize()
Satır 2592: MyBase.FrameworkInitialize
Satır 2593: Me.SetStringResourcePointer(Global.ASP.ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx.__stringResource, 0)
Satır 2594: Me.__BuildControlTree(Me)
Satır 2595: Me.AddWrappedFileDependencies(Global.ASP.ayrinti_siralamasi_karayolu_nakliyat_firmalari_liste_aspx.__fileDependencies)
Satır 2596: End Sub
Satır 2597:
Satır 2598: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 2599: Public Overrides Function GetTypeHashCode() As Integer
Satır 2600: Return 1417470606
Satır 2601: End Function
Satır 2602:
Satır 2603: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Satır 2604: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Satır 2605: MyBase.ProcessRequest(context)
Satır 2606: End Sub
Satır 2607: End Class
Satır 2608: End Namespace
Satır 2609:
|