From 0a0c1c5f10bb8ed6000cc61754bf8259e187ba3e Mon Sep 17 00:00:00 2001 From: Andreas Luxbauer Date: Mon, 11 Sep 2023 14:39:40 +0200 Subject: [PATCH] Vers --- Aviso/Aviso.vbproj | 9 +++++---- Aviso/My Project/AssemblyInfo.vb | 4 ++-- Aviso/frmATEZ_NCTS.vb | 8 ++++---- 3 files changed, 11 insertions(+), 10 deletions(-) diff --git a/Aviso/Aviso.vbproj b/Aviso/Aviso.vbproj index 5698ab8..095864b 100644 --- a/Aviso/Aviso.vbproj +++ b/Aviso/Aviso.vbproj @@ -80,10 +80,10 @@ My Project\app.manifest - 5A6BD29D23A7643243CD6EFA1FEF21BAF955E653 + C817B38BF41513AE566EFC65D0884C0F91F49E37 - AL20210908.pfx + Aviso_1_TemporaryKey.pfx true @@ -108,7 +108,7 @@ x64 - Aviso_TemporaryKey.pfx + Aviso_1_TemporaryKey.pfx @@ -1393,6 +1393,7 @@ + Component @@ -1749,7 +1750,7 @@ - C:\VERAG\Zertifikate\signtool.exe sign /f C:\VERAG\Zertifikate\AL20210908.pfx /p verag2001 "Aviso.exe" + C:\VERAG\Zertifikate\signtool.exe sign /f D:\Andreas\Programmierung\VB\AVISO\Aviso\Aviso\Aviso_1_TemporaryKey.pfx /p BmWr501956 "Aviso.exe" diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index 2521695..ade77f9 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/frmATEZ_NCTS.vb b/Aviso/frmATEZ_NCTS.vb index 88ed06d..0e2b205 100644 --- a/Aviso/frmATEZ_NCTS.vb +++ b/Aviso/frmATEZ_NCTS.vb @@ -158,7 +158,7 @@ Public Class frmATEZ_NCTS If Not atez.setJsonPDF(atezData, dgvAnhaenge) Then MsgBox("Fehler beim Erstellen der PDF-Daten, kein Anhang ausgewählt!" & vbNewLine & "Vorgang abgebrochen!") - + 'MsgBox(atezData.json) Dim azetId = atez.SendRequestWithAuthHeader("application/json", failreDesc) If failreDesc <> "" Then @@ -243,9 +243,9 @@ Public Class frmATEZ_NCTS cboProzedur.Items.Clear() - cboProzedur.Items.Add(New MyListItem("T1", "T1")) - cboProzedur.Items.Add(New MyListItem("T2", "T2")) - cboProzedur.Items.Add(New MyListItem("TIR", "TIR")) + cboProzedur.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("T1", "T1")) + cboProzedur.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("T2", "T2")) + cboProzedur.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TIR", "TIR")) Select Case FIRMA_DY Case "ATILLA" : cboProzedur.changeItem("T2")