Skip to content

Commit d609e76

Browse files
committed
fixed download bug when LocalParentMustFolder is not set up
1 parent 717ba9b commit d609e76

1 file changed

Lines changed: 6 additions & 2 deletions

File tree

CompuMaster.Dms.BrowserUI/DmsBrowser.vb

Lines changed: 6 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -680,8 +680,10 @@ Public Class DmsBrowser
680680
Dim TargetFile As String = f.FileName
681681
Me.DmsProvider.DownloadFile(SelectedFiles(0).FullName, TargetFile, SelectedFiles(0).LastModificationOnLocalTime)
682682
System.Windows.Forms.MessageBox.Show(Me, "Download erfolgreich", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Information)
683-
Else
683+
ElseIf Me.LocalParentMustFolder <> Nothing Then
684684
System.Windows.Forms.MessageBox.Show(Me, "Bereitstellung außerhalb des Ordners """ & Me.LocalParentMustFolder & """ ist nicht unterstützt", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
685+
Else
686+
'just okay
685687
End If
686688
Else
687689
System.Windows.Forms.MessageBox.Show(Me, "Vorgang durch Benutzer abgebrochen", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
@@ -731,8 +733,10 @@ Public Class DmsBrowser
731733
End If
732734
Next
733735
System.Windows.Forms.MessageBox.Show(Me, "Download erfolgreich", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Information)
734-
Else
736+
ElseIf Me.LocalParentMustFolder <> Nothing Then
735737
System.Windows.Forms.MessageBox.Show(Me, "Bereitstellung außerhalb des Ordners """ & Me.LocalParentMustFolder & """ ist nicht unterstützt", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
738+
Else
739+
'just okay
736740
End If
737741
Else
738742
System.Windows.Forms.MessageBox.Show(Me, "Vorgang durch Benutzer abgebrochen", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)

0 commit comments

Comments
 (0)