Imports PluginContracts
Public Class Class1
    Implements PluginContracts.IPlugin

    Public ReadOnly Property Name() As String Implements IPlugin.Name
        Get
            Return "EDOKA_Docm_Settings"
        End Get
    End Property

    Public Function Show(CurrentUser As String, Connectionstring As String, Parentform As Object) As Object Implements IPlugin.Show
        Globals.Mitarbeiternr = CurrentUser
        Dim f As New FrmDocmSettings
        f.MdiParent = Parentform
        f.Show()

    End Function

End Class