Line 1: #ExternalChecksum("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx","{406ea660-64cf-4c82-b6f0-42d48172a799}","F43EA5DC689E551726F463969FBBBA98")
Line 2: '------------------------------------------------------------------------------
Line 3: ' <auto-generated>
Line 4: ' This code was generated by a tool.
Line 5: ' Runtime Version:2.0.50727.1433
Line 6: '
Line 7: ' Changes to this file may cause incorrect behavior and will be lost if
Line 8: ' the code is regenerated.
Line 9: ' </auto-generated>
Line 10: '------------------------------------------------------------------------------
Line 11:
Line 12: Option Strict Off
Line 13: Option Explicit On
Line 14:
Line 15: Imports ASP
Line 16: Imports Microsoft.VisualBasic
Line 17: Imports System
Line 18: Imports System.Configuration
Line 19: Imports System.Data
Line 20: Imports System.Data.OleDb
Line 21: Imports System.Data.SqlClient
Line 22: Imports System.Data.SqlTypes
Line 23: Imports System.Drawing
Line 24: Imports System.IO
Line 25: Imports System.Text
Line 26: Imports System.Web
Line 27: Imports System.Web.Mail
Line 28: Imports System.Web.UI
Line 29: Imports System.Web.UI.HtmlControls
Line 30: Imports System.Web.UI.WebControls
Line 31: Imports System.Web.UI.WebControls.WebParts
Line 32:
Line 33:
Line 34: Partial Public Class CodePage
Line 35: Implements System.Web.SessionState.IRequiresSessionState
Line 36:
Line 37:
Line 38: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 39: Protected WithEvents ctl_Civilité As Global.System.Web.UI.WebControls.DropDownList
Line 40:
Line 41: #End ExternalSource
Line 42:
Line 43:
Line 44: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",21)
Line 45: Protected WithEvents ctl_Nom As Global.System.Web.UI.WebControls.TextBox
Line 46:
Line 47: #End ExternalSource
Line 48:
Line 49:
Line 50: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",22)
Line 51: Protected WithEvents ctl_Prénom As Global.System.Web.UI.WebControls.TextBox
Line 52:
Line 53: #End ExternalSource
Line 54:
Line 55:
Line 56: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",26)
Line 57: Protected WithEvents ctl_EMail As Global.System.Web.UI.WebControls.TextBox
Line 58:
Line 59: #End ExternalSource
Line 60:
Line 61:
Line 62: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",27)
Line 63: Protected WithEvents ctl_Fixe As Global.System.Web.UI.WebControls.TextBox
Line 64:
Line 65: #End ExternalSource
Line 66:
Line 67:
Line 68: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",28)
Line 69: Protected WithEvents ctl_Mobile As Global.System.Web.UI.WebControls.TextBox
Line 70:
Line 71: #End ExternalSource
Line 72:
Line 73:
Line 74: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",34)
Line 75: Protected WithEvents ctl_Rue As Global.System.Web.UI.WebControls.TextBox
Line 76:
Line 77: #End ExternalSource
Line 78:
Line 79:
Line 80: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",35)
Line 81: Protected WithEvents ctl_Complément As Global.System.Web.UI.WebControls.TextBox
Line 82:
Line 83: #End ExternalSource
Line 84:
Line 85:
Line 86: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",36)
Line 87: Protected WithEvents ctl_CP As Global.System.Web.UI.WebControls.TextBox
Line 88:
Line 89: #End ExternalSource
Line 90:
Line 91:
Line 92: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",37)
Line 93: Protected WithEvents ctl_Ville As Global.System.Web.UI.WebControls.TextBox
Line 94:
Line 95: #End ExternalSource
Line 96:
Line 97:
Line 98: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",38)
Line 99: Protected WithEvents ctl_Dep As Global.System.Web.UI.WebControls.DropDownList
Line 100:
Line 101: #End ExternalSource
Line 102:
Line 103:
Line 104: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",143)
Line 105: Protected WithEvents ctl_Pays As Global.System.Web.UI.WebControls.DropDownList
Line 106:
Line 107: #End ExternalSource
Line 108:
Line 109:
Line 110: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",150)
Line 111: Protected WithEvents ctl_Sondage As Global.System.Web.UI.WebControls.DropDownList
Line 112:
Line 113: #End ExternalSource
Line 114:
Line 115:
Line 116: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",169)
Line 117: Protected WithEvents ctl_Message As Global.System.Web.UI.WebControls.TextBox
Line 118:
Line 119: #End ExternalSource
Line 120:
Line 121:
Line 122: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",174)
Line 123: Protected WithEvents label_ErreurMessage As Global.System.Web.UI.WebControls.Label
Line 124:
Line 125: #End ExternalSource
Line 126:
Line 127:
Line 128: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",175)
Line 129: Protected WithEvents ctl_ErreurMsgListe As Global.System.Web.UI.WebControls.TextBox
Line 130:
Line 131: #End ExternalSource
Line 132:
Line 133:
Line 134: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",176)
Line 135: Protected WithEvents lien_Webmaster As Global.System.Web.UI.WebControls.HyperLink
Line 136:
Line 137: #End ExternalSource
Line 138:
Line 139:
Line 140: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",178)
Line 141: Protected WithEvents img_Christel As Global.System.Web.UI.HtmlControls.HtmlImage
Line 142:
Line 143: #End ExternalSource
Line 144:
Line 145:
Line 146: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",181)
Line 147: Protected WithEvents btn_Effacer As Global.System.Web.UI.WebControls.Button
Line 148:
Line 149: #End ExternalSource
Line 150:
Line 151:
Line 152: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",182)
Line 153: Protected WithEvents btn_Envoyer As Global.System.Web.UI.WebControls.Button
Line 154:
Line 155: #End ExternalSource
Line 156:
Line 157: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 158: Get
Line 159: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 160: End Get
Line 161: End Property
Line 162:
Line 163: Protected ReadOnly Property ApplicationInstance() As ASP.global_asax
Line 164: Get
Line 165: Return CType(Me.Context.ApplicationInstance,ASP.global_asax)
Line 166: End Get
Line 167: End Property
Line 168:
Line 169: Public Shadows ReadOnly Property Master() As ASP.templates_principal_master
Line 170: Get
Line 171: Return CType(MyBase.Master,ASP.templates_principal_master)
Line 172: End Get
Line 173: End Property
Line 174: End Class
Line 175:
Line 176: Namespace ASP
Line 177:
Line 178: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 179: Public Class formulaires_acheter2_aspx
Line 180: Inherits Global.CodePage
Line 181: Implements System.Web.IHttpHandler
Line 182:
Line 183: Private Shared __initialized As Boolean
Line 184:
Line 185: Private Shared __fileDependencies As Object
Line 186:
Line 187: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 188: Public Sub New()
Line 189: MyBase.New
Line 190: Dim dependencies() As String
Line 191:
Line 192: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx.vb",912304)
Line 193: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/Formulaires/Acheter2.aspx"
Line 194:
Line 195: #End ExternalSource
Line 196: If (Global.ASP.formulaires_acheter2_aspx.__initialized = false) Then
Line 197: dependencies = New String(3) {}
Line 198: dependencies(0) = "~/Formulaires/Acheter2.aspx"
Line 199: dependencies(1) = "~/Templates/Principal.master"
Line 200: dependencies(2) = "~/Templates/Principal.master.vb"
Line 201: dependencies(3) = "~/Formulaires/Acheter2.aspx.vb"
Line 202: Global.ASP.formulaires_acheter2_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 203: Global.ASP.formulaires_acheter2_aspx.__initialized = true
Line 204: End If
Line 205: Me.Server.ScriptTimeout = 30000000
Line 206: End Sub
Line 207:
Line 208: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 209: Get
Line 210: Return false
Line 211: End Get
Line 212: End Property
Line 213:
Line 214: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 215: Private Function __BuildControl__control3() As Global.System.Web.UI.WebControls.ListItem
Line 216: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 217:
Line 218: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",15)
Line 219: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 220:
Line 221: #End ExternalSource
Line 222:
Line 223: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",15)
Line 224: __ctrl.Value = "Vide"
Line 225:
Line 226: #End ExternalSource
Line 227:
Line 228: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",15)
Line 229: __ctrl.Text = "Civilité"
Line 230:
Line 231: #End ExternalSource
Line 232: Return __ctrl
Line 233: End Function
Line 234:
Line 235: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 236: Private Function __BuildControl__control4() As Global.System.Web.UI.WebControls.ListItem
Line 237: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 238:
Line 239: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",16)
Line 240: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 241:
Line 242: #End ExternalSource
Line 243:
Line 244: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",16)
Line 245: __ctrl.Value = "Mme"
Line 246:
Line 247: #End ExternalSource
Line 248:
Line 249: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",16)
Line 250: __ctrl.Text = "Mme"
Line 251:
Line 252: #End ExternalSource
Line 253: Return __ctrl
Line 254: End Function
Line 255:
Line 256: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 257: Private Function __BuildControl__control5() As Global.System.Web.UI.WebControls.ListItem
Line 258: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 259:
Line 260: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",17)
Line 261: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 262:
Line 263: #End ExternalSource
Line 264:
Line 265: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",17)
Line 266: __ctrl.Value = "Mlle"
Line 267:
Line 268: #End ExternalSource
Line 269:
Line 270: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",17)
Line 271: __ctrl.Text = "Mlle"
Line 272:
Line 273: #End ExternalSource
Line 274: Return __ctrl
Line 275: End Function
Line 276:
Line 277: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 278: Private Function __BuildControl__control6() As Global.System.Web.UI.WebControls.ListItem
Line 279: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 280:
Line 281: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",18)
Line 282: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 283:
Line 284: #End ExternalSource
Line 285:
Line 286: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",18)
Line 287: __ctrl.Value = "M."
Line 288:
Line 289: #End ExternalSource
Line 290:
Line 291: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",18)
Line 292: __ctrl.Text = "M."
Line 293:
Line 294: #End ExternalSource
Line 295: Return __ctrl
Line 296: End Function
Line 297:
Line 298: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 299: Private Sub __BuildControl__control2(ByVal __ctrl As System.Web.UI.WebControls.ListItemCollection)
Line 300: Dim __ctrl1 As Global.System.Web.UI.WebControls.ListItem
Line 301:
Line 302: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 303: __ctrl1 = Me.__BuildControl__control3
Line 304:
Line 305: #End ExternalSource
Line 306:
Line 307: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 308: __ctrl.Add(__ctrl1)
Line 309:
Line 310: #End ExternalSource
Line 311: Dim __ctrl2 As Global.System.Web.UI.WebControls.ListItem
Line 312:
Line 313: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 314: __ctrl2 = Me.__BuildControl__control4
Line 315:
Line 316: #End ExternalSource
Line 317:
Line 318: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 319: __ctrl.Add(__ctrl2)
Line 320:
Line 321: #End ExternalSource
Line 322: Dim __ctrl3 As Global.System.Web.UI.WebControls.ListItem
Line 323:
Line 324: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 325: __ctrl3 = Me.__BuildControl__control5
Line 326:
Line 327: #End ExternalSource
Line 328:
Line 329: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 330: __ctrl.Add(__ctrl3)
Line 331:
Line 332: #End ExternalSource
Line 333: Dim __ctrl4 As Global.System.Web.UI.WebControls.ListItem
Line 334:
Line 335: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 336: __ctrl4 = Me.__BuildControl__control6
Line 337:
Line 338: #End ExternalSource
Line 339:
Line 340: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 341: __ctrl.Add(__ctrl4)
Line 342:
Line 343: #End ExternalSource
Line 344: End Sub
Line 345:
Line 346: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 347: Private Function __BuildControlctl_Civilité() As Global.System.Web.UI.WebControls.DropDownList
Line 348: Dim __ctrl As Global.System.Web.UI.WebControls.DropDownList
Line 349:
Line 350: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 351: __ctrl = New Global.System.Web.UI.WebControls.DropDownList
Line 352:
Line 353: #End ExternalSource
Line 354: Me.ctl_Civilité = __ctrl
Line 355: __ctrl.TemplateControl = Me
Line 356: __ctrl.ApplyStyleSheetSkin(Me)
Line 357:
Line 358: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 359: __ctrl.ID = "ctl_Civilité"
Line 360:
Line 361: #End ExternalSource
Line 362:
Line 363: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",14)
Line 364: Me.__BuildControl__control2(__ctrl.Items)
Line 365:
Line 366: #End ExternalSource
Line 367: Return __ctrl
Line 368: End Function
Line 369:
Line 370: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 371: Private Function __BuildControlctl_Nom() As Global.System.Web.UI.WebControls.TextBox
Line 372: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 373:
Line 374: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",21)
Line 375: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 376:
Line 377: #End ExternalSource
Line 378: Me.ctl_Nom = __ctrl
Line 379: __ctrl.TemplateControl = Me
Line 380: __ctrl.ApplyStyleSheetSkin(Me)
Line 381:
Line 382: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",21)
Line 383: __ctrl.ID = "ctl_Nom"
Line 384:
Line 385: #End ExternalSource
Line 386: Return __ctrl
Line 387: End Function
Line 388:
Line 389: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 390: Private Function __BuildControlctl_Prénom() As Global.System.Web.UI.WebControls.TextBox
Line 391: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 392:
Line 393: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",22)
Line 394: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 395:
Line 396: #End ExternalSource
Line 397: Me.ctl_Prénom = __ctrl
Line 398: __ctrl.TemplateControl = Me
Line 399: __ctrl.ApplyStyleSheetSkin(Me)
Line 400:
Line 401: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",22)
Line 402: __ctrl.ID = "ctl_Prénom"
Line 403:
Line 404: #End ExternalSource
Line 405: Return __ctrl
Line 406: End Function
Line 407:
Line 408: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 409: Private Function __BuildControlctl_EMail() As Global.System.Web.UI.WebControls.TextBox
Line 410: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 411:
Line 412: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",26)
Line 413: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 414:
Line 415: #End ExternalSource
Line 416: Me.ctl_EMail = __ctrl
Line 417: __ctrl.TemplateControl = Me
Line 418: __ctrl.ApplyStyleSheetSkin(Me)
Line 419:
Line 420: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",26)
Line 421: __ctrl.ID = "ctl_EMail"
Line 422:
Line 423: #End ExternalSource
Line 424: Return __ctrl
Line 425: End Function
Line 426:
Line 427: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 428: Private Function __BuildControlctl_Fixe() As Global.System.Web.UI.WebControls.TextBox
Line 429: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 430:
Line 431: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",27)
Line 432: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 433:
Line 434: #End ExternalSource
Line 435: Me.ctl_Fixe = __ctrl
Line 436: __ctrl.TemplateControl = Me
Line 437: __ctrl.ApplyStyleSheetSkin(Me)
Line 438:
Line 439: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",27)
Line 440: __ctrl.ID = "ctl_Fixe"
Line 441:
Line 442: #End ExternalSource
Line 443: Return __ctrl
Line 444: End Function
Line 445:
Line 446: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 447: Private Function __BuildControlctl_Mobile() As Global.System.Web.UI.WebControls.TextBox
Line 448: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 449:
Line 450: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",28)
Line 451: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 452:
Line 453: #End ExternalSource
Line 454: Me.ctl_Mobile = __ctrl
Line 455: __ctrl.TemplateControl = Me
Line 456: __ctrl.ApplyStyleSheetSkin(Me)
Line 457:
Line 458: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",28)
Line 459: __ctrl.ID = "ctl_Mobile"
Line 460:
Line 461: #End ExternalSource
Line 462: Return __ctrl
Line 463: End Function
Line 464:
Line 465: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 466: Private Function __BuildControlctl_Rue() As Global.System.Web.UI.WebControls.TextBox
Line 467: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 468:
Line 469: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",34)
Line 470: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 471:
Line 472: #End ExternalSource
Line 473: Me.ctl_Rue = __ctrl
Line 474: __ctrl.TemplateControl = Me
Line 475: __ctrl.ApplyStyleSheetSkin(Me)
Line 476:
Line 477: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",34)
Line 478: __ctrl.ID = "ctl_Rue"
Line 479:
Line 480: #End ExternalSource
Line 481: Return __ctrl
Line 482: End Function
Line 483:
Line 484: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 485: Private Function __BuildControlctl_Complément() As Global.System.Web.UI.WebControls.TextBox
Line 486: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 487:
Line 488: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",35)
Line 489: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 490:
Line 491: #End ExternalSource
Line 492: Me.ctl_Complément = __ctrl
Line 493: __ctrl.TemplateControl = Me
Line 494: __ctrl.ApplyStyleSheetSkin(Me)
Line 495:
Line 496: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",35)
Line 497: __ctrl.ID = "ctl_Complément"
Line 498:
Line 499: #End ExternalSource
Line 500: Return __ctrl
Line 501: End Function
Line 502:
Line 503: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 504: Private Function __BuildControlctl_CP() As Global.System.Web.UI.WebControls.TextBox
Line 505: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 506:
Line 507: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",36)
Line 508: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 509:
Line 510: #End ExternalSource
Line 511: Me.ctl_CP = __ctrl
Line 512: __ctrl.TemplateControl = Me
Line 513: __ctrl.ApplyStyleSheetSkin(Me)
Line 514:
Line 515: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",36)
Line 516: __ctrl.ID = "ctl_CP"
Line 517:
Line 518: #End ExternalSource
Line 519: Return __ctrl
Line 520: End Function
Line 521:
Line 522: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 523: Private Function __BuildControlctl_Ville() As Global.System.Web.UI.WebControls.TextBox
Line 524: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 525:
Line 526: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",37)
Line 527: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 528:
Line 529: #End ExternalSource
Line 530: Me.ctl_Ville = __ctrl
Line 531: __ctrl.TemplateControl = Me
Line 532: __ctrl.ApplyStyleSheetSkin(Me)
Line 533:
Line 534: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",37)
Line 535: __ctrl.ID = "ctl_Ville"
Line 536:
Line 537: #End ExternalSource
Line 538: Return __ctrl
Line 539: End Function
Line 540:
Line 541: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 542: Private Function __BuildControl__control8() As Global.System.Web.UI.WebControls.ListItem
Line 543: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 544:
Line 545: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",39)
Line 546: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 547:
Line 548: #End ExternalSource
Line 549:
Line 550: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",39)
Line 551: __ctrl.Value = "D00"
Line 552:
Line 553: #End ExternalSource
Line 554:
Line 555: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",39)
Line 556: __ctrl.Text = "---"
Line 557:
Line 558: #End ExternalSource
Line 559: Return __ctrl
Line 560: End Function
Line 561:
Line 562: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 563: Private Function __BuildControl__control9() As Global.System.Web.UI.WebControls.ListItem
Line 564: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 565:
Line 566: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",40)
Line 567: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 568:
Line 569: #End ExternalSource
Line 570:
Line 571: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",40)
Line 572: __ctrl.Value = "D01"
Line 573:
Line 574: #End ExternalSource
Line 575:
Line 576: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",40)
Line 577: __ctrl.Text = "-01 Ain"
Line 578:
Line 579: #End ExternalSource
Line 580: Return __ctrl
Line 581: End Function
Line 582:
Line 583: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 584: Private Function __BuildControl__control10() As Global.System.Web.UI.WebControls.ListItem
Line 585: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 586:
Line 587: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",41)
Line 588: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 589:
Line 590: #End ExternalSource
Line 591:
Line 592: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",41)
Line 593: __ctrl.Value = "D02"
Line 594:
Line 595: #End ExternalSource
Line 596:
Line 597: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",41)
Line 598: __ctrl.Text = "-02 Aisne"
Line 599:
Line 600: #End ExternalSource
Line 601: Return __ctrl
Line 602: End Function
Line 603:
Line 604: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 605: Private Function __BuildControl__control11() As Global.System.Web.UI.WebControls.ListItem
Line 606: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 607:
Line 608: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",42)
Line 609: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 610:
Line 611: #End ExternalSource
Line 612:
Line 613: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",42)
Line 614: __ctrl.Value = "D03"
Line 615:
Line 616: #End ExternalSource
Line 617:
Line 618: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",42)
Line 619: __ctrl.Text = "-03 Allier"
Line 620:
Line 621: #End ExternalSource
Line 622: Return __ctrl
Line 623: End Function
Line 624:
Line 625: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 626: Private Function __BuildControl__control12() As Global.System.Web.UI.WebControls.ListItem
Line 627: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 628:
Line 629: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",43)
Line 630: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 631:
Line 632: #End ExternalSource
Line 633:
Line 634: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",43)
Line 635: __ctrl.Value = "D04"
Line 636:
Line 637: #End ExternalSource
Line 638:
Line 639: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",43)
Line 640: __ctrl.Text = "-04 Alpes de Haute-Provence"
Line 641:
Line 642: #End ExternalSource
Line 643: Return __ctrl
Line 644: End Function
Line 645:
Line 646: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 647: Private Function __BuildControl__control13() As Global.System.Web.UI.WebControls.ListItem
Line 648: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 649:
Line 650: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",44)
Line 651: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 652:
Line 653: #End ExternalSource
Line 654:
Line 655: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",44)
Line 656: __ctrl.Value = "D05"
Line 657:
Line 658: #End ExternalSource
Line 659:
Line 660: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",44)
Line 661: __ctrl.Text = "-05 Hautes-Alpes"
Line 662:
Line 663: #End ExternalSource
Line 664: Return __ctrl
Line 665: End Function
Line 666:
Line 667: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 668: Private Function __BuildControl__control14() As Global.System.Web.UI.WebControls.ListItem
Line 669: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 670:
Line 671: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",45)
Line 672: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 673:
Line 674: #End ExternalSource
Line 675:
Line 676: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",45)
Line 677: __ctrl.Value = "D06"
Line 678:
Line 679: #End ExternalSource
Line 680:
Line 681: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",45)
Line 682: __ctrl.Text = "-06 Alpes Maritimes"
Line 683:
Line 684: #End ExternalSource
Line 685: Return __ctrl
Line 686: End Function
Line 687:
Line 688: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 689: Private Function __BuildControl__control15() As Global.System.Web.UI.WebControls.ListItem
Line 690: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 691:
Line 692: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",46)
Line 693: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 694:
Line 695: #End ExternalSource
Line 696:
Line 697: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",46)
Line 698: __ctrl.Value = "D07"
Line 699:
Line 700: #End ExternalSource
Line 701:
Line 702: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",46)
Line 703: __ctrl.Text = "-07 Ardèche"
Line 704:
Line 705: #End ExternalSource
Line 706: Return __ctrl
Line 707: End Function
Line 708:
Line 709: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 710: Private Function __BuildControl__control16() As Global.System.Web.UI.WebControls.ListItem
Line 711: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 712:
Line 713: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",47)
Line 714: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 715:
Line 716: #End ExternalSource
Line 717:
Line 718: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",47)
Line 719: __ctrl.Value = "D08"
Line 720:
Line 721: #End ExternalSource
Line 722:
Line 723: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",47)
Line 724: __ctrl.Text = "-08 Ardennes"
Line 725:
Line 726: #End ExternalSource
Line 727: Return __ctrl
Line 728: End Function
Line 729:
Line 730: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 731: Private Function __BuildControl__control17() As Global.System.Web.UI.WebControls.ListItem
Line 732: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 733:
Line 734: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",48)
Line 735: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 736:
Line 737: #End ExternalSource
Line 738:
Line 739: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",48)
Line 740: __ctrl.Value = "D09"
Line 741:
Line 742: #End ExternalSource
Line 743:
Line 744: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",48)
Line 745: __ctrl.Text = "-09 Ariège"
Line 746:
Line 747: #End ExternalSource
Line 748: Return __ctrl
Line 749: End Function
Line 750:
Line 751: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 752: Private Function __BuildControl__control18() As Global.System.Web.UI.WebControls.ListItem
Line 753: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 754:
Line 755: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",49)
Line 756: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 757:
Line 758: #End ExternalSource
Line 759:
Line 760: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",49)
Line 761: __ctrl.Value = "D10"
Line 762:
Line 763: #End ExternalSource
Line 764:
Line 765: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",49)
Line 766: __ctrl.Text = "-10 Aube"
Line 767:
Line 768: #End ExternalSource
Line 769: Return __ctrl
Line 770: End Function
Line 771:
Line 772: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 773: Private Function __BuildControl__control19() As Global.System.Web.UI.WebControls.ListItem
Line 774: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 775:
Line 776: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",50)
Line 777: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 778:
Line 779: #End ExternalSource
Line 780:
Line 781: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",50)
Line 782: __ctrl.Value = "D11"
Line 783:
Line 784: #End ExternalSource
Line 785:
Line 786: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",50)
Line 787: __ctrl.Text = "-11 Aude"
Line 788:
Line 789: #End ExternalSource
Line 790: Return __ctrl
Line 791: End Function
Line 792:
Line 793: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 794: Private Function __BuildControl__control20() As Global.System.Web.UI.WebControls.ListItem
Line 795: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 796:
Line 797: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",51)
Line 798: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 799:
Line 800: #End ExternalSource
Line 801:
Line 802: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",51)
Line 803: __ctrl.Value = "D12"
Line 804:
Line 805: #End ExternalSource
Line 806:
Line 807: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",51)
Line 808: __ctrl.Text = "-12 Aveyron"
Line 809:
Line 810: #End ExternalSource
Line 811: Return __ctrl
Line 812: End Function
Line 813:
Line 814: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 815: Private Function __BuildControl__control21() As Global.System.Web.UI.WebControls.ListItem
Line 816: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 817:
Line 818: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",52)
Line 819: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 820:
Line 821: #End ExternalSource
Line 822:
Line 823: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",52)
Line 824: __ctrl.Value = "D13"
Line 825:
Line 826: #End ExternalSource
Line 827:
Line 828: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",52)
Line 829: __ctrl.Text = "-13 Bouches-du-Rhône"
Line 830:
Line 831: #End ExternalSource
Line 832: Return __ctrl
Line 833: End Function
Line 834:
Line 835: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 836: Private Function __BuildControl__control22() As Global.System.Web.UI.WebControls.ListItem
Line 837: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 838:
Line 839: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",53)
Line 840: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 841:
Line 842: #End ExternalSource
Line 843:
Line 844: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",53)
Line 845: __ctrl.Value = "D14"
Line 846:
Line 847: #End ExternalSource
Line 848:
Line 849: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",53)
Line 850: __ctrl.Text = "-14 Calvados"
Line 851:
Line 852: #End ExternalSource
Line 853: Return __ctrl
Line 854: End Function
Line 855:
Line 856: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 857: Private Function __BuildControl__control23() As Global.System.Web.UI.WebControls.ListItem
Line 858: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 859:
Line 860: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",54)
Line 861: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 862:
Line 863: #End ExternalSource
Line 864:
Line 865: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",54)
Line 866: __ctrl.Value = "D15"
Line 867:
Line 868: #End ExternalSource
Line 869:
Line 870: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",54)
Line 871: __ctrl.Text = "-15 Cantal"
Line 872:
Line 873: #End ExternalSource
Line 874: Return __ctrl
Line 875: End Function
Line 876:
Line 877: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 878: Private Function __BuildControl__control24() As Global.System.Web.UI.WebControls.ListItem
Line 879: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 880:
Line 881: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",55)
Line 882: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 883:
Line 884: #End ExternalSource
Line 885:
Line 886: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",55)
Line 887: __ctrl.Value = "D16"
Line 888:
Line 889: #End ExternalSource
Line 890:
Line 891: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",55)
Line 892: __ctrl.Text = "-16 Charente"
Line 893:
Line 894: #End ExternalSource
Line 895: Return __ctrl
Line 896: End Function
Line 897:
Line 898: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 899: Private Function __BuildControl__control25() As Global.System.Web.UI.WebControls.ListItem
Line 900: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 901:
Line 902: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",56)
Line 903: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 904:
Line 905: #End ExternalSource
Line 906:
Line 907: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",56)
Line 908: __ctrl.Value = "D17"
Line 909:
Line 910: #End ExternalSource
Line 911:
Line 912: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",56)
Line 913: __ctrl.Text = "-17 Charente-Maritime"
Line 914:
Line 915: #End ExternalSource
Line 916: Return __ctrl
Line 917: End Function
Line 918:
Line 919: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 920: Private Function __BuildControl__control26() As Global.System.Web.UI.WebControls.ListItem
Line 921: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 922:
Line 923: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",57)
Line 924: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 925:
Line 926: #End ExternalSource
Line 927:
Line 928: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",57)
Line 929: __ctrl.Value = "D18"
Line 930:
Line 931: #End ExternalSource
Line 932:
Line 933: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",57)
Line 934: __ctrl.Text = "-18 Cher"
Line 935:
Line 936: #End ExternalSource
Line 937: Return __ctrl
Line 938: End Function
Line 939:
Line 940: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 941: Private Function __BuildControl__control27() As Global.System.Web.UI.WebControls.ListItem
Line 942: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 943:
Line 944: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",58)
Line 945: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 946:
Line 947: #End ExternalSource
Line 948:
Line 949: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",58)
Line 950: __ctrl.Value = "D19"
Line 951:
Line 952: #End ExternalSource
Line 953:
Line 954: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",58)
Line 955: __ctrl.Text = "-19 Corrèze"
Line 956:
Line 957: #End ExternalSource
Line 958: Return __ctrl
Line 959: End Function
Line 960:
Line 961: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 962: Private Function __BuildControl__control28() As Global.System.Web.UI.WebControls.ListItem
Line 963: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 964:
Line 965: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",59)
Line 966: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 967:
Line 968: #End ExternalSource
Line 969:
Line 970: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",59)
Line 971: __ctrl.Value = "D2A"
Line 972:
Line 973: #End ExternalSource
Line 974:
Line 975: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",59)
Line 976: __ctrl.Text = "-2a Corse du Sud"
Line 977:
Line 978: #End ExternalSource
Line 979: Return __ctrl
Line 980: End Function
Line 981:
Line 982: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 983: Private Function __BuildControl__control29() As Global.System.Web.UI.WebControls.ListItem
Line 984: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 985:
Line 986: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",60)
Line 987: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 988:
Line 989: #End ExternalSource
Line 990:
Line 991: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",60)
Line 992: __ctrl.Value = "D2B"
Line 993:
Line 994: #End ExternalSource
Line 995:
Line 996: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",60)
Line 997: __ctrl.Text = "-2b Haute Corse"
Line 998:
Line 999: #End ExternalSource
Line 1000: Return __ctrl
Line 1001: End Function
Line 1002:
Line 1003: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1004: Private Function __BuildControl__control30() As Global.System.Web.UI.WebControls.ListItem
Line 1005: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1006:
Line 1007: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",61)
Line 1008: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1009:
Line 1010: #End ExternalSource
Line 1011:
Line 1012: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",61)
Line 1013: __ctrl.Value = "D21"
Line 1014:
Line 1015: #End ExternalSource
Line 1016:
Line 1017: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",61)
Line 1018: __ctrl.Text = "-21 Côte d'or"
Line 1019:
Line 1020: #End ExternalSource
Line 1021: Return __ctrl
Line 1022: End Function
Line 1023:
Line 1024: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1025: Private Function __BuildControl__control31() As Global.System.Web.UI.WebControls.ListItem
Line 1026: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1027:
Line 1028: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",62)
Line 1029: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1030:
Line 1031: #End ExternalSource
Line 1032:
Line 1033: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",62)
Line 1034: __ctrl.Value = "D22"
Line 1035:
Line 1036: #End ExternalSource
Line 1037:
Line 1038: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",62)
Line 1039: __ctrl.Text = "-22 Côte d'Armor"
Line 1040:
Line 1041: #End ExternalSource
Line 1042: Return __ctrl
Line 1043: End Function
Line 1044:
Line 1045: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1046: Private Function __BuildControl__control32() As Global.System.Web.UI.WebControls.ListItem
Line 1047: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1048:
Line 1049: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",63)
Line 1050: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1051:
Line 1052: #End ExternalSource
Line 1053:
Line 1054: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",63)
Line 1055: __ctrl.Value = "D23"
Line 1056:
Line 1057: #End ExternalSource
Line 1058:
Line 1059: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",63)
Line 1060: __ctrl.Text = "-23 Creuse"
Line 1061:
Line 1062: #End ExternalSource
Line 1063: Return __ctrl
Line 1064: End Function
Line 1065:
Line 1066: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1067: Private Function __BuildControl__control33() As Global.System.Web.UI.WebControls.ListItem
Line 1068: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1069:
Line 1070: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",64)
Line 1071: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1072:
Line 1073: #End ExternalSource
Line 1074:
Line 1075: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",64)
Line 1076: __ctrl.Value = "D24"
Line 1077:
Line 1078: #End ExternalSource
Line 1079:
Line 1080: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",64)
Line 1081: __ctrl.Text = "-24 Dordogne"
Line 1082:
Line 1083: #End ExternalSource
Line 1084: Return __ctrl
Line 1085: End Function
Line 1086:
Line 1087: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1088: Private Function __BuildControl__control34() As Global.System.Web.UI.WebControls.ListItem
Line 1089: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1090:
Line 1091: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",65)
Line 1092: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1093:
Line 1094: #End ExternalSource
Line 1095:
Line 1096: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",65)
Line 1097: __ctrl.Value = "D25"
Line 1098:
Line 1099: #End ExternalSource
Line 1100:
Line 1101: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",65)
Line 1102: __ctrl.Text = "-25 Doubs"
Line 1103:
Line 1104: #End ExternalSource
Line 1105: Return __ctrl
Line 1106: End Function
Line 1107:
Line 1108: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1109: Private Function __BuildControl__control35() As Global.System.Web.UI.WebControls.ListItem
Line 1110: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1111:
Line 1112: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",66)
Line 1113: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1114:
Line 1115: #End ExternalSource
Line 1116:
Line 1117: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",66)
Line 1118: __ctrl.Value = "D26"
Line 1119:
Line 1120: #End ExternalSource
Line 1121:
Line 1122: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",66)
Line 1123: __ctrl.Text = "-26 Drôme"
Line 1124:
Line 1125: #End ExternalSource
Line 1126: Return __ctrl
Line 1127: End Function
Line 1128:
Line 1129: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1130: Private Function __BuildControl__control36() As Global.System.Web.UI.WebControls.ListItem
Line 1131: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1132:
Line 1133: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",67)
Line 1134: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1135:
Line 1136: #End ExternalSource
Line 1137:
Line 1138: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",67)
Line 1139: __ctrl.Value = "D27"
Line 1140:
Line 1141: #End ExternalSource
Line 1142:
Line 1143: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",67)
Line 1144: __ctrl.Text = "-27 Eure"
Line 1145:
Line 1146: #End ExternalSource
Line 1147: Return __ctrl
Line 1148: End Function
Line 1149:
Line 1150: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1151: Private Function __BuildControl__control37() As Global.System.Web.UI.WebControls.ListItem
Line 1152: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1153:
Line 1154: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",68)
Line 1155: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1156:
Line 1157: #End ExternalSource
Line 1158:
Line 1159: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",68)
Line 1160: __ctrl.Value = "D28"
Line 1161:
Line 1162: #End ExternalSource
Line 1163:
Line 1164: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",68)
Line 1165: __ctrl.Text = "-28 Eure-et-Loir"
Line 1166:
Line 1167: #End ExternalSource
Line 1168: Return __ctrl
Line 1169: End Function
Line 1170:
Line 1171: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1172: Private Function __BuildControl__control38() As Global.System.Web.UI.WebControls.ListItem
Line 1173: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1174:
Line 1175: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",69)
Line 1176: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1177:
Line 1178: #End ExternalSource
Line 1179:
Line 1180: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",69)
Line 1181: __ctrl.Value = "D29"
Line 1182:
Line 1183: #End ExternalSource
Line 1184:
Line 1185: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",69)
Line 1186: __ctrl.Text = "-29 Finistère"
Line 1187:
Line 1188: #End ExternalSource
Line 1189: Return __ctrl
Line 1190: End Function
Line 1191:
Line 1192: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1193: Private Function __BuildControl__control39() As Global.System.Web.UI.WebControls.ListItem
Line 1194: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1195:
Line 1196: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",70)
Line 1197: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1198:
Line 1199: #End ExternalSource
Line 1200:
Line 1201: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",70)
Line 1202: __ctrl.Value = "D30"
Line 1203:
Line 1204: #End ExternalSource
Line 1205:
Line 1206: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",70)
Line 1207: __ctrl.Text = "-30 Gard"
Line 1208:
Line 1209: #End ExternalSource
Line 1210: Return __ctrl
Line 1211: End Function
Line 1212:
Line 1213: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1214: Private Function __BuildControl__control40() As Global.System.Web.UI.WebControls.ListItem
Line 1215: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1216:
Line 1217: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",71)
Line 1218: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1219:
Line 1220: #End ExternalSource
Line 1221:
Line 1222: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",71)
Line 1223: __ctrl.Value = "D31"
Line 1224:
Line 1225: #End ExternalSource
Line 1226:
Line 1227: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",71)
Line 1228: __ctrl.Text = "-31 Haute-Garonne"
Line 1229:
Line 1230: #End ExternalSource
Line 1231: Return __ctrl
Line 1232: End Function
Line 1233:
Line 1234: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1235: Private Function __BuildControl__control41() As Global.System.Web.UI.WebControls.ListItem
Line 1236: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1237:
Line 1238: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",72)
Line 1239: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1240:
Line 1241: #End ExternalSource
Line 1242:
Line 1243: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",72)
Line 1244: __ctrl.Value = "D32"
Line 1245:
Line 1246: #End ExternalSource
Line 1247:
Line 1248: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",72)
Line 1249: __ctrl.Text = "-32 Gers"
Line 1250:
Line 1251: #End ExternalSource
Line 1252: Return __ctrl
Line 1253: End Function
Line 1254:
Line 1255: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1256: Private Function __BuildControl__control42() As Global.System.Web.UI.WebControls.ListItem
Line 1257: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1258:
Line 1259: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",73)
Line 1260: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1261:
Line 1262: #End ExternalSource
Line 1263:
Line 1264: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",73)
Line 1265: __ctrl.Value = "D33"
Line 1266:
Line 1267: #End ExternalSource
Line 1268:
Line 1269: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",73)
Line 1270: __ctrl.Text = "-33 Gironde"
Line 1271:
Line 1272: #End ExternalSource
Line 1273: Return __ctrl
Line 1274: End Function
Line 1275:
Line 1276: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1277: Private Function __BuildControl__control43() As Global.System.Web.UI.WebControls.ListItem
Line 1278: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1279:
Line 1280: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",74)
Line 1281: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1282:
Line 1283: #End ExternalSource
Line 1284:
Line 1285: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",74)
Line 1286: __ctrl.Value = "D34"
Line 1287:
Line 1288: #End ExternalSource
Line 1289:
Line 1290: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",74)
Line 1291: __ctrl.Text = "-34 Hérault"
Line 1292:
Line 1293: #End ExternalSource
Line 1294: Return __ctrl
Line 1295: End Function
Line 1296:
Line 1297: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1298: Private Function __BuildControl__control44() As Global.System.Web.UI.WebControls.ListItem
Line 1299: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1300:
Line 1301: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",75)
Line 1302: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1303:
Line 1304: #End ExternalSource
Line 1305:
Line 1306: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",75)
Line 1307: __ctrl.Value = "D35"
Line 1308:
Line 1309: #End ExternalSource
Line 1310:
Line 1311: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",75)
Line 1312: __ctrl.Text = "-35 Ille-et-Vilaine"
Line 1313:
Line 1314: #End ExternalSource
Line 1315: Return __ctrl
Line 1316: End Function
Line 1317:
Line 1318: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1319: Private Function __BuildControl__control45() As Global.System.Web.UI.WebControls.ListItem
Line 1320: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1321:
Line 1322: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",76)
Line 1323: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1324:
Line 1325: #End ExternalSource
Line 1326:
Line 1327: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",76)
Line 1328: __ctrl.Value = "D36"
Line 1329:
Line 1330: #End ExternalSource
Line 1331:
Line 1332: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",76)
Line 1333: __ctrl.Text = "-36 Indre"
Line 1334:
Line 1335: #End ExternalSource
Line 1336: Return __ctrl
Line 1337: End Function
Line 1338:
Line 1339: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1340: Private Function __BuildControl__control46() As Global.System.Web.UI.WebControls.ListItem
Line 1341: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1342:
Line 1343: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",77)
Line 1344: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1345:
Line 1346: #End ExternalSource
Line 1347:
Line 1348: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",77)
Line 1349: __ctrl.Value = "D37"
Line 1350:
Line 1351: #End ExternalSource
Line 1352:
Line 1353: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",77)
Line 1354: __ctrl.Text = "-37 Indre-et-Loire"
Line 1355:
Line 1356: #End ExternalSource
Line 1357: Return __ctrl
Line 1358: End Function
Line 1359:
Line 1360: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1361: Private Function __BuildControl__control47() As Global.System.Web.UI.WebControls.ListItem
Line 1362: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1363:
Line 1364: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",78)
Line 1365: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1366:
Line 1367: #End ExternalSource
Line 1368:
Line 1369: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",78)
Line 1370: __ctrl.Value = "D38"
Line 1371:
Line 1372: #End ExternalSource
Line 1373:
Line 1374: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",78)
Line 1375: __ctrl.Text = "-38 Isère"
Line 1376:
Line 1377: #End ExternalSource
Line 1378: Return __ctrl
Line 1379: End Function
Line 1380:
Line 1381: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1382: Private Function __BuildControl__control48() As Global.System.Web.UI.WebControls.ListItem
Line 1383: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1384:
Line 1385: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",79)
Line 1386: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1387:
Line 1388: #End ExternalSource
Line 1389:
Line 1390: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",79)
Line 1391: __ctrl.Value = "D39"
Line 1392:
Line 1393: #End ExternalSource
Line 1394:
Line 1395: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",79)
Line 1396: __ctrl.Text = "-39 Jura"
Line 1397:
Line 1398: #End ExternalSource
Line 1399: Return __ctrl
Line 1400: End Function
Line 1401:
Line 1402: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1403: Private Function __BuildControl__control49() As Global.System.Web.UI.WebControls.ListItem
Line 1404: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1405:
Line 1406: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",80)
Line 1407: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1408:
Line 1409: #End ExternalSource
Line 1410:
Line 1411: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",80)
Line 1412: __ctrl.Value = "D40"
Line 1413:
Line 1414: #End ExternalSource
Line 1415:
Line 1416: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",80)
Line 1417: __ctrl.Text = "-40 Landes"
Line 1418:
Line 1419: #End ExternalSource
Line 1420: Return __ctrl
Line 1421: End Function
Line 1422:
Line 1423: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1424: Private Function __BuildControl__control50() As Global.System.Web.UI.WebControls.ListItem
Line 1425: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1426:
Line 1427: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",81)
Line 1428: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1429:
Line 1430: #End ExternalSource
Line 1431:
Line 1432: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",81)
Line 1433: __ctrl.Value = "D41"
Line 1434:
Line 1435: #End ExternalSource
Line 1436:
Line 1437: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",81)
Line 1438: __ctrl.Text = "-41 Loir-et-Cher"
Line 1439:
Line 1440: #End ExternalSource
Line 1441: Return __ctrl
Line 1442: End Function
Line 1443:
Line 1444: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1445: Private Function __BuildControl__control51() As Global.System.Web.UI.WebControls.ListItem
Line 1446: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1447:
Line 1448: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",82)
Line 1449: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1450:
Line 1451: #End ExternalSource
Line 1452:
Line 1453: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",82)
Line 1454: __ctrl.Value = "D42"
Line 1455:
Line 1456: #End ExternalSource
Line 1457:
Line 1458: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",82)
Line 1459: __ctrl.Text = "-42 Loire"
Line 1460:
Line 1461: #End ExternalSource
Line 1462: Return __ctrl
Line 1463: End Function
Line 1464:
Line 1465: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1466: Private Function __BuildControl__control52() As Global.System.Web.UI.WebControls.ListItem
Line 1467: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1468:
Line 1469: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",83)
Line 1470: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1471:
Line 1472: #End ExternalSource
Line 1473:
Line 1474: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",83)
Line 1475: __ctrl.Value = "D43"
Line 1476:
Line 1477: #End ExternalSource
Line 1478:
Line 1479: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",83)
Line 1480: __ctrl.Text = "-43 haute-Loire"
Line 1481:
Line 1482: #End ExternalSource
Line 1483: Return __ctrl
Line 1484: End Function
Line 1485:
Line 1486: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1487: Private Function __BuildControl__control53() As Global.System.Web.UI.WebControls.ListItem
Line 1488: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1489:
Line 1490: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",84)
Line 1491: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1492:
Line 1493: #End ExternalSource
Line 1494:
Line 1495: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",84)
Line 1496: __ctrl.Value = "D44"
Line 1497:
Line 1498: #End ExternalSource
Line 1499:
Line 1500: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",84)
Line 1501: __ctrl.Text = "-44 Loire-Atlantique"
Line 1502:
Line 1503: #End ExternalSource
Line 1504: Return __ctrl
Line 1505: End Function
Line 1506:
Line 1507: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1508: Private Function __BuildControl__control54() As Global.System.Web.UI.WebControls.ListItem
Line 1509: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1510:
Line 1511: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",85)
Line 1512: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1513:
Line 1514: #End ExternalSource
Line 1515:
Line 1516: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",85)
Line 1517: __ctrl.Value = "D45"
Line 1518:
Line 1519: #End ExternalSource
Line 1520:
Line 1521: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",85)
Line 1522: __ctrl.Text = "-45 Loiret"
Line 1523:
Line 1524: #End ExternalSource
Line 1525: Return __ctrl
Line 1526: End Function
Line 1527:
Line 1528: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1529: Private Function __BuildControl__control55() As Global.System.Web.UI.WebControls.ListItem
Line 1530: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1531:
Line 1532: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",86)
Line 1533: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1534:
Line 1535: #End ExternalSource
Line 1536:
Line 1537: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",86)
Line 1538: __ctrl.Value = "D46"
Line 1539:
Line 1540: #End ExternalSource
Line 1541:
Line 1542: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",86)
Line 1543: __ctrl.Text = "-46 Lot"
Line 1544:
Line 1545: #End ExternalSource
Line 1546: Return __ctrl
Line 1547: End Function
Line 1548:
Line 1549: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1550: Private Function __BuildControl__control56() As Global.System.Web.UI.WebControls.ListItem
Line 1551: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1552:
Line 1553: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",87)
Line 1554: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1555:
Line 1556: #End ExternalSource
Line 1557:
Line 1558: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",87)
Line 1559: __ctrl.Value = "D47"
Line 1560:
Line 1561: #End ExternalSource
Line 1562:
Line 1563: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",87)
Line 1564: __ctrl.Text = "-47 Lot-et-Garonne"
Line 1565:
Line 1566: #End ExternalSource
Line 1567: Return __ctrl
Line 1568: End Function
Line 1569:
Line 1570: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1571: Private Function __BuildControl__control57() As Global.System.Web.UI.WebControls.ListItem
Line 1572: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1573:
Line 1574: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",88)
Line 1575: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1576:
Line 1577: #End ExternalSource
Line 1578:
Line 1579: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",88)
Line 1580: __ctrl.Value = "D48"
Line 1581:
Line 1582: #End ExternalSource
Line 1583:
Line 1584: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",88)
Line 1585: __ctrl.Text = "-48 Lozère"
Line 1586:
Line 1587: #End ExternalSource
Line 1588: Return __ctrl
Line 1589: End Function
Line 1590:
Line 1591: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1592: Private Function __BuildControl__control58() As Global.System.Web.UI.WebControls.ListItem
Line 1593: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1594:
Line 1595: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",89)
Line 1596: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1597:
Line 1598: #End ExternalSource
Line 1599:
Line 1600: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",89)
Line 1601: __ctrl.Value = "D49"
Line 1602:
Line 1603: #End ExternalSource
Line 1604:
Line 1605: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",89)
Line 1606: __ctrl.Text = "-49 Maine-et-LoAire"
Line 1607:
Line 1608: #End ExternalSource
Line 1609: Return __ctrl
Line 1610: End Function
Line 1611:
Line 1612: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1613: Private Function __BuildControl__control59() As Global.System.Web.UI.WebControls.ListItem
Line 1614: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1615:
Line 1616: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",90)
Line 1617: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1618:
Line 1619: #End ExternalSource
Line 1620:
Line 1621: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",90)
Line 1622: __ctrl.Value = "D50"
Line 1623:
Line 1624: #End ExternalSource
Line 1625:
Line 1626: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",90)
Line 1627: __ctrl.Text = "-50 Manche"
Line 1628:
Line 1629: #End ExternalSource
Line 1630: Return __ctrl
Line 1631: End Function
Line 1632:
Line 1633: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1634: Private Function __BuildControl__control60() As Global.System.Web.UI.WebControls.ListItem
Line 1635: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1636:
Line 1637: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",91)
Line 1638: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1639:
Line 1640: #End ExternalSource
Line 1641:
Line 1642: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",91)
Line 1643: __ctrl.Value = "D51"
Line 1644:
Line 1645: #End ExternalSource
Line 1646:
Line 1647: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",91)
Line 1648: __ctrl.Text = "-51 Marne"
Line 1649:
Line 1650: #End ExternalSource
Line 1651: Return __ctrl
Line 1652: End Function
Line 1653:
Line 1654: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1655: Private Function __BuildControl__control61() As Global.System.Web.UI.WebControls.ListItem
Line 1656: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1657:
Line 1658: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",92)
Line 1659: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1660:
Line 1661: #End ExternalSource
Line 1662:
Line 1663: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",92)
Line 1664: __ctrl.Value = "D52"
Line 1665:
Line 1666: #End ExternalSource
Line 1667:
Line 1668: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",92)
Line 1669: __ctrl.Text = "-52 Haute-Marne"
Line 1670:
Line 1671: #End ExternalSource
Line 1672: Return __ctrl
Line 1673: End Function
Line 1674:
Line 1675: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1676: Private Function __BuildControl__control62() As Global.System.Web.UI.WebControls.ListItem
Line 1677: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1678:
Line 1679: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",93)
Line 1680: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1681:
Line 1682: #End ExternalSource
Line 1683:
Line 1684: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",93)
Line 1685: __ctrl.Value = "D53"
Line 1686:
Line 1687: #End ExternalSource
Line 1688:
Line 1689: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",93)
Line 1690: __ctrl.Text = "-53 Mayenne"
Line 1691:
Line 1692: #End ExternalSource
Line 1693: Return __ctrl
Line 1694: End Function
Line 1695:
Line 1696: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1697: Private Function __BuildControl__control63() As Global.System.Web.UI.WebControls.ListItem
Line 1698: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1699:
Line 1700: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",94)
Line 1701: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1702:
Line 1703: #End ExternalSource
Line 1704:
Line 1705: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",94)
Line 1706: __ctrl.Value = "D54"
Line 1707:
Line 1708: #End ExternalSource
Line 1709:
Line 1710: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",94)
Line 1711: __ctrl.Text = "-54 Meurthe-et-Moselle"
Line 1712:
Line 1713: #End ExternalSource
Line 1714: Return __ctrl
Line 1715: End Function
Line 1716:
Line 1717: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1718: Private Function __BuildControl__control64() As Global.System.Web.UI.WebControls.ListItem
Line 1719: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1720:
Line 1721: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",95)
Line 1722: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1723:
Line 1724: #End ExternalSource
Line 1725:
Line 1726: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",95)
Line 1727: __ctrl.Value = "D55"
Line 1728:
Line 1729: #End ExternalSource
Line 1730:
Line 1731: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",95)
Line 1732: __ctrl.Text = "-55 Meuse"
Line 1733:
Line 1734: #End ExternalSource
Line 1735: Return __ctrl
Line 1736: End Function
Line 1737:
Line 1738: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1739: Private Function __BuildControl__control65() As Global.System.Web.UI.WebControls.ListItem
Line 1740: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1741:
Line 1742: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",96)
Line 1743: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1744:
Line 1745: #End ExternalSource
Line 1746:
Line 1747: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",96)
Line 1748: __ctrl.Value = "D56"
Line 1749:
Line 1750: #End ExternalSource
Line 1751:
Line 1752: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",96)
Line 1753: __ctrl.Text = "-56 Morbihan"
Line 1754:
Line 1755: #End ExternalSource
Line 1756: Return __ctrl
Line 1757: End Function
Line 1758:
Line 1759: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1760: Private Function __BuildControl__control66() As Global.System.Web.UI.WebControls.ListItem
Line 1761: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1762:
Line 1763: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",97)
Line 1764: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1765:
Line 1766: #End ExternalSource
Line 1767:
Line 1768: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",97)
Line 1769: __ctrl.Value = "D57"
Line 1770:
Line 1771: #End ExternalSource
Line 1772:
Line 1773: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",97)
Line 1774: __ctrl.Text = "-57 Moselle"
Line 1775:
Line 1776: #End ExternalSource
Line 1777: Return __ctrl
Line 1778: End Function
Line 1779:
Line 1780: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1781: Private Function __BuildControl__control67() As Global.System.Web.UI.WebControls.ListItem
Line 1782: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1783:
Line 1784: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",98)
Line 1785: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1786:
Line 1787: #End ExternalSource
Line 1788:
Line 1789: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",98)
Line 1790: __ctrl.Value = "D58"
Line 1791:
Line 1792: #End ExternalSource
Line 1793:
Line 1794: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",98)
Line 1795: __ctrl.Text = "-58 Nièvre"
Line 1796:
Line 1797: #End ExternalSource
Line 1798: Return __ctrl
Line 1799: End Function
Line 1800:
Line 1801: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1802: Private Function __BuildControl__control68() As Global.System.Web.UI.WebControls.ListItem
Line 1803: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1804:
Line 1805: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",99)
Line 1806: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1807:
Line 1808: #End ExternalSource
Line 1809:
Line 1810: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",99)
Line 1811: __ctrl.Value = "D59"
Line 1812:
Line 1813: #End ExternalSource
Line 1814:
Line 1815: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",99)
Line 1816: __ctrl.Text = "-59 Nord"
Line 1817:
Line 1818: #End ExternalSource
Line 1819: Return __ctrl
Line 1820: End Function
Line 1821:
Line 1822: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1823: Private Function __BuildControl__control69() As Global.System.Web.UI.WebControls.ListItem
Line 1824: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1825:
Line 1826: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",100)
Line 1827: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1828:
Line 1829: #End ExternalSource
Line 1830:
Line 1831: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",100)
Line 1832: __ctrl.Value = "D60"
Line 1833:
Line 1834: #End ExternalSource
Line 1835:
Line 1836: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",100)
Line 1837: __ctrl.Text = "-60 Oise"
Line 1838:
Line 1839: #End ExternalSource
Line 1840: Return __ctrl
Line 1841: End Function
Line 1842:
Line 1843: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1844: Private Function __BuildControl__control70() As Global.System.Web.UI.WebControls.ListItem
Line 1845: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1846:
Line 1847: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",101)
Line 1848: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1849:
Line 1850: #End ExternalSource
Line 1851:
Line 1852: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",101)
Line 1853: __ctrl.Value = "D61"
Line 1854:
Line 1855: #End ExternalSource
Line 1856:
Line 1857: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",101)
Line 1858: __ctrl.Text = "-61 Orne"
Line 1859:
Line 1860: #End ExternalSource
Line 1861: Return __ctrl
Line 1862: End Function
Line 1863:
Line 1864: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1865: Private Function __BuildControl__control71() As Global.System.Web.UI.WebControls.ListItem
Line 1866: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1867:
Line 1868: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",102)
Line 1869: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1870:
Line 1871: #End ExternalSource
Line 1872:
Line 1873: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",102)
Line 1874: __ctrl.Value = "D62"
Line 1875:
Line 1876: #End ExternalSource
Line 1877:
Line 1878: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",102)
Line 1879: __ctrl.Text = "-62 Pas-de-Calais"
Line 1880:
Line 1881: #End ExternalSource
Line 1882: Return __ctrl
Line 1883: End Function
Line 1884:
Line 1885: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1886: Private Function __BuildControl__control72() As Global.System.Web.UI.WebControls.ListItem
Line 1887: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1888:
Line 1889: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",103)
Line 1890: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1891:
Line 1892: #End ExternalSource
Line 1893:
Line 1894: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",103)
Line 1895: __ctrl.Value = "D63"
Line 1896:
Line 1897: #End ExternalSource
Line 1898:
Line 1899: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",103)
Line 1900: __ctrl.Text = "-63 Puy-de-Dôme"
Line 1901:
Line 1902: #End ExternalSource
Line 1903: Return __ctrl
Line 1904: End Function
Line 1905:
Line 1906: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1907: Private Function __BuildControl__control73() As Global.System.Web.UI.WebControls.ListItem
Line 1908: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1909:
Line 1910: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",104)
Line 1911: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1912:
Line 1913: #End ExternalSource
Line 1914:
Line 1915: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",104)
Line 1916: __ctrl.Value = "D64"
Line 1917:
Line 1918: #End ExternalSource
Line 1919:
Line 1920: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",104)
Line 1921: __ctrl.Text = "-65 Pyrénées-Atlantiques"
Line 1922:
Line 1923: #End ExternalSource
Line 1924: Return __ctrl
Line 1925: End Function
Line 1926:
Line 1927: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1928: Private Function __BuildControl__control74() As Global.System.Web.UI.WebControls.ListItem
Line 1929: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1930:
Line 1931: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",105)
Line 1932: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1933:
Line 1934: #End ExternalSource
Line 1935:
Line 1936: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",105)
Line 1937: __ctrl.Value = "D65"
Line 1938:
Line 1939: #End ExternalSource
Line 1940:
Line 1941: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",105)
Line 1942: __ctrl.Text = "-66 Hautes-Pyrénées"
Line 1943:
Line 1944: #End ExternalSource
Line 1945: Return __ctrl
Line 1946: End Function
Line 1947:
Line 1948: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1949: Private Function __BuildControl__control75() As Global.System.Web.UI.WebControls.ListItem
Line 1950: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1951:
Line 1952: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",106)
Line 1953: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1954:
Line 1955: #End ExternalSource
Line 1956:
Line 1957: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",106)
Line 1958: __ctrl.Value = "D66"
Line 1959:
Line 1960: #End ExternalSource
Line 1961:
Line 1962: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",106)
Line 1963: __ctrl.Text = "-66 Pyrénées-Orientales"
Line 1964:
Line 1965: #End ExternalSource
Line 1966: Return __ctrl
Line 1967: End Function
Line 1968:
Line 1969: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1970: Private Function __BuildControl__control76() As Global.System.Web.UI.WebControls.ListItem
Line 1971: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1972:
Line 1973: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",107)
Line 1974: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1975:
Line 1976: #End ExternalSource
Line 1977:
Line 1978: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",107)
Line 1979: __ctrl.Value = "D67"
Line 1980:
Line 1981: #End ExternalSource
Line 1982:
Line 1983: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",107)
Line 1984: __ctrl.Text = "-67 Bas-Rhin"
Line 1985:
Line 1986: #End ExternalSource
Line 1987: Return __ctrl
Line 1988: End Function
Line 1989:
Line 1990: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1991: Private Function __BuildControl__control77() As Global.System.Web.UI.WebControls.ListItem
Line 1992: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 1993:
Line 1994: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",108)
Line 1995: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 1996:
Line 1997: #End ExternalSource
Line 1998:
Line 1999: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",108)
Line 2000: __ctrl.Value = "D68"
Line 2001:
Line 2002: #End ExternalSource
Line 2003:
Line 2004: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",108)
Line 2005: __ctrl.Text = "-68 Haut-Rhin"
Line 2006:
Line 2007: #End ExternalSource
Line 2008: Return __ctrl
Line 2009: End Function
Line 2010:
Line 2011: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2012: Private Function __BuildControl__control78() As Global.System.Web.UI.WebControls.ListItem
Line 2013: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2014:
Line 2015: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",109)
Line 2016: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2017:
Line 2018: #End ExternalSource
Line 2019:
Line 2020: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",109)
Line 2021: __ctrl.Value = "D69"
Line 2022:
Line 2023: #End ExternalSource
Line 2024:
Line 2025: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",109)
Line 2026: __ctrl.Text = "-69 Rhône"
Line 2027:
Line 2028: #End ExternalSource
Line 2029: Return __ctrl
Line 2030: End Function
Line 2031:
Line 2032: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2033: Private Function __BuildControl__control79() As Global.System.Web.UI.WebControls.ListItem
Line 2034: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2035:
Line 2036: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",110)
Line 2037: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2038:
Line 2039: #End ExternalSource
Line 2040:
Line 2041: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",110)
Line 2042: __ctrl.Value = "D70"
Line 2043:
Line 2044: #End ExternalSource
Line 2045:
Line 2046: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",110)
Line 2047: __ctrl.Text = "-70 Haute-Saône"
Line 2048:
Line 2049: #End ExternalSource
Line 2050: Return __ctrl
Line 2051: End Function
Line 2052:
Line 2053: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2054: Private Function __BuildControl__control80() As Global.System.Web.UI.WebControls.ListItem
Line 2055: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2056:
Line 2057: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",111)
Line 2058: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2059:
Line 2060: #End ExternalSource
Line 2061:
Line 2062: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",111)
Line 2063: __ctrl.Value = "D71"
Line 2064:
Line 2065: #End ExternalSource
Line 2066:
Line 2067: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",111)
Line 2068: __ctrl.Text = "-71 Saône-et-Loire"
Line 2069:
Line 2070: #End ExternalSource
Line 2071: Return __ctrl
Line 2072: End Function
Line 2073:
Line 2074: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2075: Private Function __BuildControl__control81() As Global.System.Web.UI.WebControls.ListItem
Line 2076: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2077:
Line 2078: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",112)
Line 2079: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2080:
Line 2081: #End ExternalSource
Line 2082:
Line 2083: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",112)
Line 2084: __ctrl.Value = "D72"
Line 2085:
Line 2086: #End ExternalSource
Line 2087:
Line 2088: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",112)
Line 2089: __ctrl.Text = "-72 Sarthe"
Line 2090:
Line 2091: #End ExternalSource
Line 2092: Return __ctrl
Line 2093: End Function
Line 2094:
Line 2095: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2096: Private Function __BuildControl__control82() As Global.System.Web.UI.WebControls.ListItem
Line 2097: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2098:
Line 2099: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",113)
Line 2100: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2101:
Line 2102: #End ExternalSource
Line 2103:
Line 2104: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",113)
Line 2105: __ctrl.Value = "D73"
Line 2106:
Line 2107: #End ExternalSource
Line 2108:
Line 2109: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",113)
Line 2110: __ctrl.Text = "-73 Savoie"
Line 2111:
Line 2112: #End ExternalSource
Line 2113: Return __ctrl
Line 2114: End Function
Line 2115:
Line 2116: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2117: Private Function __BuildControl__control83() As Global.System.Web.UI.WebControls.ListItem
Line 2118: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2119:
Line 2120: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",114)
Line 2121: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2122:
Line 2123: #End ExternalSource
Line 2124:
Line 2125: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",114)
Line 2126: __ctrl.Value = "D74"
Line 2127:
Line 2128: #End ExternalSource
Line 2129:
Line 2130: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",114)
Line 2131: __ctrl.Text = "-74 Haute-Savoie"
Line 2132:
Line 2133: #End ExternalSource
Line 2134: Return __ctrl
Line 2135: End Function
Line 2136:
Line 2137: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2138: Private Function __BuildControl__control84() As Global.System.Web.UI.WebControls.ListItem
Line 2139: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2140:
Line 2141: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",115)
Line 2142: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2143:
Line 2144: #End ExternalSource
Line 2145:
Line 2146: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",115)
Line 2147: __ctrl.Value = "D75"
Line 2148:
Line 2149: #End ExternalSource
Line 2150:
Line 2151: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",115)
Line 2152: __ctrl.Text = "-75 Paris"
Line 2153:
Line 2154: #End ExternalSource
Line 2155: Return __ctrl
Line 2156: End Function
Line 2157:
Line 2158: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2159: Private Function __BuildControl__control85() As Global.System.Web.UI.WebControls.ListItem
Line 2160: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2161:
Line 2162: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",116)
Line 2163: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2164:
Line 2165: #End ExternalSource
Line 2166:
Line 2167: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",116)
Line 2168: __ctrl.Value = "D76"
Line 2169:
Line 2170: #End ExternalSource
Line 2171:
Line 2172: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",116)
Line 2173: __ctrl.Text = "-76 Seine-Maritime"
Line 2174:
Line 2175: #End ExternalSource
Line 2176: Return __ctrl
Line 2177: End Function
Line 2178:
Line 2179: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2180: Private Function __BuildControl__control86() As Global.System.Web.UI.WebControls.ListItem
Line 2181: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2182:
Line 2183: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",117)
Line 2184: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2185:
Line 2186: #End ExternalSource
Line 2187:
Line 2188: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",117)
Line 2189: __ctrl.Value = "D77"
Line 2190:
Line 2191: #End ExternalSource
Line 2192:
Line 2193: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",117)
Line 2194: __ctrl.Text = "-77 Seine-et-Marne"
Line 2195:
Line 2196: #End ExternalSource
Line 2197: Return __ctrl
Line 2198: End Function
Line 2199:
Line 2200: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2201: Private Function __BuildControl__control87() As Global.System.Web.UI.WebControls.ListItem
Line 2202: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2203:
Line 2204: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",118)
Line 2205: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2206:
Line 2207: #End ExternalSource
Line 2208:
Line 2209: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",118)
Line 2210: __ctrl.Value = "D78"
Line 2211:
Line 2212: #End ExternalSource
Line 2213:
Line 2214: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",118)
Line 2215: __ctrl.Text = "-78 Yvelines"
Line 2216:
Line 2217: #End ExternalSource
Line 2218: Return __ctrl
Line 2219: End Function
Line 2220:
Line 2221: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2222: Private Function __BuildControl__control88() As Global.System.Web.UI.WebControls.ListItem
Line 2223: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2224:
Line 2225: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",119)
Line 2226: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2227:
Line 2228: #End ExternalSource
Line 2229:
Line 2230: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",119)
Line 2231: __ctrl.Value = "D79"
Line 2232:
Line 2233: #End ExternalSource
Line 2234:
Line 2235: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",119)
Line 2236: __ctrl.Text = "-79 Deux-Sèvres"
Line 2237:
Line 2238: #End ExternalSource
Line 2239: Return __ctrl
Line 2240: End Function
Line 2241:
Line 2242: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 2243: Private Function __BuildControl__control89() As Global.System.Web.UI.WebControls.ListItem
Line 2244: Dim __ctrl As Global.System.Web.UI.WebControls.ListItem
Line 2245:
Line 2246: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",120)
Line 2247: __ctrl = New Global.System.Web.UI.WebControls.ListItem
Line 2248:
Line 2249: #End ExternalSource
Line 2250:
Line 2251: #ExternalSource("E:\Inetpub\nt6673\website\Formulaires\Acheter2.aspx",120)
Line 2252: __ctrl.Value = "D80"
Line 2253: |