[Visual Basic]
Private Sub Refresh_SLATable()
[Visual Basic] Private Sub Refresh_SLATable()
Try
check_changes()
Me.ServiceKatalogSLAKatalog.dispose()
Catch
End Try
Dim keyvalue As String = ""
keyvalue = Me.treeServiceKatalog.SelectedNode.Tag
Me.C1DatenSLA.Enabled = False
Me.ServiceKatalogSLAKatalog = New TKB.VV.Sysadmin.DomainTable("servicekatalog_slakatalog", keyvalue, Globals.clsmitarbeiter.iMitarbeiternr.Value)
Me.C1DatenSLA.DataSource = ServiceKatalogSLAKatalog.Tabledata
Me.C1DatenSLA.DataMember = ServiceKatalogSLAKatalog.Tabledata.Tables(0).TableName
Me.SpaltenTitel.Spaltentitel_aktualisieren(Me.C1DatenSLA, "servicekatalog_slakatalog", Me.ServiceKatalogSLAKatalog.Tabledata)
Me.C1DatenSLA.Enabled = True
End Sub
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition