This commit is contained in:
SchreiberM
2016-06-27 17:11:46 +02:00
7 changed files with 2600 additions and 2796 deletions

View File

@@ -5362,4 +5362,11 @@ Public Class frmConstructor_Main
MsgBox("Unexpected Error in getting the filename: " & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub DateiMitDatensatzVerknüpfenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DateiMitDatensatzVerknüpfenToolStripMenuItem.Click
Dim fileName As String = RESULT_DOC_PATH
Dim frm As New frmWD_Link_to_Record(fileName)
frm.Show()
End Sub
End Class