Bugfixes, "Verbesserungen"

2019-09-25 10:01:04 +02:00
parent d07cbe0676
commit c0d894546a
18 changed files with 292 additions and 155 deletions
--- a/Dokumentation/Administration/Standorthinzu.vb
+++ b/Dokumentation/Administration/Standorthinzu.vb
@@ -44,7 +44,9 @@ Public Class Standorthinzu
                cmd.CommandText = "INSERT INTO Tbl_Netzwerke (Netzwerkname, VLAN, Netzwerk, NWSTANDORT, NETNAME, MAIN, SUBNETZ) VALUES ('" & NeuerStandortNameIntern & "', '0', '" & TxtNetzwerkintern.Text & "', '" & NeuerStandortName & "', 'Intern', '1', '255.255.255.0')"
                cmd.ExecuteNonQuery()
                Class1.Absender = "Standorthinzu"
-                NWEdit.Show()
+                Dim nwe As New NWEdit
+                nwe.NW.getNetzwerk(NeuerStandortName, "Intern")
+                nwe.Show()
            End If

        Catch ex As Exception