mailsender, etc.

2026-10-05 20:17:02 +02:00
parent b51abf8128
commit c174cd55c7
6 changed files with 420 additions and 174 deletions
--- a/initATLASAufschubkonten/frmStartOptions.Designer.vb
+++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb
@@ -83,6 +83,9 @@ Partial Class frmStartOptions
        Me.Label13 = New System.Windows.Forms.Label()
        Me.tbcntr = New System.Windows.Forms.TabControl()
        Me.TabPage1 = New System.Windows.Forms.TabPage()
+        Me.ll_MIC_Einarbeitung_TEST = New System.Windows.Forms.LinkLabel()
+        Me.ll_MIC_Einarbeitung_PROD = New System.Windows.Forms.LinkLabel()
+        Me.Label67 = New System.Windows.Forms.Label()
        Me.cbxGESTELLUNG_TESTLAUF = New System.Windows.Forms.CheckBox()
        Me.cbxVW_Infomail = New System.Windows.Forms.CheckBox()
        Me.LinkLabel68 = New System.Windows.Forms.LinkLabel()
@@ -412,9 +415,7 @@ Partial Class frmStartOptions
        Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.Label67 = New System.Windows.Forms.Label()
-        Me.ll_MIC_Einarbeitung_TEST = New System.Windows.Forms.LinkLabel()
-        Me.ll_MIC_Einarbeitung_PROD = New System.Windows.Forms.LinkLabel()
+        Me.Button36 = New System.Windows.Forms.Button()
        Me.pnl.SuspendLayout()
        CType(Me.pbEmailscheck, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.PictureBox24, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -474,6 +475,7 @@ Partial Class frmStartOptions
        '
        Me.pnl.BackColor = System.Drawing.Color.White
        Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.pnl.Controls.Add(Me.Button36)
        Me.pnl.Controls.Add(Me.Button35)
        Me.pnl.Controls.Add(Me.Button33)
        Me.pnl.Controls.Add(Me.LinkLabel54)
@@ -570,11 +572,11 @@ Partial Class frmStartOptions
        Me.Button35.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button35.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.Button35.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button35.Location = New System.Drawing.Point(996, 312)
+        Me.Button35.Location = New System.Drawing.Point(1036, 207)
        Me.Button35.Name = "Button35"
-        Me.Button35.Size = New System.Drawing.Size(103, 40)
+        Me.Button35.Size = New System.Drawing.Size(185, 40)
        Me.Button35.TabIndex = 152
-        Me.Button35.Text = "check Sped-Einrtäge"
+        Me.Button35.Text = "Sped-Einträge prüfen (grünes S)"
        Me.Button35.UseVisualStyleBackColor = True
        '
        'Button33
@@ -582,12 +584,13 @@ Partial Class frmStartOptions
        Me.Button33.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button33.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.Button33.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button33.Location = New System.Drawing.Point(1126, 155)
+        Me.Button33.Location = New System.Drawing.Point(1118, 120)
        Me.Button33.Name = "Button33"
-        Me.Button33.Size = New System.Drawing.Size(90, 40)
+        Me.Button33.Size = New System.Drawing.Size(105, 40)
        Me.Button33.TabIndex = 151
        Me.Button33.Text = "EB-Highway"
        Me.Button33.UseVisualStyleBackColor = True
+        Me.Button33.Visible = False
        '
        'LinkLabel54
        '
@@ -605,9 +608,9 @@ Partial Class frmStartOptions
        Me.Button32.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button32.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.Button32.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button32.Location = New System.Drawing.Point(996, 269)
+        Me.Button32.Location = New System.Drawing.Point(1118, 162)
        Me.Button32.Name = "Button32"
-        Me.Button32.Size = New System.Drawing.Size(103, 40)
+        Me.Button32.Size = New System.Drawing.Size(105, 40)
        Me.Button32.TabIndex = 148
        Me.Button32.Text = "ZuGFerD-Check"
        Me.Button32.UseVisualStyleBackColor = True
@@ -663,12 +666,13 @@ Partial Class frmStartOptions
        Me.Button30.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button30.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.Button30.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button30.Location = New System.Drawing.Point(1014, 147)
+        Me.Button30.Location = New System.Drawing.Point(1118, 55)
        Me.Button30.Name = "Button30"
        Me.Button30.Size = New System.Drawing.Size(105, 59)
        Me.Button30.TabIndex = 143
        Me.Button30.Text = "Preislisten - Übersetzungen einfügen"
        Me.Button30.UseVisualStyleBackColor = True
+        Me.Button30.Visible = False
        '
        'pbEmailscheck
        '
@@ -1279,6 +1283,38 @@ Partial Class frmStartOptions
        Me.TabPage1.Text = "Zollverfahren"
        Me.TabPage1.UseVisualStyleBackColor = True
        '
+        'll_MIC_Einarbeitung_TEST
+        '
+        Me.ll_MIC_Einarbeitung_TEST.AutoSize = True
+        Me.ll_MIC_Einarbeitung_TEST.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.ll_MIC_Einarbeitung_TEST.Location = New System.Drawing.Point(284, 323)
+        Me.ll_MIC_Einarbeitung_TEST.Name = "ll_MIC_Einarbeitung_TEST"
+        Me.ll_MIC_Einarbeitung_TEST.Size = New System.Drawing.Size(177, 13)
+        Me.ll_MIC_Einarbeitung_TEST.TabIndex = 155
+        Me.ll_MIC_Einarbeitung_TEST.TabStop = True
+        Me.ll_MIC_Einarbeitung_TEST.Text = "Eingangsnachrichten abrufen TEST"
+        '
+        'll_MIC_Einarbeitung_PROD
+        '
+        Me.ll_MIC_Einarbeitung_PROD.AutoSize = True
+        Me.ll_MIC_Einarbeitung_PROD.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.ll_MIC_Einarbeitung_PROD.Location = New System.Drawing.Point(284, 348)
+        Me.ll_MIC_Einarbeitung_PROD.Name = "ll_MIC_Einarbeitung_PROD"
+        Me.ll_MIC_Einarbeitung_PROD.Size = New System.Drawing.Size(180, 13)
+        Me.ll_MIC_Einarbeitung_PROD.TabIndex = 156
+        Me.ll_MIC_Einarbeitung_PROD.TabStop = True
+        Me.ll_MIC_Einarbeitung_PROD.Text = "Eingangsnachrichten abrufen PROD"
+        '
+        'Label67
+        '
+        Me.Label67.AutoSize = True
+        Me.Label67.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label67.Location = New System.Drawing.Point(284, 296)
+        Me.Label67.Name = "Label67"
+        Me.Label67.Size = New System.Drawing.Size(177, 13)
+        Me.Label67.TabIndex = 154
+        Me.Label67.Text = "MIC Nachrichtenverarbeitung:"
+        '
        'cbxGESTELLUNG_TESTLAUF
        '
        Me.cbxGESTELLUNG_TESTLAUF.AutoSize = True
@@ -5559,37 +5595,17 @@ Partial Class frmStartOptions
        Me.DataGridViewTextBoxColumn1.MinimumWidth = 8
        Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
        '
-        'Label67
+        'Button36
        '
-        Me.Label67.AutoSize = True
-        Me.Label67.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label67.Location = New System.Drawing.Point(284, 296)
-        Me.Label67.Name = "Label67"
-        Me.Label67.Size = New System.Drawing.Size(177, 13)
-        Me.Label67.TabIndex = 154
-        Me.Label67.Text = "MIC Nachrichtenverarbeitung:"
-        '
-        'll_MIC_Einarbeitung_TEST
-        '
-        Me.ll_MIC_Einarbeitung_TEST.AutoSize = True
-        Me.ll_MIC_Einarbeitung_TEST.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.ll_MIC_Einarbeitung_TEST.Location = New System.Drawing.Point(284, 323)
-        Me.ll_MIC_Einarbeitung_TEST.Name = "ll_MIC_Einarbeitung_TEST"
-        Me.ll_MIC_Einarbeitung_TEST.Size = New System.Drawing.Size(177, 13)
-        Me.ll_MIC_Einarbeitung_TEST.TabIndex = 155
-        Me.ll_MIC_Einarbeitung_TEST.TabStop = True
-        Me.ll_MIC_Einarbeitung_TEST.Text = "Eingangsnachrichten abrufen TEST"
-        '
-        'll_MIC_Einarbeitung_PROD
-        '
-        Me.ll_MIC_Einarbeitung_PROD.AutoSize = True
-        Me.ll_MIC_Einarbeitung_PROD.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.ll_MIC_Einarbeitung_PROD.Location = New System.Drawing.Point(284, 348)
-        Me.ll_MIC_Einarbeitung_PROD.Name = "ll_MIC_Einarbeitung_PROD"
-        Me.ll_MIC_Einarbeitung_PROD.Size = New System.Drawing.Size(180, 13)
-        Me.ll_MIC_Einarbeitung_PROD.TabIndex = 156
-        Me.ll_MIC_Einarbeitung_PROD.TabStop = True
-        Me.ll_MIC_Einarbeitung_PROD.Text = "Eingangsnachrichten abrufen PROD"
+        Me.Button36.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button36.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button36.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button36.Location = New System.Drawing.Point(1118, 253)
+        Me.Button36.Name = "Button36"
+        Me.Button36.Size = New System.Drawing.Size(103, 40)
+        Me.Button36.TabIndex = 153
+        Me.Button36.Text = "QS-Mitarbeiter in SPED-BUCH"
+        Me.Button36.UseVisualStyleBackColor = True
        '
        'frmStartOptions
        '
@@ -6068,4 +6084,5 @@ Partial Class frmStartOptions
    Friend WithEvents ll_MIC_Einarbeitung_TEST As LinkLabel
    Friend WithEvents ll_MIC_Einarbeitung_PROD As LinkLabel
    Friend WithEvents Label67 As Label
+    Friend WithEvents Button36 As Button
 End Class