Updaet Version 1.6 - 20121221

This commit is contained in:
2021-12-21 09:16:21 +01:00
parent 78bb82c44d
commit 216c1102cd
51 changed files with 24 additions and 9 deletions

View File

@@ -55,12 +55,12 @@
Me.Height = Me.Height + 227
Me.cbboxKontaktFB.BeginUpdate()
Me.cbboxKontaktSD.BeginUpdate()
If VerantwTKBMA_Data.Rows.Count = 0 Then Datenklasse.Get_Stammdaten("Personal", "Bezeichznung")
'If VerantwTKBMA_Data.Rows.Count = 0 Then Datenklasse.Get_Stammdaten("Personal", "Bezeichnung")
'kontaktfb = VerantwTKBMA_Data
'kontaktfb = Datenklasse.Get_Stammdaten("Personal", "Bezeichznung")
Me.cbboxKontaktFB.DataSource = Globals.VerantwTKBMA_Data
kontaktfb = Datenklasse.Get_Stammdaten("Personal", "Bezeichnung")
'Me.cbboxKontaktFB.DataSource = Globals.VerantwTKBMA_Data
'Me.cbboxKontaktFB.DataSource = kontaktfb
Me.cbboxKontaktFB.DataSource = kontaktfb
Me.cbboxKontaktFB.DisplayMember = "Bezeichnung"
Me.cbboxKontaktFB.ValueMember = "Keyvalue"
If KontaktSD_Data.Rows.Count = 0 Then KontaktSD_Data = Datenklasse.Get_Stammdaten("Servicedesk", "Bezeichnung")