MS SQL Command IDB

This commit is contained in:
2022-05-17 10:13:15 +02:00
parent c1ffeb01e7
commit 11c7b4e5e9
14 changed files with 225 additions and 206 deletions

View File

@@ -441,15 +441,15 @@ Public Class frmDocumentResultList
Dim oDisplayName = pFile.Document.DisplayFileName
Dim oMessage = $"Die Datei '{oDisplayName}' wurde außerhalb des Systems verändert. Wollen Sie diese Änderung als neue Version in das System übernehmen oder überschreiben?"
Dim oMessageBox As New MsgBoxEx(oMessage, "Datei verändert", MessageBoxIcon.Question)
Dim oMessageBox As New NNMsgBoxEx(oMessage, "Datei verändert", MessageBoxIcon.Question)
oMessageBox.SetButtons("Überschreiben", "Neue Version", "Abbrechen")
oMessageBox.ShowDialog()
Select Case oMessageBox.Result
Case MsgBoxEx.DialogBoxResult.Button1
Case NNMsgBoxEx.DialogBoxResult.Button1
Await Watcher_OverwriteFile(pFile)
Case MsgBoxEx.DialogBoxResult.Button2
Case NNMsgBoxEx.DialogBoxResult.Button2
Await Watcher_VersionFile(pFile)
Case Else