This commit is contained in:
SchreiberM
2016-05-25 16:53:42 +02:00
parent 48a12ca8c2
commit 6a20480e7c
7 changed files with 82 additions and 52 deletions

View File

@@ -252,6 +252,9 @@ Public Class frmConfig_Basic
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim fbdialog As New FolderBrowserDialog
If txtScanFolderWatch.Text <> "" Then
fbdialog.SelectedPath = txtScanFolderWatch.Text
End If
If fbdialog.ShowDialog() = DialogResult.OK Then
CheckScanFolder(fbdialog.SelectedPath)
End If