bugfix

Aviso/frmSendungsdetailsNEU.vb

@@ -7664,36 +7664,4 @@ Public Class frmSendungsdetailsNEU
         ' End If
     End Sub
 
-    Private Sub ToolStripMenuItem34_Click(sender As Object, e As EventArgs)
-        Dim SND As VERAG_PROG_ALLGEMEIN.cSendungen = Nothing
-        If SENDUNG_LIST IsNot Nothing Then
-            SND = SENDUNG_LIST(CURRENT_INDEX)
-        Else
-            MsgBox("Keine Sendung!")
-            Exit Sub
-        End If
-
-
-        Dim filialNr As Integer = SND.FilialenNr
-        Dim abfertigungsNr As Integer = SND.AbfertigungsNr
-
-        ' URL zusammenbauen
-        Dim url As String = String.Format(
-            "https://login.verag.ag/ens?filialNr={0}&abfertigungsNr={1}",
-            filialNr,
-            abfertigungsNr
-        )
-
-        Try
-            ' Browser öffnen (ab .NET Framework 4.5 braucht man UseShellExecute=True)
-            Process.Start(New ProcessStartInfo With {
-                .FileName = url,
-                .UseShellExecute = True
-            })
-        Catch ex As Exception
-            MessageBox.Show("Fehler beim Öffnen der URL: " & ex.Message,
-                            "Fehler", MessageBoxButtons.OK, MessageBoxIcon.Error)
-        End Try
-
-    End Sub
 End Class