You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

23 lines
571 B

Imports PluginContracts
Public Class Class1
Implements PluginContracts.IPlugin
Public ReadOnly Property Name() As String Implements IPlugin.Name
Get
Return "Scan_To_EDOKA"
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 frmDokMgmt
Try
f.MdiParent = Parentform
Catch
End Try
f.Show()
End Function
End Class