add button to open input path

2019-06-17 14:54:51 +02:00
parent d3d669cf3a
commit 274a7134ad
2 changed files with 16 additions and 0 deletions
--- a/GUIs.Test.ZUGFeRDTest/Form1.vb
+++ b/GUIs.Test.ZUGFeRDTest/Form1.vb
@@ -130,4 +130,8 @@ Public Class Form1
        End Try

    End Function
+
+    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
+        Process.Start("\\dd-sto01\DD-STO01-A2\SharedObjects\Public\Projekte\Test\Import\ZUGFerD\Email_in")
+    End Sub
 End Class