massValidator

This commit is contained in:
Digital Data - Marlon Schreiber
2019-05-23 10:02:54 +02:00
parent 7476639397
commit 74cb20b4ec
7 changed files with 788 additions and 891 deletions

View File

@@ -19,6 +19,7 @@ Public Class frmKonfig
End Sub
Private Sub frmKonfig_Load(sender As Object, e As System.EventArgs) Handles Me.Load
Try
If VIEWER_ALL = "uviewer" Then
rbuviewer.Checked = True
Else
@@ -377,4 +378,26 @@ Public Class frmKonfig
Private Sub RadioAlternativeConnection_CheckedChanged(sender As Object, e As EventArgs) Handles RadioAlternativeConnection.CheckedChanged
txtActualConnection.Text = MaskConnectionStringPassword(CONFIG.Config.ConnectionStringTest)
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Dim di As New IO.DirectoryInfo(Application.UserAppDataPath())
Dim diar1 As IO.FileInfo() = di.GetFiles()
Dim dra As IO.FileInfo
'list the names of all files in the specified directory
For Each dra In diar1
If dra.Name <> "UserConfig.xml" Then
Try
System.IO.File.Delete(dra.FullName)
LOGGER.Info($"ConfigFile {dra.FullName} has been deleted!")
Catch ex As Exception
End Try
End If
Next
MsgBox("The UserConfiguration has been set back to default!", MsgBoxStyle.OkOnly)
End Sub
End Class