This commit is contained in:
2019-11-06 16:31:56 +01:00
parent e2c05a5ea3
commit d4dfcd1744
46 changed files with 3412 additions and 678 deletions

View File

@@ -113,13 +113,33 @@ Partial Class frmProgDetails
Me.Button22 = New System.Windows.Forms.Button()
Me.Button23 = New System.Windows.Forms.Button()
Me.Label24 = New System.Windows.Forms.Label()
Me.txtInstallProdPfadNKD = New System.Windows.Forms.TextBox()
Me.txtInstallProdPfadUNI = New System.Windows.Forms.TextBox()
Me.Button24 = New System.Windows.Forms.Button()
Me.Button25 = New System.Windows.Forms.Button()
Me.Label25 = New System.Windows.Forms.Label()
Me.txtInstallProdPfadNEU = New System.Windows.Forms.TextBox()
Me.txtInstallProdPfadAMB = New System.Windows.Forms.TextBox()
Me.Button26 = New System.Windows.Forms.Button()
Me.cbxZip = New System.Windows.Forms.CheckBox()
Me.cbxStandorttxtErstellenAMB = New System.Windows.Forms.CheckBox()
Me.Button27 = New System.Windows.Forms.Button()
Me.Label26 = New System.Windows.Forms.Label()
Me.txtProdPfadAMB = New System.Windows.Forms.TextBox()
Me.Button28 = New System.Windows.Forms.Button()
Me.cbxStandorttxtErstellenUNI = New System.Windows.Forms.CheckBox()
Me.Button29 = New System.Windows.Forms.Button()
Me.Label27 = New System.Windows.Forms.Label()
Me.txtProdPfadUNI = New System.Windows.Forms.TextBox()
Me.Button30 = New System.Windows.Forms.Button()
Me.Button31 = New System.Windows.Forms.Button()
Me.txtInstallProdPfadNEU = New System.Windows.Forms.TextBox()
Me.Button32 = New System.Windows.Forms.Button()
Me.Button33 = New System.Windows.Forms.Button()
Me.txtInstallProdPfadNKD = New System.Windows.Forms.TextBox()
Me.Button34 = New System.Windows.Forms.Button()
Me.Label28 = New System.Windows.Forms.Label()
Me.Label29 = New System.Windows.Forms.Label()
Me.Button35 = New System.Windows.Forms.Button()
Me.cbxIncrementalCopy = New System.Windows.Forms.CheckBox()
CType(Me.picIcon, System.ComponentModel.ISupportInitialize).BeginInit()
Me.grpName.SuspendLayout()
Me.SuspendLayout()
@@ -137,7 +157,7 @@ Partial Class frmProgDetails
'btnProdCopy
'
Me.btnProdCopy.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnProdCopy.Location = New System.Drawing.Point(487, 188)
Me.btnProdCopy.Location = New System.Drawing.Point(509, 188)
Me.btnProdCopy.Name = "btnProdCopy"
Me.btnProdCopy.Size = New System.Drawing.Size(100, 24)
Me.btnProdCopy.TabIndex = 41
@@ -147,7 +167,7 @@ Partial Class frmProgDetails
'btnDevCopy
'
Me.btnDevCopy.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnDevCopy.Location = New System.Drawing.Point(487, 161)
Me.btnDevCopy.Location = New System.Drawing.Point(509, 161)
Me.btnDevCopy.Name = "btnDevCopy"
Me.btnDevCopy.Size = New System.Drawing.Size(100, 24)
Me.btnDevCopy.TabIndex = 40
@@ -211,7 +231,7 @@ Partial Class frmProgDetails
'
'txtDevPfad
'
Me.txtDevPfad.Location = New System.Drawing.Point(110, 164)
Me.txtDevPfad.Location = New System.Drawing.Point(132, 164)
Me.txtDevPfad.Name = "txtDevPfad"
Me.txtDevPfad.Size = New System.Drawing.Size(289, 20)
Me.txtDevPfad.TabIndex = 44
@@ -236,7 +256,7 @@ Partial Class frmProgDetails
'
'txtProdPfad
'
Me.txtProdPfad.Location = New System.Drawing.Point(110, 190)
Me.txtProdPfad.Location = New System.Drawing.Point(132, 190)
Me.txtProdPfad.Name = "txtProdPfad"
Me.txtProdPfad.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfad.TabIndex = 46
@@ -244,7 +264,7 @@ Partial Class frmProgDetails
'btnDevAkt
'
Me.btnDevAkt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnDevAkt.Location = New System.Drawing.Point(405, 162)
Me.btnDevAkt.Location = New System.Drawing.Point(427, 162)
Me.btnDevAkt.Name = "btnDevAkt"
Me.btnDevAkt.Size = New System.Drawing.Size(76, 24)
Me.btnDevAkt.TabIndex = 48
@@ -254,7 +274,7 @@ Partial Class frmProgDetails
'btnProdAkt
'
Me.btnProdAkt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnProdAkt.Location = New System.Drawing.Point(405, 188)
Me.btnProdAkt.Location = New System.Drawing.Point(427, 188)
Me.btnProdAkt.Name = "btnProdAkt"
Me.btnProdAkt.Size = New System.Drawing.Size(76, 24)
Me.btnProdAkt.TabIndex = 49
@@ -264,7 +284,7 @@ Partial Class frmProgDetails
'btnSourceAkt
'
Me.btnSourceAkt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSourceAkt.Location = New System.Drawing.Point(405, 125)
Me.btnSourceAkt.Location = New System.Drawing.Point(427, 125)
Me.btnSourceAkt.Name = "btnSourceAkt"
Me.btnSourceAkt.Size = New System.Drawing.Size(76, 24)
Me.btnSourceAkt.TabIndex = 53
@@ -282,7 +302,7 @@ Partial Class frmProgDetails
'
'txtSourcePfad
'
Me.txtSourcePfad.Location = New System.Drawing.Point(110, 127)
Me.txtSourcePfad.Location = New System.Drawing.Point(132, 127)
Me.txtSourcePfad.Name = "txtSourcePfad"
Me.txtSourcePfad.Size = New System.Drawing.Size(289, 20)
Me.txtSourcePfad.TabIndex = 51
@@ -301,7 +321,7 @@ Partial Class frmProgDetails
'
Me.Label7.AutoSize = True
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label7.Location = New System.Drawing.Point(20, 407)
Me.Label7.Location = New System.Drawing.Point(20, 435)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(79, 13)
Me.Label7.TabIndex = 67
@@ -310,7 +330,7 @@ Partial Class frmProgDetails
'btnInstallSourceAkt
'
Me.btnInstallSourceAkt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnInstallSourceAkt.Location = New System.Drawing.Point(405, 421)
Me.btnInstallSourceAkt.Location = New System.Drawing.Point(427, 449)
Me.btnInstallSourceAkt.Name = "btnInstallSourceAkt"
Me.btnInstallSourceAkt.Size = New System.Drawing.Size(76, 24)
Me.btnInstallSourceAkt.TabIndex = 66
@@ -320,7 +340,7 @@ Partial Class frmProgDetails
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(20, 426)
Me.Label8.Location = New System.Drawing.Point(20, 454)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(69, 13)
Me.Label8.TabIndex = 65
@@ -328,7 +348,7 @@ Partial Class frmProgDetails
'
'txtInstallSourcePfad
'
Me.txtInstallSourcePfad.Location = New System.Drawing.Point(110, 423)
Me.txtInstallSourcePfad.Location = New System.Drawing.Point(132, 451)
Me.txtInstallSourcePfad.Name = "txtInstallSourcePfad"
Me.txtInstallSourcePfad.Size = New System.Drawing.Size(289, 20)
Me.txtInstallSourcePfad.TabIndex = 64
@@ -336,7 +356,7 @@ Partial Class frmProgDetails
'btnInstallProdAkt
'
Me.btnInstallProdAkt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnInstallProdAkt.Location = New System.Drawing.Point(405, 484)
Me.btnInstallProdAkt.Location = New System.Drawing.Point(427, 512)
Me.btnInstallProdAkt.Name = "btnInstallProdAkt"
Me.btnInstallProdAkt.Size = New System.Drawing.Size(76, 24)
Me.btnInstallProdAkt.TabIndex = 62
@@ -346,7 +366,7 @@ Partial Class frmProgDetails
'btnInstallDevAkt
'
Me.btnInstallDevAkt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnInstallDevAkt.Location = New System.Drawing.Point(405, 458)
Me.btnInstallDevAkt.Location = New System.Drawing.Point(427, 486)
Me.btnInstallDevAkt.Name = "btnInstallDevAkt"
Me.btnInstallDevAkt.Size = New System.Drawing.Size(76, 24)
Me.btnInstallDevAkt.TabIndex = 61
@@ -356,7 +376,7 @@ Partial Class frmProgDetails
'Label9
'
Me.Label9.AutoSize = True
Me.Label9.Location = New System.Drawing.Point(20, 489)
Me.Label9.Location = New System.Drawing.Point(20, 517)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(80, 13)
Me.Label9.TabIndex = 60
@@ -364,7 +384,7 @@ Partial Class frmProgDetails
'
'txtInstallProdPfad
'
Me.txtInstallProdPfad.Location = New System.Drawing.Point(110, 486)
Me.txtInstallProdPfad.Location = New System.Drawing.Point(132, 514)
Me.txtInstallProdPfad.Name = "txtInstallProdPfad"
Me.txtInstallProdPfad.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfad.TabIndex = 59
@@ -372,7 +392,7 @@ Partial Class frmProgDetails
'Label11
'
Me.Label11.AutoSize = True
Me.Label11.Location = New System.Drawing.Point(20, 463)
Me.Label11.Location = New System.Drawing.Point(20, 491)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(84, 13)
Me.Label11.TabIndex = 58
@@ -380,7 +400,7 @@ Partial Class frmProgDetails
'
'txtInstallDevPfad
'
Me.txtInstallDevPfad.Location = New System.Drawing.Point(110, 460)
Me.txtInstallDevPfad.Location = New System.Drawing.Point(132, 488)
Me.txtInstallDevPfad.Name = "txtInstallDevPfad"
Me.txtInstallDevPfad.Size = New System.Drawing.Size(289, 20)
Me.txtInstallDevPfad.TabIndex = 57
@@ -388,7 +408,7 @@ Partial Class frmProgDetails
'btnInstallProdCopy
'
Me.btnInstallProdCopy.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnInstallProdCopy.Location = New System.Drawing.Point(487, 484)
Me.btnInstallProdCopy.Location = New System.Drawing.Point(509, 512)
Me.btnInstallProdCopy.Name = "btnInstallProdCopy"
Me.btnInstallProdCopy.Size = New System.Drawing.Size(100, 24)
Me.btnInstallProdCopy.TabIndex = 56
@@ -398,7 +418,7 @@ Partial Class frmProgDetails
'btnInstallDevCopy
'
Me.btnInstallDevCopy.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnInstallDevCopy.Location = New System.Drawing.Point(487, 457)
Me.btnInstallDevCopy.Location = New System.Drawing.Point(509, 485)
Me.btnInstallDevCopy.Name = "btnInstallDevCopy"
Me.btnInstallDevCopy.Size = New System.Drawing.Size(100, 24)
Me.btnInstallDevCopy.TabIndex = 55
@@ -408,7 +428,7 @@ Partial Class frmProgDetails
'btnInsert
'
Me.btnInsert.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnInsert.Location = New System.Drawing.Point(510, 786)
Me.btnInsert.Location = New System.Drawing.Point(532, 854)
Me.btnInsert.Name = "btnInsert"
Me.btnInsert.Size = New System.Drawing.Size(77, 24)
Me.btnInsert.TabIndex = 68
@@ -419,7 +439,7 @@ Partial Class frmProgDetails
'Label12
'
Me.Label12.AutoSize = True
Me.Label12.Location = New System.Drawing.Point(18, 712)
Me.Label12.Location = New System.Drawing.Point(20, 783)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(28, 13)
Me.Label12.TabIndex = 70
@@ -427,7 +447,7 @@ Partial Class frmProgDetails
'
'txtInfo
'
Me.txtInfo.Location = New System.Drawing.Point(110, 712)
Me.txtInfo.Location = New System.Drawing.Point(132, 780)
Me.txtInfo.Multiline = True
Me.txtInfo.Name = "txtInfo"
Me.txtInfo.Size = New System.Drawing.Size(477, 68)
@@ -436,7 +456,7 @@ Partial Class frmProgDetails
'btnAktInfo
'
Me.btnAktInfo.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAktInfo.Location = New System.Drawing.Point(110, 786)
Me.btnAktInfo.Location = New System.Drawing.Point(132, 854)
Me.btnAktInfo.Name = "btnAktInfo"
Me.btnAktInfo.Size = New System.Drawing.Size(76, 24)
Me.btnAktInfo.TabIndex = 72
@@ -491,7 +511,7 @@ Partial Class frmProgDetails
'Button1
'
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Location = New System.Drawing.Point(405, 213)
Me.Button1.Location = New System.Drawing.Point(427, 213)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(76, 24)
Me.Button1.TabIndex = 78
@@ -509,7 +529,7 @@ Partial Class frmProgDetails
'
'txtProdPfadAtilla
'
Me.txtProdPfadAtilla.Location = New System.Drawing.Point(110, 216)
Me.txtProdPfadAtilla.Location = New System.Drawing.Point(132, 216)
Me.txtProdPfadAtilla.Name = "txtProdPfadAtilla"
Me.txtProdPfadAtilla.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadAtilla.TabIndex = 76
@@ -517,7 +537,7 @@ Partial Class frmProgDetails
'Button2
'
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button2.Location = New System.Drawing.Point(487, 213)
Me.Button2.Location = New System.Drawing.Point(509, 213)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(100, 24)
Me.Button2.TabIndex = 75
@@ -527,7 +547,7 @@ Partial Class frmProgDetails
'Button3
'
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button3.Location = New System.Drawing.Point(405, 510)
Me.Button3.Location = New System.Drawing.Point(427, 538)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(76, 24)
Me.Button3.TabIndex = 82
@@ -537,7 +557,7 @@ Partial Class frmProgDetails
'Label15
'
Me.Label15.AutoSize = True
Me.Label15.Location = New System.Drawing.Point(20, 515)
Me.Label15.Location = New System.Drawing.Point(20, 543)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(80, 13)
Me.Label15.TabIndex = 81
@@ -545,7 +565,7 @@ Partial Class frmProgDetails
'
'txtInstallProdPfadAtilla
'
Me.txtInstallProdPfadAtilla.Location = New System.Drawing.Point(110, 512)
Me.txtInstallProdPfadAtilla.Location = New System.Drawing.Point(132, 540)
Me.txtInstallProdPfadAtilla.Name = "txtInstallProdPfadAtilla"
Me.txtInstallProdPfadAtilla.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadAtilla.TabIndex = 80
@@ -553,7 +573,7 @@ Partial Class frmProgDetails
'Button4
'
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button4.Location = New System.Drawing.Point(487, 510)
Me.Button4.Location = New System.Drawing.Point(509, 538)
Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(100, 24)
Me.Button4.TabIndex = 79
@@ -565,7 +585,7 @@ Partial Class frmProgDetails
Me.cbxStandorttxtErstellen.AutoSize = True
Me.cbxStandorttxtErstellen.Checked = True
Me.cbxStandorttxtErstellen.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellen.Location = New System.Drawing.Point(593, 219)
Me.cbxStandorttxtErstellen.Location = New System.Drawing.Point(615, 219)
Me.cbxStandorttxtErstellen.Name = "cbxStandorttxtErstellen"
Me.cbxStandorttxtErstellen.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellen.TabIndex = 83
@@ -577,7 +597,7 @@ Partial Class frmProgDetails
Me.cbxStandorttxtErstellenImex.AutoSize = True
Me.cbxStandorttxtErstellenImex.Checked = True
Me.cbxStandorttxtErstellenImex.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellenImex.Location = New System.Drawing.Point(593, 245)
Me.cbxStandorttxtErstellenImex.Location = New System.Drawing.Point(615, 245)
Me.cbxStandorttxtErstellenImex.Name = "cbxStandorttxtErstellenImex"
Me.cbxStandorttxtErstellenImex.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellenImex.TabIndex = 88
@@ -587,7 +607,7 @@ Partial Class frmProgDetails
'Button5
'
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button5.Location = New System.Drawing.Point(405, 239)
Me.Button5.Location = New System.Drawing.Point(427, 239)
Me.Button5.Name = "Button5"
Me.Button5.Size = New System.Drawing.Size(76, 24)
Me.Button5.TabIndex = 87
@@ -605,7 +625,7 @@ Partial Class frmProgDetails
'
'txtProdPfadImex
'
Me.txtProdPfadImex.Location = New System.Drawing.Point(110, 242)
Me.txtProdPfadImex.Location = New System.Drawing.Point(132, 242)
Me.txtProdPfadImex.Name = "txtProdPfadImex"
Me.txtProdPfadImex.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadImex.TabIndex = 85
@@ -613,7 +633,7 @@ Partial Class frmProgDetails
'Button6
'
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button6.Location = New System.Drawing.Point(487, 239)
Me.Button6.Location = New System.Drawing.Point(509, 239)
Me.Button6.Name = "Button6"
Me.Button6.Size = New System.Drawing.Size(100, 24)
Me.Button6.TabIndex = 84
@@ -623,7 +643,7 @@ Partial Class frmProgDetails
'Button7
'
Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button7.Location = New System.Drawing.Point(405, 536)
Me.Button7.Location = New System.Drawing.Point(427, 564)
Me.Button7.Name = "Button7"
Me.Button7.Size = New System.Drawing.Size(76, 24)
Me.Button7.TabIndex = 92
@@ -633,7 +653,7 @@ Partial Class frmProgDetails
'Label17
'
Me.Label17.AutoSize = True
Me.Label17.Location = New System.Drawing.Point(20, 541)
Me.Label17.Location = New System.Drawing.Point(20, 569)
Me.Label17.Name = "Label17"
Me.Label17.Size = New System.Drawing.Size(84, 13)
Me.Label17.TabIndex = 91
@@ -641,7 +661,7 @@ Partial Class frmProgDetails
'
'txtInstallProdPfadimex
'
Me.txtInstallProdPfadimex.Location = New System.Drawing.Point(110, 538)
Me.txtInstallProdPfadimex.Location = New System.Drawing.Point(132, 566)
Me.txtInstallProdPfadimex.Name = "txtInstallProdPfadimex"
Me.txtInstallProdPfadimex.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadimex.TabIndex = 90
@@ -649,7 +669,7 @@ Partial Class frmProgDetails
'Button8
'
Me.Button8.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button8.Location = New System.Drawing.Point(487, 536)
Me.Button8.Location = New System.Drawing.Point(509, 564)
Me.Button8.Name = "Button8"
Me.Button8.Size = New System.Drawing.Size(100, 24)
Me.Button8.TabIndex = 89
@@ -659,7 +679,7 @@ Partial Class frmProgDetails
'Button9
'
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button9.Location = New System.Drawing.Point(405, 562)
Me.Button9.Location = New System.Drawing.Point(427, 590)
Me.Button9.Name = "Button9"
Me.Button9.Size = New System.Drawing.Size(76, 24)
Me.Button9.TabIndex = 96
@@ -669,7 +689,7 @@ Partial Class frmProgDetails
'Label18
'
Me.Label18.AutoSize = True
Me.Label18.Location = New System.Drawing.Point(20, 567)
Me.Label18.Location = New System.Drawing.Point(20, 595)
Me.Label18.Name = "Label18"
Me.Label18.Size = New System.Drawing.Size(80, 13)
Me.Label18.TabIndex = 95
@@ -677,7 +697,7 @@ Partial Class frmProgDetails
'
'txtInstallProdPfadSBG
'
Me.txtInstallProdPfadSBG.Location = New System.Drawing.Point(110, 564)
Me.txtInstallProdPfadSBG.Location = New System.Drawing.Point(132, 592)
Me.txtInstallProdPfadSBG.Name = "txtInstallProdPfadSBG"
Me.txtInstallProdPfadSBG.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadSBG.TabIndex = 94
@@ -685,7 +705,7 @@ Partial Class frmProgDetails
'Button10
'
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button10.Location = New System.Drawing.Point(487, 562)
Me.Button10.Location = New System.Drawing.Point(509, 590)
Me.Button10.Name = "Button10"
Me.Button10.Size = New System.Drawing.Size(100, 24)
Me.Button10.TabIndex = 93
@@ -697,7 +717,7 @@ Partial Class frmProgDetails
Me.cbxStandorttxtErstellenSBG.AutoSize = True
Me.cbxStandorttxtErstellenSBG.Checked = True
Me.cbxStandorttxtErstellenSBG.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellenSBG.Location = New System.Drawing.Point(593, 271)
Me.cbxStandorttxtErstellenSBG.Location = New System.Drawing.Point(615, 271)
Me.cbxStandorttxtErstellenSBG.Name = "cbxStandorttxtErstellenSBG"
Me.cbxStandorttxtErstellenSBG.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellenSBG.TabIndex = 101
@@ -707,7 +727,7 @@ Partial Class frmProgDetails
'Button11
'
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button11.Location = New System.Drawing.Point(405, 265)
Me.Button11.Location = New System.Drawing.Point(427, 265)
Me.Button11.Name = "Button11"
Me.Button11.Size = New System.Drawing.Size(76, 24)
Me.Button11.TabIndex = 100
@@ -725,7 +745,7 @@ Partial Class frmProgDetails
'
'txtProdPfadSBG
'
Me.txtProdPfadSBG.Location = New System.Drawing.Point(110, 268)
Me.txtProdPfadSBG.Location = New System.Drawing.Point(132, 268)
Me.txtProdPfadSBG.Name = "txtProdPfadSBG"
Me.txtProdPfadSBG.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadSBG.TabIndex = 98
@@ -733,7 +753,7 @@ Partial Class frmProgDetails
'Button12
'
Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button12.Location = New System.Drawing.Point(487, 265)
Me.Button12.Location = New System.Drawing.Point(509, 265)
Me.Button12.Name = "Button12"
Me.Button12.Size = New System.Drawing.Size(100, 24)
Me.Button12.TabIndex = 97
@@ -745,7 +765,7 @@ Partial Class frmProgDetails
Me.Button13.BackColor = System.Drawing.Color.SteelBlue
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button13.ForeColor = System.Drawing.Color.White
Me.Button13.Location = New System.Drawing.Point(487, 125)
Me.Button13.Location = New System.Drawing.Point(509, 125)
Me.Button13.Name = "Button13"
Me.Button13.Size = New System.Drawing.Size(100, 24)
Me.Button13.TabIndex = 102
@@ -757,7 +777,7 @@ Partial Class frmProgDetails
Me.Button14.BackColor = System.Drawing.Color.SteelBlue
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button14.ForeColor = System.Drawing.Color.White
Me.Button14.Location = New System.Drawing.Point(487, 421)
Me.Button14.Location = New System.Drawing.Point(509, 449)
Me.Button14.Name = "Button14"
Me.Button14.Size = New System.Drawing.Size(100, 24)
Me.Button14.TabIndex = 103
@@ -769,7 +789,7 @@ Partial Class frmProgDetails
Me.cbxStandorttxtErstellenWAI.AutoSize = True
Me.cbxStandorttxtErstellenWAI.Checked = True
Me.cbxStandorttxtErstellenWAI.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellenWAI.Location = New System.Drawing.Point(593, 297)
Me.cbxStandorttxtErstellenWAI.Location = New System.Drawing.Point(615, 297)
Me.cbxStandorttxtErstellenWAI.Name = "cbxStandorttxtErstellenWAI"
Me.cbxStandorttxtErstellenWAI.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellenWAI.TabIndex = 108
@@ -779,7 +799,7 @@ Partial Class frmProgDetails
'Button15
'
Me.Button15.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button15.Location = New System.Drawing.Point(405, 291)
Me.Button15.Location = New System.Drawing.Point(427, 291)
Me.Button15.Name = "Button15"
Me.Button15.Size = New System.Drawing.Size(76, 24)
Me.Button15.TabIndex = 107
@@ -797,7 +817,7 @@ Partial Class frmProgDetails
'
'txtProdPfadWAI
'
Me.txtProdPfadWAI.Location = New System.Drawing.Point(110, 294)
Me.txtProdPfadWAI.Location = New System.Drawing.Point(132, 294)
Me.txtProdPfadWAI.Name = "txtProdPfadWAI"
Me.txtProdPfadWAI.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadWAI.TabIndex = 105
@@ -805,7 +825,7 @@ Partial Class frmProgDetails
'Button16
'
Me.Button16.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button16.Location = New System.Drawing.Point(487, 291)
Me.Button16.Location = New System.Drawing.Point(509, 291)
Me.Button16.Name = "Button16"
Me.Button16.Size = New System.Drawing.Size(100, 24)
Me.Button16.TabIndex = 104
@@ -817,7 +837,7 @@ Partial Class frmProgDetails
Me.cbxStandorttxtErstellenNKD.AutoSize = True
Me.cbxStandorttxtErstellenNKD.Checked = True
Me.cbxStandorttxtErstellenNKD.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellenNKD.Location = New System.Drawing.Point(593, 323)
Me.cbxStandorttxtErstellenNKD.Location = New System.Drawing.Point(615, 323)
Me.cbxStandorttxtErstellenNKD.Name = "cbxStandorttxtErstellenNKD"
Me.cbxStandorttxtErstellenNKD.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellenNKD.TabIndex = 113
@@ -827,7 +847,7 @@ Partial Class frmProgDetails
'Button17
'
Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button17.Location = New System.Drawing.Point(405, 317)
Me.Button17.Location = New System.Drawing.Point(427, 317)
Me.Button17.Name = "Button17"
Me.Button17.Size = New System.Drawing.Size(76, 24)
Me.Button17.TabIndex = 112
@@ -845,7 +865,7 @@ Partial Class frmProgDetails
'
'txtProdPfadNKD
'
Me.txtProdPfadNKD.Location = New System.Drawing.Point(110, 320)
Me.txtProdPfadNKD.Location = New System.Drawing.Point(132, 320)
Me.txtProdPfadNKD.Name = "txtProdPfadNKD"
Me.txtProdPfadNKD.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadNKD.TabIndex = 110
@@ -853,7 +873,7 @@ Partial Class frmProgDetails
'Button18
'
Me.Button18.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button18.Location = New System.Drawing.Point(487, 317)
Me.Button18.Location = New System.Drawing.Point(509, 317)
Me.Button18.Name = "Button18"
Me.Button18.Size = New System.Drawing.Size(100, 24)
Me.Button18.TabIndex = 109
@@ -865,7 +885,7 @@ Partial Class frmProgDetails
Me.cbxStandorttxtErstellenNEU.AutoSize = True
Me.cbxStandorttxtErstellenNEU.Checked = True
Me.cbxStandorttxtErstellenNEU.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellenNEU.Location = New System.Drawing.Point(593, 349)
Me.cbxStandorttxtErstellenNEU.Location = New System.Drawing.Point(615, 349)
Me.cbxStandorttxtErstellenNEU.Name = "cbxStandorttxtErstellenNEU"
Me.cbxStandorttxtErstellenNEU.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellenNEU.TabIndex = 118
@@ -875,7 +895,7 @@ Partial Class frmProgDetails
'Button19
'
Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button19.Location = New System.Drawing.Point(405, 343)
Me.Button19.Location = New System.Drawing.Point(427, 343)
Me.Button19.Name = "Button19"
Me.Button19.Size = New System.Drawing.Size(76, 24)
Me.Button19.TabIndex = 117
@@ -893,7 +913,7 @@ Partial Class frmProgDetails
'
'txtProdPfadNEU
'
Me.txtProdPfadNEU.Location = New System.Drawing.Point(110, 346)
Me.txtProdPfadNEU.Location = New System.Drawing.Point(132, 346)
Me.txtProdPfadNEU.Name = "txtProdPfadNEU"
Me.txtProdPfadNEU.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadNEU.TabIndex = 115
@@ -901,7 +921,7 @@ Partial Class frmProgDetails
'Button20
'
Me.Button20.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button20.Location = New System.Drawing.Point(487, 343)
Me.Button20.Location = New System.Drawing.Point(509, 343)
Me.Button20.Name = "Button20"
Me.Button20.Size = New System.Drawing.Size(100, 24)
Me.Button20.TabIndex = 114
@@ -911,7 +931,7 @@ Partial Class frmProgDetails
'Button21
'
Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button21.Location = New System.Drawing.Point(405, 588)
Me.Button21.Location = New System.Drawing.Point(427, 616)
Me.Button21.Name = "Button21"
Me.Button21.Size = New System.Drawing.Size(76, 24)
Me.Button21.TabIndex = 122
@@ -921,7 +941,7 @@ Partial Class frmProgDetails
'Label23
'
Me.Label23.AutoSize = True
Me.Label23.Location = New System.Drawing.Point(20, 593)
Me.Label23.Location = New System.Drawing.Point(20, 621)
Me.Label23.Name = "Label23"
Me.Label23.Size = New System.Drawing.Size(79, 13)
Me.Label23.TabIndex = 121
@@ -929,7 +949,7 @@ Partial Class frmProgDetails
'
'txtInstallProdPfadWAI
'
Me.txtInstallProdPfadWAI.Location = New System.Drawing.Point(110, 590)
Me.txtInstallProdPfadWAI.Location = New System.Drawing.Point(132, 618)
Me.txtInstallProdPfadWAI.Name = "txtInstallProdPfadWAI"
Me.txtInstallProdPfadWAI.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadWAI.TabIndex = 120
@@ -937,7 +957,7 @@ Partial Class frmProgDetails
'Button22
'
Me.Button22.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button22.Location = New System.Drawing.Point(487, 588)
Me.Button22.Location = New System.Drawing.Point(509, 616)
Me.Button22.Name = "Button22"
Me.Button22.Size = New System.Drawing.Size(100, 24)
Me.Button22.TabIndex = 119
@@ -947,7 +967,7 @@ Partial Class frmProgDetails
'Button23
'
Me.Button23.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button23.Location = New System.Drawing.Point(405, 614)
Me.Button23.Location = New System.Drawing.Point(427, 695)
Me.Button23.Name = "Button23"
Me.Button23.Size = New System.Drawing.Size(76, 24)
Me.Button23.TabIndex = 126
@@ -957,23 +977,23 @@ Partial Class frmProgDetails
'Label24
'
Me.Label24.AutoSize = True
Me.Label24.Location = New System.Drawing.Point(20, 619)
Me.Label24.Location = New System.Drawing.Point(20, 647)
Me.Label24.Name = "Label24"
Me.Label24.Size = New System.Drawing.Size(81, 13)
Me.Label24.TabIndex = 125
Me.Label24.Text = "Produktiv-NKD:"
'
'txtInstallProdPfadNKD
'txtInstallProdPfadUNI
'
Me.txtInstallProdPfadNKD.Location = New System.Drawing.Point(110, 616)
Me.txtInstallProdPfadNKD.Name = "txtInstallProdPfadNKD"
Me.txtInstallProdPfadNKD.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadNKD.TabIndex = 124
Me.txtInstallProdPfadUNI.Location = New System.Drawing.Point(132, 697)
Me.txtInstallProdPfadUNI.Name = "txtInstallProdPfadUNI"
Me.txtInstallProdPfadUNI.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadUNI.TabIndex = 124
'
'Button24
'
Me.Button24.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button24.Location = New System.Drawing.Point(487, 614)
Me.Button24.Location = New System.Drawing.Point(509, 695)
Me.Button24.Name = "Button24"
Me.Button24.Size = New System.Drawing.Size(100, 24)
Me.Button24.TabIndex = 123
@@ -983,7 +1003,7 @@ Partial Class frmProgDetails
'Button25
'
Me.Button25.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button25.Location = New System.Drawing.Point(405, 640)
Me.Button25.Location = New System.Drawing.Point(427, 721)
Me.Button25.Name = "Button25"
Me.Button25.Size = New System.Drawing.Size(76, 24)
Me.Button25.TabIndex = 130
@@ -993,23 +1013,23 @@ Partial Class frmProgDetails
'Label25
'
Me.Label25.AutoSize = True
Me.Label25.Location = New System.Drawing.Point(20, 645)
Me.Label25.Location = New System.Drawing.Point(20, 673)
Me.Label25.Name = "Label25"
Me.Label25.Size = New System.Drawing.Size(81, 13)
Me.Label25.TabIndex = 129
Me.Label25.Text = "Produktiv-NEU:"
'
'txtInstallProdPfadNEU
'txtInstallProdPfadAMB
'
Me.txtInstallProdPfadNEU.Location = New System.Drawing.Point(110, 642)
Me.txtInstallProdPfadNEU.Name = "txtInstallProdPfadNEU"
Me.txtInstallProdPfadNEU.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadNEU.TabIndex = 128
Me.txtInstallProdPfadAMB.Location = New System.Drawing.Point(132, 723)
Me.txtInstallProdPfadAMB.Name = "txtInstallProdPfadAMB"
Me.txtInstallProdPfadAMB.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadAMB.TabIndex = 128
'
'Button26
'
Me.Button26.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button26.Location = New System.Drawing.Point(487, 640)
Me.Button26.Location = New System.Drawing.Point(509, 721)
Me.Button26.Name = "Button26"
Me.Button26.Size = New System.Drawing.Size(100, 24)
Me.Button26.TabIndex = 127
@@ -1026,20 +1046,230 @@ Partial Class frmProgDetails
Me.cbxZip.Text = "ZIP Copy"
Me.cbxZip.UseVisualStyleBackColor = True
'
'cbxStandorttxtErstellenAMB
'
Me.cbxStandorttxtErstellenAMB.AutoSize = True
Me.cbxStandorttxtErstellenAMB.Checked = True
Me.cbxStandorttxtErstellenAMB.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellenAMB.Location = New System.Drawing.Point(615, 401)
Me.cbxStandorttxtErstellenAMB.Name = "cbxStandorttxtErstellenAMB"
Me.cbxStandorttxtErstellenAMB.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellenAMB.TabIndex = 141
Me.cbxStandorttxtErstellenAMB.Text = "'Standort.txt' erstellen"
Me.cbxStandorttxtErstellenAMB.UseVisualStyleBackColor = True
'
'Button27
'
Me.Button27.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button27.Location = New System.Drawing.Point(427, 395)
Me.Button27.Name = "Button27"
Me.Button27.Size = New System.Drawing.Size(76, 24)
Me.Button27.TabIndex = 140
Me.Button27.Text = "Aktualisieren"
Me.Button27.UseVisualStyleBackColor = True
'
'Label26
'
Me.Label26.AutoSize = True
Me.Label26.Location = New System.Drawing.Point(20, 401)
Me.Label26.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(96, 13)
Me.Label26.TabIndex = 139
Me.Label26.Text = "Produktiv-AMBAR:"
'
'txtProdPfadAMB
'
Me.txtProdPfadAMB.Location = New System.Drawing.Point(132, 398)
Me.txtProdPfadAMB.Name = "txtProdPfadAMB"
Me.txtProdPfadAMB.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadAMB.TabIndex = 138
'
'Button28
'
Me.Button28.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button28.Location = New System.Drawing.Point(509, 395)
Me.Button28.Name = "Button28"
Me.Button28.Size = New System.Drawing.Size(100, 24)
Me.Button28.TabIndex = 137
Me.Button28.Text = "PRODUKTIV->F"
Me.Button28.UseVisualStyleBackColor = True
'
'cbxStandorttxtErstellenUNI
'
Me.cbxStandorttxtErstellenUNI.AutoSize = True
Me.cbxStandorttxtErstellenUNI.Checked = True
Me.cbxStandorttxtErstellenUNI.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxStandorttxtErstellenUNI.Location = New System.Drawing.Point(615, 375)
Me.cbxStandorttxtErstellenUNI.Name = "cbxStandorttxtErstellenUNI"
Me.cbxStandorttxtErstellenUNI.Size = New System.Drawing.Size(126, 17)
Me.cbxStandorttxtErstellenUNI.TabIndex = 136
Me.cbxStandorttxtErstellenUNI.Text = "'Standort.txt' erstellen"
Me.cbxStandorttxtErstellenUNI.UseVisualStyleBackColor = True
'
'Button29
'
Me.Button29.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button29.Location = New System.Drawing.Point(427, 369)
Me.Button29.Name = "Button29"
Me.Button29.Size = New System.Drawing.Size(76, 24)
Me.Button29.TabIndex = 135
Me.Button29.Text = "Aktualisieren"
Me.Button29.UseVisualStyleBackColor = True
'
'Label27
'
Me.Label27.AutoSize = True
Me.Label27.Location = New System.Drawing.Point(20, 375)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(106, 13)
Me.Label27.TabIndex = 134
Me.Label27.Text = "Produktiv-UNISPED:"
'
'txtProdPfadUNI
'
Me.txtProdPfadUNI.Location = New System.Drawing.Point(132, 372)
Me.txtProdPfadUNI.Name = "txtProdPfadUNI"
Me.txtProdPfadUNI.Size = New System.Drawing.Size(289, 20)
Me.txtProdPfadUNI.TabIndex = 133
'
'Button30
'
Me.Button30.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button30.Location = New System.Drawing.Point(509, 369)
Me.Button30.Name = "Button30"
Me.Button30.Size = New System.Drawing.Size(100, 24)
Me.Button30.TabIndex = 132
Me.Button30.Text = "PRODUKTIV->F"
Me.Button30.UseVisualStyleBackColor = True
'
'Button31
'
Me.Button31.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button31.Location = New System.Drawing.Point(427, 668)
Me.Button31.Name = "Button31"
Me.Button31.Size = New System.Drawing.Size(76, 24)
Me.Button31.TabIndex = 147
Me.Button31.Text = "Aktualisieren"
Me.Button31.UseVisualStyleBackColor = True
'
'txtInstallProdPfadNEU
'
Me.txtInstallProdPfadNEU.Location = New System.Drawing.Point(132, 670)
Me.txtInstallProdPfadNEU.Name = "txtInstallProdPfadNEU"
Me.txtInstallProdPfadNEU.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadNEU.TabIndex = 146
'
'Button32
'
Me.Button32.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button32.Location = New System.Drawing.Point(509, 668)
Me.Button32.Name = "Button32"
Me.Button32.Size = New System.Drawing.Size(100, 24)
Me.Button32.TabIndex = 145
Me.Button32.Text = "PRODUKTIV->F"
Me.Button32.UseVisualStyleBackColor = True
'
'Button33
'
Me.Button33.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button33.Location = New System.Drawing.Point(427, 642)
Me.Button33.Name = "Button33"
Me.Button33.Size = New System.Drawing.Size(76, 24)
Me.Button33.TabIndex = 144
Me.Button33.Text = "Aktualisieren"
Me.Button33.UseVisualStyleBackColor = True
'
'txtInstallProdPfadNKD
'
Me.txtInstallProdPfadNKD.Location = New System.Drawing.Point(132, 644)
Me.txtInstallProdPfadNKD.Name = "txtInstallProdPfadNKD"
Me.txtInstallProdPfadNKD.Size = New System.Drawing.Size(289, 20)
Me.txtInstallProdPfadNKD.TabIndex = 143
'
'Button34
'
Me.Button34.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button34.Location = New System.Drawing.Point(509, 642)
Me.Button34.Name = "Button34"
Me.Button34.Size = New System.Drawing.Size(100, 24)
Me.Button34.TabIndex = 142
Me.Button34.Text = "PRODUKTIV->F"
Me.Button34.UseVisualStyleBackColor = True
'
'Label28
'
Me.Label28.AutoSize = True
Me.Label28.Location = New System.Drawing.Point(20, 726)
Me.Label28.Name = "Label28"
Me.Label28.Size = New System.Drawing.Size(96, 13)
Me.Label28.TabIndex = 149
Me.Label28.Text = "Produktiv-AMBAR:"
'
'Label29
'
Me.Label29.AutoSize = True
Me.Label29.Location = New System.Drawing.Point(20, 700)
Me.Label29.Name = "Label29"
Me.Label29.Size = New System.Drawing.Size(106, 13)
Me.Label29.TabIndex = 148
Me.Label29.Text = "Produktiv-UNISPED:"
'
'Button35
'
Me.Button35.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button35.Location = New System.Drawing.Point(615, 125)
Me.Button35.Name = "Button35"
Me.Button35.Size = New System.Drawing.Size(126, 24)
Me.Button35.TabIndex = 150
Me.Button35.Text = "Update-Daten"
Me.Button35.UseVisualStyleBackColor = True
'
'cbxIncrementalCopy
'
Me.cbxIncrementalCopy.AutoSize = True
Me.cbxIncrementalCopy.Checked = True
Me.cbxIncrementalCopy.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxIncrementalCopy.Location = New System.Drawing.Point(487, 72)
Me.cbxIncrementalCopy.Name = "cbxIncrementalCopy"
Me.cbxIncrementalCopy.Size = New System.Drawing.Size(105, 17)
Me.cbxIncrementalCopy.TabIndex = 151
Me.cbxIncrementalCopy.Text = "IncrementalCopy"
Me.cbxIncrementalCopy.UseVisualStyleBackColor = True
'
'frmProgDetails
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.White
Me.ClientSize = New System.Drawing.Size(716, 824)
Me.ClientSize = New System.Drawing.Size(759, 903)
Me.Controls.Add(Me.cbxIncrementalCopy)
Me.Controls.Add(Me.Button35)
Me.Controls.Add(Me.Label28)
Me.Controls.Add(Me.Label29)
Me.Controls.Add(Me.Button31)
Me.Controls.Add(Me.txtInstallProdPfadNEU)
Me.Controls.Add(Me.Button32)
Me.Controls.Add(Me.Button33)
Me.Controls.Add(Me.txtInstallProdPfadNKD)
Me.Controls.Add(Me.Button34)
Me.Controls.Add(Me.cbxStandorttxtErstellenAMB)
Me.Controls.Add(Me.Button27)
Me.Controls.Add(Me.Label26)
Me.Controls.Add(Me.txtProdPfadAMB)
Me.Controls.Add(Me.Button28)
Me.Controls.Add(Me.cbxStandorttxtErstellenUNI)
Me.Controls.Add(Me.Button29)
Me.Controls.Add(Me.Label27)
Me.Controls.Add(Me.txtProdPfadUNI)
Me.Controls.Add(Me.Button30)
Me.Controls.Add(Me.cbxZip)
Me.Controls.Add(Me.Button25)
Me.Controls.Add(Me.Label25)
Me.Controls.Add(Me.txtInstallProdPfadNEU)
Me.Controls.Add(Me.txtInstallProdPfadAMB)
Me.Controls.Add(Me.Button26)
Me.Controls.Add(Me.Button23)
Me.Controls.Add(Me.Label24)
Me.Controls.Add(Me.txtInstallProdPfadNKD)
Me.Controls.Add(Me.txtInstallProdPfadUNI)
Me.Controls.Add(Me.Button24)
Me.Controls.Add(Me.Button21)
Me.Controls.Add(Me.Label23)
@@ -1226,11 +1456,31 @@ Partial Class frmProgDetails
Friend WithEvents Button22 As System.Windows.Forms.Button
Friend WithEvents Button23 As System.Windows.Forms.Button
Friend WithEvents Label24 As System.Windows.Forms.Label
Friend WithEvents txtInstallProdPfadNKD As System.Windows.Forms.TextBox
Friend WithEvents txtInstallProdPfadUNI As System.Windows.Forms.TextBox
Friend WithEvents Button24 As System.Windows.Forms.Button
Friend WithEvents Button25 As System.Windows.Forms.Button
Friend WithEvents Label25 As System.Windows.Forms.Label
Friend WithEvents txtInstallProdPfadNEU As System.Windows.Forms.TextBox
Friend WithEvents txtInstallProdPfadAMB As System.Windows.Forms.TextBox
Friend WithEvents Button26 As System.Windows.Forms.Button
Friend WithEvents cbxZip As CheckBox
Friend WithEvents cbxStandorttxtErstellenAMB As CheckBox
Friend WithEvents Button27 As Button
Friend WithEvents Label26 As Label
Friend WithEvents txtProdPfadAMB As TextBox
Friend WithEvents Button28 As Button
Friend WithEvents cbxStandorttxtErstellenUNI As CheckBox
Friend WithEvents Button29 As Button
Friend WithEvents Label27 As Label
Friend WithEvents txtProdPfadUNI As TextBox
Friend WithEvents Button30 As Button
Friend WithEvents Button31 As Button
Friend WithEvents txtInstallProdPfadNEU As TextBox
Friend WithEvents Button32 As Button
Friend WithEvents Button33 As Button
Friend WithEvents txtInstallProdPfadNKD As TextBox
Friend WithEvents Button34 As Button
Friend WithEvents Label28 As Label
Friend WithEvents Label29 As Label
Friend WithEvents Button35 As Button
Friend WithEvents cbxIncrementalCopy As CheckBox
End Class

View File

@@ -58,7 +58,13 @@ Public Class frmProgDetails
txtProdPfadNEU.Text = daten.prog_prod_path_NEU
txtInstallProdPfadNEU.Text = daten.prog_installer_prod_path_NEU
txtProdPfadUNI.Text = daten.prog_prod_path_UNI
txtInstallProdPfadUNI.Text = daten.prog_installer_prod_path_UNI
txtProdPfadAMB.Text = daten.prog_prod_path_AMB
txtInstallProdPfadAMB.Text = daten.prog_installer_prod_path_AMB
End Sub
Private Sub btnVersionAkt_Click(sender As Object, e As EventArgs) Handles btnVersionAkt.Click
@@ -146,7 +152,13 @@ Public Class frmProgDetails
daten.prog_installer_prod_path_NKD = txtInstallProdPfadNKD.Text
daten.prog_prod_path_NEU = txtProdPfadNEU.Text
daten.prog_installer_prod_path_NEU = txtInstallProdPfadNEU.Text
daten.prog_prod_path_UNI = txtProdPfadUNI.Text
daten.prog_installer_prod_path_UNI = txtInstallProdPfadUNI.Text
daten.prog_prod_path_AMB = txtProdPfadAMB.Text
daten.prog_installer_prod_path_AMB = txtInstallProdPfadAMB.Text
If PROG.insertProgramm(daten) Then Me.Close()
@@ -167,14 +179,14 @@ Public Class frmProgDetails
Dim PROG_FUNC As New cProgramFunctions
Sub copyProgrammFiles(sender As Button, von As String, nach As String, cbx As Boolean, Optional standort As String = "")
Sub copyProgrammFiles(sender As Button, von As String, nach As String, cbx As Boolean, Optional standort As String = "", Optional LIST As List(Of VERAG_PROG_ALLGEMEIN.cProgrammeUpdate) = Nothing)
sender.BackColor = Color.LightGray
Application.DoEvents()
Me.Refresh()
If von = "" Then sender.BackColor = Color.White : Exit Sub
If nach = "" Then sender.BackColor = Color.White : Exit Sub
If checkSicherheitsfrage(von, nach) Then
setBG(sender, PROG_FUNC.copyProgram(von, nach, cbx))
setBG(sender, PROG_FUNC.copyProgram(von, nach, cbx, cbxIncrementalCopy.Checked))
End If
Application.DoEvents()
Me.Refresh()
@@ -187,6 +199,7 @@ Public Class frmProgDetails
Function checkSicherheitsfrage(von, nach) As Boolean
If sicherheitsfrageUeberspringen Then Return True
If vbYes = MsgBox("Möchten Sie folgende Aktion ausführen?:" & vbNewLine & vbNewLine & " Kopiere alle Files von: " & von & vbNewLine & "Nach: " & nach, vbYesNo, "Aktion ausführen?") Then
@@ -320,6 +333,8 @@ Public Class frmProgDetails
Button16.PerformClick()
Button18.PerformClick()
Button20.PerformClick()
Button30.PerformClick()
Button28.PerformClick()
End If
sicherheitsfrageUeberspringen = False
End Sub
@@ -336,6 +351,8 @@ Public Class frmProgDetails
Button22.PerformClick()
Button24.PerformClick()
Button26.PerformClick()
Button32.PerformClick()
Button34.PerformClick()
End If
sicherheitsfrageUeberspringen = False
End Sub
@@ -361,12 +378,12 @@ Public Class frmProgDetails
End Sub
Private Sub Button23_Click(sender As Object, e As EventArgs) Handles Button23.Click
PROG.setParam("prog_installer_prod_path_nkd", txtInstallProdPfadNKD.Text, codename)
PROG.setParam("prog_installer_prod_path_uni", txtInstallProdPfadUNI.Text, codename)
init()
End Sub
Private Sub Button25_Click(sender As Object, e As EventArgs) Handles Button25.Click
PROG.setParam("prog_installer_prod_path_neu", txtInstallProdPfadNEU.Text, codename)
PROG.setParam("prog_installer_prod_path_amb", txtInstallProdPfadAMB.Text, codename)
init()
End Sub
@@ -391,12 +408,101 @@ Public Class frmProgDetails
End Sub
Private Sub Button24_Click(sender As Object, e As EventArgs) Handles Button24.Click
copyProgrammFiles(sender, txtInstallSourcePfad.Text, txtInstallProdPfadNKD.Text, cbxZip.Checked)
copyProgrammFiles(sender, txtInstallSourcePfad.Text, txtInstallProdPfadUNI.Text, cbxZip.Checked)
End Sub
Private Sub Button26_Click(sender As Object, e As EventArgs) Handles Button26.Click
copyProgrammFiles(sender, txtInstallSourcePfad.Text, txtInstallProdPfadNEU.Text, cbxZip.Checked)
copyProgrammFiles(sender, txtInstallSourcePfad.Text, txtInstallProdPfadAMB.Text, cbxZip.Checked)
End Sub
Private Sub Button30_Click(sender As Object, e As EventArgs) Handles Button30.Click
copyProgrammFiles(sender, txtSourcePfad.Text, txtProdPfadUNI.Text, cbxZip.Checked, If(cbxStandorttxtErstellenUNI.Checked, "UNISPED", ""))
End Sub
Private Sub Button28_Click(sender As Object, e As EventArgs) Handles Button28.Click
copyProgrammFiles(sender, txtSourcePfad.Text, txtProdPfadAMB.Text, cbxZip.Checked, If(cbxStandorttxtErstellenAMB.Checked, "AMBAR", ""))
End Sub
Private Sub Button29_Click(sender As Object, e As EventArgs) Handles Button29.Click
PROG.setParam("prog_prod_path_uni", txtProdPfadUNI.Text, codename)
init()
End Sub
Private Sub Button27_Click(sender As Object, e As EventArgs) Handles Button27.Click
PROG.setParam("prog_prod_path_amb", txtProdPfadAMB.Text, codename)
init()
End Sub
Private Sub Button34_Click(sender As Object, e As EventArgs) Handles Button34.Click
copyProgrammFiles(sender, txtInstallSourcePfad.Text, txtInstallProdPfadNKD.Text, cbxZip.Checked)
End Sub
Private Sub Button32_Click(sender As Object, e As EventArgs) Handles Button32.Click
copyProgrammFiles(sender, txtInstallSourcePfad.Text, txtInstallProdPfadNEU.Text, cbxZip.Checked)
End Sub
Private Sub Button33_Click(sender As Object, e As EventArgs) Handles Button33.Click
PROG.setParam("prog_installer_prod_path_nkd", txtInstallProdPfadNKD.Text, codename)
init()
End Sub
Private Sub Button31_Click(sender As Object, e As EventArgs) Handles Button31.Click
PROG.setParam("prog_installer_prod_path_neu", txtInstallProdPfadNEU.Text, codename)
init()
End Sub
Dim LIST As New List(Of VERAG_PROG_ALLGEMEIN.cProgrammeUpdate)
Private Sub Button35_Click(sender As Object, e As EventArgs) Handles Button35.Click
If txtSourcePfad.Text = "" Then Exit Sub
If Not IO.Directory.Exists(txtSourcePfad.Text) Then Exit Sub
Dim LIST = New List(Of VERAG_PROG_ALLGEMEIN.cProgrammeUpdate)
Dim dirName = ""
VERAG_PROG_ALLGEMEIN.cProgrammeUpdate.RekursivGetFiles(New IO.DirectoryInfo(txtSourcePfad.Text), dirName, LIST, {})
For Each f In IO.Directory.GetFiles(txtSourcePfad.Text)
Dim FI As New IO.FileInfo(f)
If dirName = "" Then
dirName = FI.DirectoryName
MsgBox(dirName)
End If
Dim UD As New VERAG_PROG_ALLGEMEIN.cProgrammeUpdate
UD.pud_fileName = FI.Name
UD.pud_filePathFolder = FI.DirectoryName.Replace(dirName, "")
If UD.pud_filePathFolder = "" Then UD.pud_filePathFolder = Nothing
UD.pud_file_Size = FI.Length
UD.pud_file_Date = FI.LastWriteTime
UD.pud_file_Verion = "" 'FI.
LIST.Add(UD)
Next
Dim daten As cProgramm = PROG.getProgrammByCodeName(codename)
If daten Is Nothing Then Exit Sub
VERAG_PROG_ALLGEMEIN.cProgrammeUpdate.SAVE_LIST(daten.prog_id, txtVersion.Text.Replace(".", ""), codename, LIST)
End Sub
Public Function isNewFile(ByRef file As VERAG_PROG_ALLGEMEIN.cProgrammeUpdate, LIST_DEST As List(Of VERAG_PROG_ALLGEMEIN.cProgrammeUpdate)) As Boolean
For Each l In LIST_DEST
If l.pud_filePathFolder = file.pud_filePathFolder And l.pud_fileName = file.pud_fileName And l.pud_file_Size = file.pud_file_Size And l.pud_file_Date = file.pud_file_Date Then
Return False
End If
Next
Return True
End Function
Public Function isOldFile(ByRef file As VERAG_PROG_ALLGEMEIN.cProgrammeUpdate, LIST_SOURCE As List(Of VERAG_PROG_ALLGEMEIN.cProgrammeUpdate)) As Boolean
For Each l In LIST_SOURCE
If l.pud_filePathFolder = file.pud_filePathFolder And l.pud_fileName = file.pud_fileName And l.pud_file_Size = file.pud_file_Size And l.pud_file_Date = file.pud_file_Date Then
Return False
End If
Next
Return True
End Function
End Class