TIMOCOM, Anpassung Auftrag Kopieren

UID/frmLogin.vb

@@ -34,10 +34,10 @@
     End Sub
 
     Private Sub frmLogin_Load(sender As Object, e As EventArgs) Handles Me.Load
-        'If sAppPath Like "*\bin\Debug" Then
-        '    txtUser.Text = "sebastian"
-        '    txtPwd.Text = "verag#3"
-        'End If
+        If sAppPath Like "*\bin\Debug" Then
+            txtUser.Text = "sebastian"
+            txtPwd.Text = "verag#3"
+        End If
         If TESTSYSTEM Then lblTestsystem.Visible = True
         VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = TESTSYSTEM
         'Dim tmp As String