diff --git a/UID/ADMIN.vbproj b/UID/ADMIN.vbproj
index 7b8d30a..797a8f2 100644
--- a/UID/ADMIN.vbproj
+++ b/UID/ADMIN.vbproj
@@ -220,6 +220,9 @@
..\..\..\dll\.net MySQL v4.5.2\MySql.Data.dll
+
+ ..\packages\Newtonsoft.Json.13.0.2\lib\net45\Newtonsoft.Json.dll
+
..\..\..\dll\PdfSharp.dll
@@ -245,6 +248,7 @@
..\packages\System.Memory.4.5.4\lib\net461\System.Memory.dll
+
..\packages\System.Numerics.Vectors.4.5.0\lib\net46\System.Numerics.Vectors.dll
diff --git a/UID/Mitarbeiter/frmMitarbDetails.Designer.vb b/UID/Mitarbeiter/frmMitarbDetails.Designer.vb
index 7bd1b7e..aacbc2a 100644
--- a/UID/Mitarbeiter/frmMitarbDetails.Designer.vb
+++ b/UID/Mitarbeiter/frmMitarbDetails.Designer.vb
@@ -34,21 +34,13 @@ Partial Class frmMitarbDetails
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.tbcntr = New System.Windows.Forms.TabControl()
Me.TabPage2 = New System.Windows.Forms.TabPage()
- Me.cboDPFirma2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboDPFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label50 = New System.Windows.Forms.Label()
Me.Label38 = New System.Windows.Forms.Label()
- Me.cboPersonal = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label37 = New System.Windows.Forms.Label()
- Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboDP = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboKasse = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label42 = New System.Windows.Forms.Label()
Me.Label40 = New System.Windows.Forms.Label()
Me.cbxSpedBuch = New System.Windows.Forms.CheckBox()
Me.Label41 = New System.Windows.Forms.Label()
- Me.cboSpedbuch = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.MyComboBox3 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.TabPage4 = New System.Windows.Forms.TabPage()
Me.txtTelotecSB = New System.Windows.Forms.TextBox()
Me.Label51 = New System.Windows.Forms.Label()
@@ -58,25 +50,26 @@ Partial Class frmMitarbDetails
Me.Label46 = New System.Windows.Forms.Label()
Me.Label44 = New System.Windows.Forms.Label()
Me.Label43 = New System.Windows.Forms.Label()
- Me.cboEZOLL_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
- Me.cboATLAS_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.TabPage5 = New System.Windows.Forms.TabPage()
+ Me.lblCheckconnection = New System.Windows.Forms.Label()
+ Me.Button6 = New System.Windows.Forms.Button()
+ Me.txtCSPW = New System.Windows.Forms.TextBox()
+ Me.Label58 = New System.Windows.Forms.Label()
+ Me.txtCSUser = New System.Windows.Forms.TextBox()
+ Me.Label59 = New System.Windows.Forms.Label()
Me.Label4 = New System.Windows.Forms.Label()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
- Me.cboFaktGrp = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.txtAbweichenderAnzeigename = New System.Windows.Forms.TextBox()
+ Me.Label57 = New System.Windows.Forms.Label()
Me.Label56 = New System.Windows.Forms.Label()
- Me.cboALIASDomain2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtALIASUser2 = New System.Windows.Forms.TextBox()
Me.Label54 = New System.Windows.Forms.Label()
Me.cboFirmaHaupt = New System.Windows.Forms.ComboBox()
- Me.cboTeam = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label53 = New System.Windows.Forms.Label()
- Me.cboALIASDomain = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtALIASUser = New System.Windows.Forms.TextBox()
Me.Label52 = New System.Windows.Forms.Label()
Me.lkl = New System.Windows.Forms.LinkLabel()
Me.Label45 = New System.Windows.Forms.Label()
- Me.MyListBox1 = New VERAG_PROG_ALLGEMEIN.MyListBox()
- Me.cboFirmaFMZOLL = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label39 = New System.Windows.Forms.Label()
Me.cboFirma = New System.Windows.Forms.ComboBox()
Me.Label36 = New System.Windows.Forms.Label()
@@ -92,13 +85,11 @@ Partial Class frmMitarbDetails
Me.txtDurchwahl = New System.Windows.Forms.TextBox()
Me.Label19 = New System.Windows.Forms.Label()
Me.Label8 = New System.Windows.Forms.Label()
- Me.cboAbteilung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtPwd = New System.Windows.Forms.TextBox()
Me.Label11 = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label()
Me.txtUsername = New System.Windows.Forms.TextBox()
Me.Label3 = New System.Windows.Forms.Label()
- Me.cboNiederlassung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label9 = New System.Windows.Forms.Label()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.cbxChatBenutzer = New System.Windows.Forms.CheckBox()
@@ -130,7 +121,6 @@ Partial Class frmMitarbDetails
Me.Label2 = New System.Windows.Forms.Label()
Me.txtInfo = New System.Windows.Forms.RichTextBox()
Me.TabPage3 = New System.Windows.Forms.TabPage()
- Me.cboProgSprache = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label55 = New System.Windows.Forms.Label()
Me.Button5 = New System.Windows.Forms.Button()
Me.Button4 = New System.Windows.Forms.Button()
@@ -173,8 +163,26 @@ Partial Class frmMitarbDetails
Me.PictureBox6 = New System.Windows.Forms.PictureBox()
Me.cboAdminBer = New System.Windows.Forms.ComboBox()
Me.Label7 = New System.Windows.Forms.Label()
- Me.txtAbweichenderAnzeigename = New System.Windows.Forms.TextBox()
- Me.Label57 = New System.Windows.Forms.Label()
+ Me.cboDPFirma2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboDPFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboPersonal = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboDP = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboKasse = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboSpedbuch = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.MyComboBox3 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboEZOLL_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboATLAS_SB = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboFaktGrp = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboALIASDomain2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboTeam = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboALIASDomain = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.MyListBox1 = New VERAG_PROG_ALLGEMEIN.MyListBox()
+ Me.cboFirmaFMZOLL = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboAbteilung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboNiederlassung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cboProgSprache = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.cbxShowPW = New System.Windows.Forms.CheckBox()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel1.SuspendLayout()
Me.TabControl2.SuspendLayout()
@@ -182,6 +190,7 @@ Partial Class frmMitarbDetails
Me.tbcntr.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.TabPage4.SuspendLayout()
+ Me.TabPage5.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.GroupBox1.SuspendLayout()
CType(Me.picFoto, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -302,6 +311,7 @@ Partial Class frmMitarbDetails
'
Me.tbcntr.Controls.Add(Me.TabPage2)
Me.tbcntr.Controls.Add(Me.TabPage4)
+ Me.tbcntr.Controls.Add(Me.TabPage5)
Me.tbcntr.Location = New System.Drawing.Point(2, 539)
Me.tbcntr.Name = "tbcntr"
Me.tbcntr.SelectedIndex = 0
@@ -333,30 +343,6 @@ Partial Class frmMitarbDetails
Me.TabPage2.Text = "Zuordnung Intern"
Me.TabPage2.UseVisualStyleBackColor = True
'
- 'cboDPFirma2
- '
- Me.cboDPFirma2._allowedValuesFreiText = Nothing
- Me.cboDPFirma2._allowFreiText = False
- Me.cboDPFirma2._value = ""
- Me.cboDPFirma2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboDPFirma2.FormattingEnabled = True
- Me.cboDPFirma2.Location = New System.Drawing.Point(106, 151)
- Me.cboDPFirma2.Name = "cboDPFirma2"
- Me.cboDPFirma2.Size = New System.Drawing.Size(101, 21)
- Me.cboDPFirma2.TabIndex = 108
- '
- 'cboDPFirma
- '
- Me.cboDPFirma._allowedValuesFreiText = Nothing
- Me.cboDPFirma._allowFreiText = False
- Me.cboDPFirma._value = ""
- Me.cboDPFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboDPFirma.FormattingEnabled = True
- Me.cboDPFirma.Location = New System.Drawing.Point(7, 151)
- Me.cboDPFirma.Name = "cboDPFirma"
- Me.cboDPFirma.Size = New System.Drawing.Size(101, 21)
- Me.cboDPFirma.TabIndex = 107
- '
'Label50
'
Me.Label50.AutoSize = True
@@ -377,18 +363,6 @@ Partial Class frmMitarbDetails
Me.Label38.TabIndex = 96
Me.Label38.Text = "Standard-Filiale (SpedBuch)"
'
- 'cboPersonal
- '
- Me.cboPersonal._allowedValuesFreiText = Nothing
- Me.cboPersonal._allowFreiText = False
- Me.cboPersonal._value = ""
- Me.cboPersonal.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboPersonal.FormattingEnabled = True
- Me.cboPersonal.Location = New System.Drawing.Point(7, 65)
- Me.cboPersonal.Name = "cboPersonal"
- Me.cboPersonal.Size = New System.Drawing.Size(200, 21)
- Me.cboPersonal.TabIndex = 95
- '
'Label37
'
Me.Label37.AutoSize = True
@@ -399,42 +373,6 @@ Partial Class frmMitarbDetails
Me.Label37.TabIndex = 94
Me.Label37.Text = "Zuordnung / FM-ZOLL Personal - Tabelle:"
'
- 'MyComboBox2
- '
- Me.MyComboBox2._allowedValuesFreiText = Nothing
- Me.MyComboBox2._allowFreiText = False
- Me.MyComboBox2._value = ""
- Me.MyComboBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.MyComboBox2.FormattingEnabled = True
- Me.MyComboBox2.Location = New System.Drawing.Point(9, 24)
- Me.MyComboBox2.Name = "MyComboBox2"
- Me.MyComboBox2.Size = New System.Drawing.Size(198, 21)
- Me.MyComboBox2.TabIndex = 97
- '
- 'cboDP
- '
- Me.cboDP._allowedValuesFreiText = Nothing
- Me.cboDP._allowFreiText = False
- Me.cboDP._value = ""
- Me.cboDP.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboDP.FormattingEnabled = True
- Me.cboDP.Location = New System.Drawing.Point(217, 151)
- Me.cboDP.Name = "cboDP"
- Me.cboDP.Size = New System.Drawing.Size(198, 21)
- Me.cboDP.TabIndex = 105
- '
- 'cboKasse
- '
- Me.cboKasse._allowedValuesFreiText = Nothing
- Me.cboKasse._allowFreiText = False
- Me.cboKasse._value = ""
- Me.cboKasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboKasse.FormattingEnabled = True
- Me.cboKasse.Location = New System.Drawing.Point(7, 106)
- Me.cboKasse.Name = "cboKasse"
- Me.cboKasse.Size = New System.Drawing.Size(200, 21)
- Me.cboKasse.TabIndex = 99
- '
'Label42
'
Me.Label42.AutoSize = True
@@ -476,31 +414,6 @@ Partial Class frmMitarbDetails
Me.Label41.TabIndex = 100
Me.Label41.Text = "Standard-Preisliste:"
'
- 'cboSpedbuch
- '
- Me.cboSpedbuch._allowedValuesFreiText = Nothing
- Me.cboSpedbuch._allowFreiText = False
- Me.cboSpedbuch._value = ""
- Me.cboSpedbuch.Enabled = False
- Me.cboSpedbuch.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboSpedbuch.FormattingEnabled = True
- Me.cboSpedbuch.Location = New System.Drawing.Point(217, 66)
- Me.cboSpedbuch.Name = "cboSpedbuch"
- Me.cboSpedbuch.Size = New System.Drawing.Size(200, 21)
- Me.cboSpedbuch.TabIndex = 103
- '
- 'MyComboBox3
- '
- Me.MyComboBox3._allowedValuesFreiText = Nothing
- Me.MyComboBox3._allowFreiText = False
- Me.MyComboBox3._value = ""
- Me.MyComboBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.MyComboBox3.FormattingEnabled = True
- Me.MyComboBox3.Location = New System.Drawing.Point(217, 106)
- Me.MyComboBox3.Name = "MyComboBox3"
- Me.MyComboBox3.Size = New System.Drawing.Size(198, 21)
- Me.MyComboBox3.TabIndex = 101
- '
'TabPage4
'
Me.TabPage4.Controls.Add(Me.txtTelotecSB)
@@ -595,33 +508,79 @@ Partial Class frmMitarbDetails
Me.Label43.TabIndex = 108
Me.Label43.Text = "EZOLL Sachbearbeiter:"
'
- 'cboEZOLL_SB
+ 'TabPage5
'
- Me.cboEZOLL_SB._allowedValuesFreiText = Nothing
- Me.cboEZOLL_SB._allowFreiText = False
- Me.cboEZOLL_SB._value = ""
- Me.cboEZOLL_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
- Me.cboEZOLL_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
- Me.cboEZOLL_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboEZOLL_SB.FormattingEnabled = True
- Me.cboEZOLL_SB.Location = New System.Drawing.Point(217, 29)
- Me.cboEZOLL_SB.Name = "cboEZOLL_SB"
- Me.cboEZOLL_SB.Size = New System.Drawing.Size(198, 21)
- Me.cboEZOLL_SB.TabIndex = 109
+ Me.TabPage5.Controls.Add(Me.cbxShowPW)
+ Me.TabPage5.Controls.Add(Me.lblCheckconnection)
+ Me.TabPage5.Controls.Add(Me.Button6)
+ Me.TabPage5.Controls.Add(Me.txtCSPW)
+ Me.TabPage5.Controls.Add(Me.Label58)
+ Me.TabPage5.Controls.Add(Me.txtCSUser)
+ Me.TabPage5.Controls.Add(Me.Label59)
+ Me.TabPage5.Location = New System.Drawing.Point(4, 22)
+ Me.TabPage5.Name = "TabPage5"
+ Me.TabPage5.Size = New System.Drawing.Size(442, 174)
+ Me.TabPage5.TabIndex = 2
+ Me.TabPage5.Text = "Zuordnung Creditsafe"
+ Me.TabPage5.UseVisualStyleBackColor = True
'
- 'cboATLAS_SB
+ 'lblCheckconnection
'
- Me.cboATLAS_SB._allowedValuesFreiText = Nothing
- Me.cboATLAS_SB._allowFreiText = False
- Me.cboATLAS_SB._value = ""
- Me.cboATLAS_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
- Me.cboATLAS_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
- Me.cboATLAS_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboATLAS_SB.FormattingEnabled = True
- Me.cboATLAS_SB.Location = New System.Drawing.Point(9, 29)
- Me.cboATLAS_SB.Name = "cboATLAS_SB"
- Me.cboATLAS_SB.Size = New System.Drawing.Size(200, 21)
- Me.cboATLAS_SB.TabIndex = 107
+ Me.lblCheckconnection.AutoSize = True
+ Me.lblCheckconnection.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.lblCheckconnection.Location = New System.Drawing.Point(131, 104)
+ Me.lblCheckconnection.Name = "lblCheckconnection"
+ Me.lblCheckconnection.Size = New System.Drawing.Size(0, 13)
+ Me.lblCheckconnection.TabIndex = 121
+ '
+ 'Button6
+ '
+ Me.Button6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+ Me.Button6.BackColor = System.Drawing.Color.White
+ Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button6.Location = New System.Drawing.Point(14, 97)
+ Me.Button6.Name = "Button6"
+ Me.Button6.Size = New System.Drawing.Size(88, 26)
+ Me.Button6.TabIndex = 53
+ Me.Button6.Text = "prüfen"
+ Me.Button6.UseVisualStyleBackColor = False
+ '
+ 'txtCSPW
+ '
+ Me.txtCSPW.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.txtCSPW.Location = New System.Drawing.Point(14, 71)
+ Me.txtCSPW.Name = "txtCSPW"
+ Me.txtCSPW.Size = New System.Drawing.Size(174, 20)
+ Me.txtCSPW.TabIndex = 120
+ Me.txtCSPW.UseSystemPasswordChar = True
+ '
+ 'Label58
+ '
+ Me.Label58.AutoSize = True
+ Me.Label58.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label58.Location = New System.Drawing.Point(11, 55)
+ Me.Label58.Name = "Label58"
+ Me.Label58.Size = New System.Drawing.Size(50, 13)
+ Me.Label58.TabIndex = 119
+ Me.Label58.Text = "Passwort"
+ '
+ 'txtCSUser
+ '
+ Me.txtCSUser.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.txtCSUser.Location = New System.Drawing.Point(12, 28)
+ Me.txtCSUser.Name = "txtCSUser"
+ Me.txtCSUser.Size = New System.Drawing.Size(176, 20)
+ Me.txtCSUser.TabIndex = 118
+ '
+ 'Label59
+ '
+ Me.Label59.AutoSize = True
+ Me.Label59.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label59.Location = New System.Drawing.Point(9, 12)
+ Me.Label59.Name = "Label59"
+ Me.Label59.Size = New System.Drawing.Size(49, 13)
+ Me.Label59.TabIndex = 117
+ Me.Label59.Text = "Benutzer"
'
'Label4
'
@@ -682,19 +641,23 @@ Partial Class frmMitarbDetails
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Firmendaten"
'
- 'cboFaktGrp
+ 'txtAbweichenderAnzeigename
'
- Me.cboFaktGrp._allowedValuesFreiText = Nothing
- Me.cboFaktGrp._allowFreiText = False
- Me.cboFaktGrp._value = ""
- Me.cboFaktGrp.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboFaktGrp.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboFaktGrp.FormattingEnabled = True
- Me.cboFaktGrp.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
- Me.cboFaktGrp.Location = New System.Drawing.Point(211, 155)
- Me.cboFaktGrp.Name = "cboFaktGrp"
- Me.cboFaktGrp.Size = New System.Drawing.Size(177, 21)
- Me.cboFaktGrp.TabIndex = 107
+ Me.txtAbweichenderAnzeigename.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.txtAbweichenderAnzeigename.Location = New System.Drawing.Point(399, 156)
+ Me.txtAbweichenderAnzeigename.Name = "txtAbweichenderAnzeigename"
+ Me.txtAbweichenderAnzeigename.Size = New System.Drawing.Size(148, 20)
+ Me.txtAbweichenderAnzeigename.TabIndex = 109
+ '
+ 'Label57
+ '
+ Me.Label57.AutoSize = True
+ Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label57.Location = New System.Drawing.Point(396, 140)
+ Me.Label57.Name = "Label57"
+ Me.Label57.Size = New System.Drawing.Size(151, 13)
+ Me.Label57.TabIndex = 110
+ Me.Label57.Text = "And. Anzeigename (Aviso,TV):"
'
'Label56
'
@@ -705,19 +668,6 @@ Partial Class frmMitarbDetails
Me.Label56.TabIndex = 108
Me.Label56.Text = "Fakturierungs-Gruppe:"
'
- 'cboALIASDomain2
- '
- Me.cboALIASDomain2._allowedValuesFreiText = Nothing
- Me.cboALIASDomain2._allowFreiText = False
- Me.cboALIASDomain2._value = ""
- Me.cboALIASDomain2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboALIASDomain2.FormattingEnabled = True
- Me.cboALIASDomain2.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
- Me.cboALIASDomain2.Location = New System.Drawing.Point(402, 60)
- Me.cboALIASDomain2.Name = "cboALIASDomain2"
- Me.cboALIASDomain2.Size = New System.Drawing.Size(116, 21)
- Me.cboALIASDomain2.TabIndex = 106
- '
'txtALIASUser2
'
Me.txtALIASUser2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -747,20 +697,6 @@ Partial Class frmMitarbDetails
Me.cboFirmaHaupt.Size = New System.Drawing.Size(57, 21)
Me.cboFirmaHaupt.TabIndex = 103
'
- 'cboTeam
- '
- Me.cboTeam._allowedValuesFreiText = Nothing
- Me.cboTeam._allowFreiText = False
- Me.cboTeam._value = ""
- Me.cboTeam.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboTeam.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboTeam.FormattingEnabled = True
- Me.cboTeam.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
- Me.cboTeam.Location = New System.Drawing.Point(399, 116)
- Me.cboTeam.Name = "cboTeam"
- Me.cboTeam.Size = New System.Drawing.Size(148, 21)
- Me.cboTeam.TabIndex = 101
- '
'Label53
'
Me.Label53.AutoSize = True
@@ -771,19 +707,6 @@ Partial Class frmMitarbDetails
Me.Label53.TabIndex = 102
Me.Label53.Text = "Team:"
'
- 'cboALIASDomain
- '
- Me.cboALIASDomain._allowedValuesFreiText = Nothing
- Me.cboALIASDomain._allowFreiText = False
- Me.cboALIASDomain._value = ""
- Me.cboALIASDomain.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboALIASDomain.FormattingEnabled = True
- Me.cboALIASDomain.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
- Me.cboALIASDomain.Location = New System.Drawing.Point(402, 37)
- Me.cboALIASDomain.Name = "cboALIASDomain"
- Me.cboALIASDomain.Size = New System.Drawing.Size(116, 21)
- Me.cboALIASDomain.TabIndex = 100
- '
'txtALIASUser
'
Me.txtALIASUser.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -823,31 +746,6 @@ Partial Class frmMitarbDetails
Me.Label45.TabIndex = 97
Me.Label45.Text = "Einsicht Firmen-Daten:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(Offene Posten, Umsätze, ... )"
'
- 'MyListBox1
- '
- Me.MyListBox1._value = ""
- Me.MyListBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.MyListBox1.FormattingEnabled = True
- Me.MyListBox1.Location = New System.Drawing.Point(551, 133)
- Me.MyListBox1.MultiColumn = True
- Me.MyListBox1.Name = "MyListBox1"
- Me.MyListBox1.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
- Me.MyListBox1.Size = New System.Drawing.Size(152, 95)
- Me.MyListBox1.TabIndex = 96
- '
- 'cboFirmaFMZOLL
- '
- Me.cboFirmaFMZOLL._allowedValuesFreiText = Nothing
- Me.cboFirmaFMZOLL._allowFreiText = False
- Me.cboFirmaFMZOLL._value = ""
- Me.cboFirmaFMZOLL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboFirmaFMZOLL.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboFirmaFMZOLL.FormattingEnabled = True
- Me.cboFirmaFMZOLL.Location = New System.Drawing.Point(210, 76)
- Me.cboFirmaFMZOLL.Name = "cboFirmaFMZOLL"
- Me.cboFirmaFMZOLL.Size = New System.Drawing.Size(178, 21)
- Me.cboFirmaFMZOLL.TabIndex = 95
- '
'Label39
'
Me.Label39.AutoSize = True
@@ -994,20 +892,6 @@ Partial Class frmMitarbDetails
Me.Label8.TabIndex = 1
Me.Label8.Text = "(erst bei Doppelklick sichtbar)"
'
- 'cboAbteilung
- '
- Me.cboAbteilung._allowedValuesFreiText = Nothing
- Me.cboAbteilung._allowFreiText = False
- Me.cboAbteilung._value = ""
- Me.cboAbteilung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboAbteilung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboAbteilung.FormattingEnabled = True
- Me.cboAbteilung.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
- Me.cboAbteilung.Location = New System.Drawing.Point(211, 116)
- Me.cboAbteilung.Name = "cboAbteilung"
- Me.cboAbteilung.Size = New System.Drawing.Size(177, 21)
- Me.cboAbteilung.TabIndex = 4
- '
'txtPwd
'
Me.txtPwd.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -1054,20 +938,6 @@ Partial Class frmMitarbDetails
Me.Label3.TabIndex = 56
Me.Label3.Text = "Username:"
'
- 'cboNiederlassung
- '
- Me.cboNiederlassung._allowedValuesFreiText = Nothing
- Me.cboNiederlassung._allowFreiText = False
- Me.cboNiederlassung._value = ""
- Me.cboNiederlassung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboNiederlassung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboNiederlassung.FormattingEnabled = True
- Me.cboNiederlassung.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
- Me.cboNiederlassung.Location = New System.Drawing.Point(18, 116)
- Me.cboNiederlassung.Name = "cboNiederlassung"
- Me.cboNiederlassung.Size = New System.Drawing.Size(177, 21)
- Me.cboNiederlassung.TabIndex = 3
- '
'Label9
'
Me.Label9.AutoSize = True
@@ -1439,19 +1309,6 @@ Partial Class frmMitarbDetails
Me.TabPage3.Text = "Programme"
Me.TabPage3.UseVisualStyleBackColor = True
'
- 'cboProgSprache
- '
- Me.cboProgSprache._allowedValuesFreiText = Nothing
- Me.cboProgSprache._allowFreiText = False
- Me.cboProgSprache._value = ""
- Me.cboProgSprache.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cboProgSprache.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.cboProgSprache.FormattingEnabled = True
- Me.cboProgSprache.Location = New System.Drawing.Point(16, 526)
- Me.cboProgSprache.Name = "cboProgSprache"
- Me.cboProgSprache.Size = New System.Drawing.Size(178, 21)
- Me.cboProgSprache.TabIndex = 120
- '
'Label55
'
Me.Label55.AutoSize = True
@@ -1893,23 +1750,261 @@ Partial Class frmMitarbDetails
Me.Label7.TabIndex = 78
Me.Label7.Text = "Berechtigung:"
'
- 'txtAbweichenderAnzeigename
+ 'cboDPFirma2
'
- Me.txtAbweichenderAnzeigename.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.txtAbweichenderAnzeigename.Location = New System.Drawing.Point(399, 156)
- Me.txtAbweichenderAnzeigename.Name = "txtAbweichenderAnzeigename"
- Me.txtAbweichenderAnzeigename.Size = New System.Drawing.Size(148, 20)
- Me.txtAbweichenderAnzeigename.TabIndex = 109
+ Me.cboDPFirma2._allowedValuesFreiText = Nothing
+ Me.cboDPFirma2._allowFreiText = False
+ Me.cboDPFirma2._value = ""
+ Me.cboDPFirma2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboDPFirma2.FormattingEnabled = True
+ Me.cboDPFirma2.Location = New System.Drawing.Point(106, 151)
+ Me.cboDPFirma2.Name = "cboDPFirma2"
+ Me.cboDPFirma2.Size = New System.Drawing.Size(101, 21)
+ Me.cboDPFirma2.TabIndex = 108
'
- 'Label57
+ 'cboDPFirma
'
- Me.Label57.AutoSize = True
- Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label57.Location = New System.Drawing.Point(396, 140)
- Me.Label57.Name = "Label57"
- Me.Label57.Size = New System.Drawing.Size(151, 13)
- Me.Label57.TabIndex = 110
- Me.Label57.Text = "And. Anzeigename (Aviso,TV):"
+ Me.cboDPFirma._allowedValuesFreiText = Nothing
+ Me.cboDPFirma._allowFreiText = False
+ Me.cboDPFirma._value = ""
+ Me.cboDPFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboDPFirma.FormattingEnabled = True
+ Me.cboDPFirma.Location = New System.Drawing.Point(7, 151)
+ Me.cboDPFirma.Name = "cboDPFirma"
+ Me.cboDPFirma.Size = New System.Drawing.Size(101, 21)
+ Me.cboDPFirma.TabIndex = 107
+ '
+ 'cboPersonal
+ '
+ Me.cboPersonal._allowedValuesFreiText = Nothing
+ Me.cboPersonal._allowFreiText = False
+ Me.cboPersonal._value = ""
+ Me.cboPersonal.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboPersonal.FormattingEnabled = True
+ Me.cboPersonal.Location = New System.Drawing.Point(7, 65)
+ Me.cboPersonal.Name = "cboPersonal"
+ Me.cboPersonal.Size = New System.Drawing.Size(200, 21)
+ Me.cboPersonal.TabIndex = 95
+ '
+ 'MyComboBox2
+ '
+ Me.MyComboBox2._allowedValuesFreiText = Nothing
+ Me.MyComboBox2._allowFreiText = False
+ Me.MyComboBox2._value = ""
+ Me.MyComboBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.MyComboBox2.FormattingEnabled = True
+ Me.MyComboBox2.Location = New System.Drawing.Point(9, 24)
+ Me.MyComboBox2.Name = "MyComboBox2"
+ Me.MyComboBox2.Size = New System.Drawing.Size(198, 21)
+ Me.MyComboBox2.TabIndex = 97
+ '
+ 'cboDP
+ '
+ Me.cboDP._allowedValuesFreiText = Nothing
+ Me.cboDP._allowFreiText = False
+ Me.cboDP._value = ""
+ Me.cboDP.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboDP.FormattingEnabled = True
+ Me.cboDP.Location = New System.Drawing.Point(217, 151)
+ Me.cboDP.Name = "cboDP"
+ Me.cboDP.Size = New System.Drawing.Size(198, 21)
+ Me.cboDP.TabIndex = 105
+ '
+ 'cboKasse
+ '
+ Me.cboKasse._allowedValuesFreiText = Nothing
+ Me.cboKasse._allowFreiText = False
+ Me.cboKasse._value = ""
+ Me.cboKasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboKasse.FormattingEnabled = True
+ Me.cboKasse.Location = New System.Drawing.Point(7, 106)
+ Me.cboKasse.Name = "cboKasse"
+ Me.cboKasse.Size = New System.Drawing.Size(200, 21)
+ Me.cboKasse.TabIndex = 99
+ '
+ 'cboSpedbuch
+ '
+ Me.cboSpedbuch._allowedValuesFreiText = Nothing
+ Me.cboSpedbuch._allowFreiText = False
+ Me.cboSpedbuch._value = ""
+ Me.cboSpedbuch.Enabled = False
+ Me.cboSpedbuch.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboSpedbuch.FormattingEnabled = True
+ Me.cboSpedbuch.Location = New System.Drawing.Point(217, 66)
+ Me.cboSpedbuch.Name = "cboSpedbuch"
+ Me.cboSpedbuch.Size = New System.Drawing.Size(200, 21)
+ Me.cboSpedbuch.TabIndex = 103
+ '
+ 'MyComboBox3
+ '
+ Me.MyComboBox3._allowedValuesFreiText = Nothing
+ Me.MyComboBox3._allowFreiText = False
+ Me.MyComboBox3._value = ""
+ Me.MyComboBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.MyComboBox3.FormattingEnabled = True
+ Me.MyComboBox3.Location = New System.Drawing.Point(217, 106)
+ Me.MyComboBox3.Name = "MyComboBox3"
+ Me.MyComboBox3.Size = New System.Drawing.Size(198, 21)
+ Me.MyComboBox3.TabIndex = 101
+ '
+ 'cboEZOLL_SB
+ '
+ Me.cboEZOLL_SB._allowedValuesFreiText = Nothing
+ Me.cboEZOLL_SB._allowFreiText = False
+ Me.cboEZOLL_SB._value = ""
+ Me.cboEZOLL_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
+ Me.cboEZOLL_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
+ Me.cboEZOLL_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboEZOLL_SB.FormattingEnabled = True
+ Me.cboEZOLL_SB.Location = New System.Drawing.Point(217, 29)
+ Me.cboEZOLL_SB.Name = "cboEZOLL_SB"
+ Me.cboEZOLL_SB.Size = New System.Drawing.Size(198, 21)
+ Me.cboEZOLL_SB.TabIndex = 109
+ '
+ 'cboATLAS_SB
+ '
+ Me.cboATLAS_SB._allowedValuesFreiText = Nothing
+ Me.cboATLAS_SB._allowFreiText = False
+ Me.cboATLAS_SB._value = ""
+ Me.cboATLAS_SB.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
+ Me.cboATLAS_SB.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
+ Me.cboATLAS_SB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboATLAS_SB.FormattingEnabled = True
+ Me.cboATLAS_SB.Location = New System.Drawing.Point(9, 29)
+ Me.cboATLAS_SB.Name = "cboATLAS_SB"
+ Me.cboATLAS_SB.Size = New System.Drawing.Size(200, 21)
+ Me.cboATLAS_SB.TabIndex = 107
+ '
+ 'cboFaktGrp
+ '
+ Me.cboFaktGrp._allowedValuesFreiText = Nothing
+ Me.cboFaktGrp._allowFreiText = False
+ Me.cboFaktGrp._value = ""
+ Me.cboFaktGrp.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboFaktGrp.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboFaktGrp.FormattingEnabled = True
+ Me.cboFaktGrp.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
+ Me.cboFaktGrp.Location = New System.Drawing.Point(211, 155)
+ Me.cboFaktGrp.Name = "cboFaktGrp"
+ Me.cboFaktGrp.Size = New System.Drawing.Size(177, 21)
+ Me.cboFaktGrp.TabIndex = 107
+ '
+ 'cboALIASDomain2
+ '
+ Me.cboALIASDomain2._allowedValuesFreiText = Nothing
+ Me.cboALIASDomain2._allowFreiText = False
+ Me.cboALIASDomain2._value = ""
+ Me.cboALIASDomain2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboALIASDomain2.FormattingEnabled = True
+ Me.cboALIASDomain2.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
+ Me.cboALIASDomain2.Location = New System.Drawing.Point(402, 60)
+ Me.cboALIASDomain2.Name = "cboALIASDomain2"
+ Me.cboALIASDomain2.Size = New System.Drawing.Size(116, 21)
+ Me.cboALIASDomain2.TabIndex = 106
+ '
+ 'cboTeam
+ '
+ Me.cboTeam._allowedValuesFreiText = Nothing
+ Me.cboTeam._allowFreiText = False
+ Me.cboTeam._value = ""
+ Me.cboTeam.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboTeam.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboTeam.FormattingEnabled = True
+ Me.cboTeam.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
+ Me.cboTeam.Location = New System.Drawing.Point(399, 116)
+ Me.cboTeam.Name = "cboTeam"
+ Me.cboTeam.Size = New System.Drawing.Size(148, 21)
+ Me.cboTeam.TabIndex = 101
+ '
+ 'cboALIASDomain
+ '
+ Me.cboALIASDomain._allowedValuesFreiText = Nothing
+ Me.cboALIASDomain._allowFreiText = False
+ Me.cboALIASDomain._value = ""
+ Me.cboALIASDomain.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboALIASDomain.FormattingEnabled = True
+ Me.cboALIASDomain.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
+ Me.cboALIASDomain.Location = New System.Drawing.Point(402, 37)
+ Me.cboALIASDomain.Name = "cboALIASDomain"
+ Me.cboALIASDomain.Size = New System.Drawing.Size(116, 21)
+ Me.cboALIASDomain.TabIndex = 100
+ '
+ 'MyListBox1
+ '
+ Me.MyListBox1._value = ""
+ Me.MyListBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.MyListBox1.FormattingEnabled = True
+ Me.MyListBox1.Location = New System.Drawing.Point(551, 133)
+ Me.MyListBox1.MultiColumn = True
+ Me.MyListBox1.Name = "MyListBox1"
+ Me.MyListBox1.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
+ Me.MyListBox1.Size = New System.Drawing.Size(152, 95)
+ Me.MyListBox1.TabIndex = 96
+ '
+ 'cboFirmaFMZOLL
+ '
+ Me.cboFirmaFMZOLL._allowedValuesFreiText = Nothing
+ Me.cboFirmaFMZOLL._allowFreiText = False
+ Me.cboFirmaFMZOLL._value = ""
+ Me.cboFirmaFMZOLL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboFirmaFMZOLL.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboFirmaFMZOLL.FormattingEnabled = True
+ Me.cboFirmaFMZOLL.Location = New System.Drawing.Point(210, 76)
+ Me.cboFirmaFMZOLL.Name = "cboFirmaFMZOLL"
+ Me.cboFirmaFMZOLL.Size = New System.Drawing.Size(178, 21)
+ Me.cboFirmaFMZOLL.TabIndex = 95
+ '
+ 'cboAbteilung
+ '
+ Me.cboAbteilung._allowedValuesFreiText = Nothing
+ Me.cboAbteilung._allowFreiText = False
+ Me.cboAbteilung._value = ""
+ Me.cboAbteilung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboAbteilung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboAbteilung.FormattingEnabled = True
+ Me.cboAbteilung.Items.AddRange(New Object() {"Buchhaltung", "EDV", "Fiskal", "Geschäftsführung", "Lager", "MDM", "quick-stop", "Verrechnung", "Zollabteilung"})
+ Me.cboAbteilung.Location = New System.Drawing.Point(211, 116)
+ Me.cboAbteilung.Name = "cboAbteilung"
+ Me.cboAbteilung.Size = New System.Drawing.Size(177, 21)
+ Me.cboAbteilung.TabIndex = 4
+ '
+ 'cboNiederlassung
+ '
+ Me.cboNiederlassung._allowedValuesFreiText = Nothing
+ Me.cboNiederlassung._allowFreiText = False
+ Me.cboNiederlassung._value = ""
+ Me.cboNiederlassung.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboNiederlassung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboNiederlassung.FormattingEnabled = True
+ Me.cboNiederlassung.Items.AddRange(New Object() {"Suben", "Salzburg", "Waidhaus", "Nickelsdorf"})
+ Me.cboNiederlassung.Location = New System.Drawing.Point(18, 116)
+ Me.cboNiederlassung.Name = "cboNiederlassung"
+ Me.cboNiederlassung.Size = New System.Drawing.Size(177, 21)
+ Me.cboNiederlassung.TabIndex = 3
+ '
+ 'cboProgSprache
+ '
+ Me.cboProgSprache._allowedValuesFreiText = Nothing
+ Me.cboProgSprache._allowFreiText = False
+ Me.cboProgSprache._value = ""
+ Me.cboProgSprache.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+ Me.cboProgSprache.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cboProgSprache.FormattingEnabled = True
+ Me.cboProgSprache.Location = New System.Drawing.Point(16, 526)
+ Me.cboProgSprache.Name = "cboProgSprache"
+ Me.cboProgSprache.Size = New System.Drawing.Size(178, 21)
+ Me.cboProgSprache.TabIndex = 120
+ '
+ 'cbxShowPW
+ '
+ Me.cbxShowPW.AutoSize = True
+ Me.cbxShowPW.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.cbxShowPW.Location = New System.Drawing.Point(206, 74)
+ Me.cbxShowPW.Name = "cbxShowPW"
+ Me.cbxShowPW.Size = New System.Drawing.Size(69, 17)
+ Me.cbxShowPW.TabIndex = 94
+ Me.cbxShowPW.Text = "anzeigen"
+ Me.cbxShowPW.UseVisualStyleBackColor = True
'
'frmMitarbDetails
'
@@ -1936,6 +2031,8 @@ Partial Class frmMitarbDetails
Me.TabPage2.PerformLayout()
Me.TabPage4.ResumeLayout(False)
Me.TabPage4.PerformLayout()
+ Me.TabPage5.ResumeLayout(False)
+ Me.TabPage5.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
@@ -2105,4 +2202,12 @@ Partial Class frmMitarbDetails
Friend WithEvents Label56 As Label
Friend WithEvents txtAbweichenderAnzeigename As TextBox
Friend WithEvents Label57 As Label
+ Friend WithEvents TabPage5 As TabPage
+ Friend WithEvents lblCheckconnection As Label
+ Friend WithEvents Button6 As Button
+ Friend WithEvents txtCSPW As TextBox
+ Friend WithEvents Label58 As Label
+ Friend WithEvents txtCSUser As TextBox
+ Friend WithEvents Label59 As Label
+ Friend WithEvents cbxShowPW As CheckBox
End Class
diff --git a/UID/Mitarbeiter/frmMitarbDetails.resx b/UID/Mitarbeiter/frmMitarbDetails.resx
index a4c7566..edff54f 100644
--- a/UID/Mitarbeiter/frmMitarbDetails.resx
+++ b/UID/Mitarbeiter/frmMitarbDetails.resx
@@ -121,7 +121,7 @@
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
- wQAADsEBuJFr7QAAAhBJREFUWEftlbFKA1EQRQP5FyG1fyBp/ANT2KYxWNkm+AExtYipLASDlYVpRBSC
+ vAAADrwBlbxySQAAAhBJREFUWEftlbFKA1EQRQP5FyG1fyBp/ANT2KYxWNkm+AExtYipLASDlYVpRBSC
RRoDQbBYEItAFLQwksJi9Qy5j8ljG5vdZgdmd959M3fuzEaspAVbKaAUUApYE/CzWJjH9h/cn+M46y4I
eBuN0ptq1XzcaKzQ1GLhD/V6OhsODectnFoI72u1UM85jpWrWvAgYNrphCSIMBXS+LnXMxwHT/r9kP86
GKyd4dJAPtaZXA1pApbzuV1Crolp8pUkFj+2WpaMCM4QkocwzhKnM4LwOOZePRCCmQCp50ICPieTsCru
diff --git a/UID/Mitarbeiter/frmMitarbDetails.vb b/UID/Mitarbeiter/frmMitarbDetails.vb
index 68ac2ee..8d8bb64 100644
--- a/UID/Mitarbeiter/frmMitarbDetails.vb
+++ b/UID/Mitarbeiter/frmMitarbDetails.vb
@@ -1,4 +1,15 @@
-Public Class frmMitarbDetails
+
+Imports System.IO
+Imports System.Net
+Imports System.Net.Http
+Imports System.Net.WebRequestMethods
+Imports System.Security.Policy
+Imports System.Text
+Imports System.Windows
+Imports Newtonsoft.Json
+Imports VERAG_PROG_ALLGEMEIN
+
+Public Class frmMitarbDetails
Private UID As New cMitarbeiter
Private berechtigungen As New List(Of cBerechtigungen)
@@ -251,6 +262,8 @@
txtDakosySB.Text = mitarbeiter.mit_DAKOSY_SB
txtDyFullName.Text = If(mitarbeiter.mit_DAKOSY_SBFull, "")
txtTelotecSB.Text = mitarbeiter.mit_TELOTEC_SB
+ txtCSUser.Text = mitarbeiter.mit_CSuser
+ txtCSPW.Text = mitarbeiter.mit_CSpwd
cboALIASDomain.changeItem(mitarbeiter.mit_AliasAD_Domain)
txtALIASUser.Text = mitarbeiter.mit_AliasAD_Username
@@ -523,6 +536,8 @@
mitarbeiter.mit_AliasAD_Domain2 = cboALIASDomain2._value
mitarbeiter.mit_AliasAD_Username2 = txtALIASUser2.Text
mitarbeiter.mit_teamId = If(cboTeam._value = "", Nothing, cboTeam._value)
+ mitarbeiter.mit_CSuser = txtCSUser.Text
+ mitarbeiter.mit_CSpwd = txtCSPW.Text
@@ -834,4 +849,35 @@
End If
cboFirmaHaupt.Enabled = (cboFirma.Text = "ALLE")
End Sub
-End Class
\ No newline at end of file
+
+ Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
+
+ lblCheckconnection.Text = ""
+
+ If txtCSUser.Text = "" Then
+ lblCheckconnection.Text = "User ist leer!"
+ Exit Sub
+ End If
+ If txtCSPW.Text = "" Then
+ lblCheckconnection.Text = "Passwort ist leer!"
+ Exit Sub
+ End If
+
+ Dim cs = New cCreditSafeAPI
+ Dim statuscode = cs.authenticate(txtCSUser.Text, txtCSPW.Text)
+ Select Case statuscode
+
+ Case 200 : lblCheckconnection.Text = "Zugangsdaten OK"
+
+ Case Else
+ lblCheckconnection.Text = "User konnte nicht authentifiziert werden (" & statuscode & ")"
+
+ End Select
+
+ End Sub
+
+ Private Sub cbxShowPW_CheckedChanged(sender As Object, e As EventArgs) Handles cbxShowPW.CheckedChanged
+ txtCSPW.UseSystemPasswordChar = Not cbxShowPW.Checked
+ End Sub
+End Class
+
diff --git a/UID/cSqlDb.vb b/UID/cSqlDb.vb
index 9221f04..9286197 100644
--- a/UID/cSqlDb.vb
+++ b/UID/cSqlDb.vb
@@ -1550,8 +1550,8 @@ Public Class cMitarbeiter
'Änderung
Dim sql = "INSERT INTO tblMitarbeiter " &
- "(mit_username,mit_abweichenderAnzeigename, mit_pwd, mit_geschlecht, mit_affix, mit_vname, mit_nname, mit_gebdat, mit_strasse,mit_hausnr,mit_land,mit_plz,mit_ort,mit_niederlassung, mit_abteilung, mit_position, mit_durchwahl, mit_email, mit_mobiltel, mit_allowAnruf,mit_info, mit_einstiegsdatum, mit_gekuendigt, mit_kuendigungsdatum, mit_foto,mit_firma,mit_firmaFMZoll,mit_FMZollPersID,mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch,mit_standartFiliale,mit_DpUserStandardDP,mit_EZOLL_SB,mit_ATLAS_SB,mit_FirmenDatenAnzeige,mit_DAKOSY_SB,mit_DAKOSY_SBFull,mit_DpUserStandardFirma,mit_DpUserStandardFirma2,mit_TESTonly,mit_PasswortChanged,mit_TELOTEC_SB,mit_AliasAD_Domain,mit_AliasAD_Username,mit_AliasAD_Domain2,mit_AliasAD_Username2,mit_teamId,mit_ChatBenutzer,mit_FirmaHaupt,mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname,mit_foto_DocId,mit_MAVerzeichnis_Motto,mit_sprache,mit_fakturierungsgruppe ) VALUES " &
- "(@mit_username,@mit_abweichenderAnzeigename,@mit_pwd,@mit_geschlecht,@mit_affix,@mit_vname,@mit_nname,@mit_gebdat,@mit_strasse,@mit_hausnr,@mit_land,@mit_plz,@mit_ort,@mit_niederlassung,@mit_abteilung,@mit_position,@mit_durchwahl,@mit_email,@mit_mobiltel,@mit_allowAnruf,@mit_info,@mit_einstiegsdatum,@mit_gekuendigt,@mit_kuendigungsdatum,@mit_foto,@mit_firma,@mit_firmaFMZoll,@mit_FMZollPersID,@mit_FMZollPersIDKasseIsnotSpedBuch,@mit_FMZollPersIDSpedBuch,@mit_standartFiliale,@mit_DpUserStandardDP,@mit_EZOLL_SB,@mit_ATLAS_SB,@mit_FirmenDatenAnzeige,@mit_DAKOSY_SB,@mit_DAKOSY_SBFull,@mit_DpUserStandardFirma,@mit_DpUserStandardFirma2,@mit_TESTonly,@mit_PasswortChanged,@mit_TELOTEC_SB,@mit_AliasAD_Domain,@mit_AliasAD_Username,@mit_AliasAD_Domain2,@mit_AliasAD_Username2,@mit_teamId,@mit_ChatBenutzer,@mit_FirmaHaupt,@mit_ChatEasteregg,@mit_MAVerzeichnis_SettingsTstmp,@mit_MAVerzeichnis_allowGebDat,@mit_MAVerzeichnis_allowWohnadresse,@mit_MAVerzeichnis_allowGebDatOhneJahr,@mit_MAVerzeichnis_Spitzname,@mit_foto_DocId,@mit_MAVerzeichnis_Motto ,@mit_sprache,@mit_fakturierungsgruppe )"
+ "(mit_username,mit_abweichenderAnzeigename, mit_pwd, mit_geschlecht, mit_affix, mit_vname, mit_nname, mit_gebdat, mit_strasse,mit_hausnr,mit_land,mit_plz,mit_ort,mit_niederlassung, mit_abteilung, mit_position, mit_durchwahl, mit_email, mit_mobiltel, mit_allowAnruf,mit_info, mit_einstiegsdatum, mit_gekuendigt, mit_kuendigungsdatum, mit_foto,mit_firma,mit_firmaFMZoll,mit_FMZollPersID,mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch,mit_standartFiliale,mit_DpUserStandardDP,mit_EZOLL_SB,mit_ATLAS_SB,mit_FirmenDatenAnzeige,mit_DAKOSY_SB,mit_DAKOSY_SBFull,mit_DpUserStandardFirma,mit_DpUserStandardFirma2,mit_TESTonly,mit_PasswortChanged,mit_TELOTEC_SB,mit_AliasAD_Domain,mit_AliasAD_Username,mit_AliasAD_Domain2,mit_AliasAD_Username2,mit_teamId,mit_ChatBenutzer,mit_FirmaHaupt,mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname,mit_foto_DocId,mit_MAVerzeichnis_Motto,mit_sprache,mit_fakturierungsgruppe, mit_CSuser, mit_CSpwd ) VALUES " &
+ "(@mit_username,@mit_abweichenderAnzeigename,@mit_pwd,@mit_geschlecht,@mit_affix,@mit_vname,@mit_nname,@mit_gebdat,@mit_strasse,@mit_hausnr,@mit_land,@mit_plz,@mit_ort,@mit_niederlassung,@mit_abteilung,@mit_position,@mit_durchwahl,@mit_email,@mit_mobiltel,@mit_allowAnruf,@mit_info,@mit_einstiegsdatum,@mit_gekuendigt,@mit_kuendigungsdatum,@mit_foto,@mit_firma,@mit_firmaFMZoll,@mit_FMZollPersID,@mit_FMZollPersIDKasseIsnotSpedBuch,@mit_FMZollPersIDSpedBuch,@mit_standartFiliale,@mit_DpUserStandardDP,@mit_EZOLL_SB,@mit_ATLAS_SB,@mit_FirmenDatenAnzeige,@mit_DAKOSY_SB,@mit_DAKOSY_SBFull,@mit_DpUserStandardFirma,@mit_DpUserStandardFirma2,@mit_TESTonly,@mit_PasswortChanged,@mit_TELOTEC_SB,@mit_AliasAD_Domain,@mit_AliasAD_Username,@mit_AliasAD_Domain2,@mit_AliasAD_Username2,@mit_teamId,@mit_ChatBenutzer,@mit_FirmaHaupt,@mit_ChatEasteregg,@mit_MAVerzeichnis_SettingsTstmp,@mit_MAVerzeichnis_allowGebDat,@mit_MAVerzeichnis_allowWohnadresse,@mit_MAVerzeichnis_allowGebDatOhneJahr,@mit_MAVerzeichnis_Spitzname,@mit_foto_DocId,@mit_MAVerzeichnis_Motto ,@mit_sprache,@mit_fakturierungsgruppe, @mit_CSuser, @mit_CSpwd )"
@@ -1621,6 +1621,8 @@ Public Class cMitarbeiter
cmd.Parameters.AddWithValue("@mit_MAVerzeichnis_Motto", If(m.mit_MAVerzeichnis_Motto, DBNull.Value))
cmd.Parameters.AddWithValue("@mit_sprache", m.mit_sprache)
cmd.Parameters.AddWithValue("@mit_fakturierungsgruppe", m.mit_fakturierungsgruppe)
+ cmd.Parameters.AddWithValue("@mit_CSuser", If(m.mit_CSuser, DBNull.Value))
+ cmd.Parameters.AddWithValue("@mit_CSpwd", If(m.mit_CSpwd, DBNull.Value))
Try
@@ -1640,7 +1642,7 @@ Public Class cMitarbeiter
Dim sql = "UPDATE tblMitarbeiter " &
"SET mit_username=@mit_username, mit_abweichenderAnzeigename=@mit_abweichenderAnzeigename,mit_pwd=@mit_pwd, mit_geschlecht=@mit_geschlecht, mit_affix=@mit_affix, mit_vname=@mit_vname, mit_nname=@mit_nname, mit_gebdat=@mit_gebdat, mit_strasse=@mit_strasse, mit_hausnr=@mit_hausnr, mit_land=@mit_land, mit_plz=@mit_plz, mit_ort=@mit_ort, mit_niederlassung=@mit_niederlassung, mit_abteilung=@mit_abteilung, mit_position=@mit_position, mit_durchwahl=@mit_durchwahl, mit_email=@mit_email, mit_mobiltel=@mit_mobiltel, mit_allowAnruf=@mit_allowAnruf, mit_info=@mit_info, mit_einstiegsdatum=@mit_einstiegsdatum, mit_gekuendigt=@mit_gekuendigt, mit_kuendigungsdatum=@mit_kuendigungsdatum, mit_foto=@mit_foto, mit_firma=@mit_firma,mit_firmaFMZoll=@mit_firmaFMZoll,mit_FMZollPersID=@mit_FMZollPersID, mit_FMZollPersIDKasseIsnotSpedBuch=@mit_FMZollPersIDKasseIsnotSpedBuch,mit_FMZollPersIDSpedBuch=@mit_FMZollPersIDSpedBuch,mit_standartFiliale=@mit_standartFiliale,mit_standardPreisliste=@mit_standardPreisliste,mit_DpUserStandardDP=@mit_DpUserStandardDP, mit_EZOLL_SB=@mit_EZOLL_SB, mit_ATLAS_SB=@mit_ATLAS_SB,mit_FirmenDatenAnzeige=@mit_FirmenDatenAnzeige,mit_DAKOSY_SB=@mit_DAKOSY_SB, mit_DAKOSY_SBFull=@mit_DAKOSY_SBFull ,mit_DpUserStandardFirma=@mit_DpUserStandardFirma,mit_DpUserStandardFirma2=@mit_DpUserStandardFirma2, mit_TESTonly=@mit_TESTonly,mit_PasswortChanged=@mit_PasswortChanged,mit_TELOTEC_SB=@mit_TELOTEC_SB,mit_AliasAD_Domain=@mit_AliasAD_Domain,mit_AliasAD_Username=@mit_AliasAD_Username,mit_AliasAD_Domain2=@mit_AliasAD_Domain2,mit_AliasAD_Username2=@mit_AliasAD_Username2,mit_teamId=@mit_teamId,mit_ChatBenutzer=@mit_ChatBenutzer,mit_FirmaHaupt=@mit_FirmaHaupt " &
- " ,mit_ChatEasteregg=@mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp=@mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat=@mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse=@mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr=@mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname=@mit_MAVerzeichnis_Spitzname,mit_foto_DocId=@mit_foto_DocId,mit_MAVerzeichnis_Motto=@mit_MAVerzeichnis_Motto,mit_sprache=@mit_sprache,mit_fakturierungsgruppe=@mit_fakturierungsgruppe " &
+ " ,mit_ChatEasteregg=@mit_ChatEasteregg,mit_MAVerzeichnis_SettingsTstmp=@mit_MAVerzeichnis_SettingsTstmp,mit_MAVerzeichnis_allowGebDat=@mit_MAVerzeichnis_allowGebDat,mit_MAVerzeichnis_allowWohnadresse=@mit_MAVerzeichnis_allowWohnadresse,mit_MAVerzeichnis_allowGebDatOhneJahr=@mit_MAVerzeichnis_allowGebDatOhneJahr,mit_MAVerzeichnis_Spitzname=@mit_MAVerzeichnis_Spitzname,mit_foto_DocId=@mit_foto_DocId,mit_MAVerzeichnis_Motto=@mit_MAVerzeichnis_Motto,mit_sprache=@mit_sprache,mit_fakturierungsgruppe=@mit_fakturierungsgruppe, mit_CSuser=@mit_CSuser, mit_CSpwd=@mit_CSpwd " &
" WHERE mit_id=@mit_id "
@@ -1712,6 +1714,8 @@ Public Class cMitarbeiter
cmd.Parameters.AddWithValue("@mit_MAVerzeichnis_Motto", If(m.mit_MAVerzeichnis_Motto, DBNull.Value))
cmd.Parameters.AddWithValue("@mit_sprache", m.mit_sprache)
cmd.Parameters.AddWithValue("@mit_fakturierungsgruppe", m.mit_fakturierungsgruppe)
+ cmd.Parameters.AddWithValue("@mit_CSuser", If(m.mit_CSuser, DBNull.Value))
+ cmd.Parameters.AddWithValue("@mit_CSpwd", If(m.mit_CSpwd, DBNull.Value))