diff --git a/SchaumKommiCollo/KommiCollo/frmAbschluss.vb b/SchaumKommiCollo/KommiCollo/frmAbschluss.vb
index a2b9928..5526c6a 100644
--- a/SchaumKommiCollo/KommiCollo/frmAbschluss.vb
+++ b/SchaumKommiCollo/KommiCollo/frmAbschluss.vb
@@ -4,12 +4,6 @@
     Private Sub frmAbschluss_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
 
         Try
-            If (System.Diagnostics.Debugger.IsAttached) = False Then
-                My.Settings.ConfigConnectionString = "Data Source=192.168.13.101;Initial Catalog=SCHAUM_IID;Persist Security Info=True;User ID=sa;Password=dd"
-                My.Settings.ConfigConnStringMercator = "Data Source=192.168.13.101;Initial Catalog=CP2DD;Persist Security Info=True;User ID=sa;Password=dd"
-                My.Settings.Save()
-            End If
-
             Me.VWAbschlussTableAdapter.Connection.ConnectionString = My.Settings.ConfigConnectionString
             Me.TBKOMMCOLLI_MANDANTTableAdapter.Connection.ConnectionString = My.Settings.ConfigConnectionString
             Me.TBKOMMCOLLI_PAKET_KOPFTableAdapter.Connection.ConnectionString = My.Settings.ConfigConnectionString
diff --git a/SchaumKommiCollo/KommiCollo/frmMain.vb b/SchaumKommiCollo/KommiCollo/frmMain.vb
index 2bfa1fa..4ca7e5f 100644
--- a/SchaumKommiCollo/KommiCollo/frmMain.vb
+++ b/SchaumKommiCollo/KommiCollo/frmMain.vb
@@ -31,11 +31,6 @@ Public Class frmMain
             Application.Exit()
         End If
         Try
-            'If (System.Diagnostics.Debugger.IsAttached) = False Then
-            My.Settings.ConfigConnectionString = "Data Source=192.168.13.101;Initial Catalog=SCHAUM_IID;Persist Security Info=True;User ID=sa;Password=dd"
-                My.Settings.ConfigConnStringMercator = "Data Source=192.168.13.101;Initial Catalog=CP2DD;Persist Security Info=True;User ID=sa;Password=dd"
-                My.Settings.Save()
-            ' End If
             tslblConString.Text = "Constrings: " & My.Settings.ConfigConnectionString.Replace("=sa;Password=dd", "XXX") & " # " & My.Settings.ConfigConnStringMercator.Replace("=sa;Password=dd", "XXX")
             Me.TBWH_MANDANTTableAdapter.Connection.ConnectionString = My.Settings.ConfigConnectionString
             Me.TBKOMMCOLLI_PAKET_KOPFTableAdapter.Connection.ConnectionString = My.Settings.ConfigConnectionString