MS - Updateverhalten PRoxyserver

This commit is contained in:
Digital Data - Marlon Schreiber
2017-04-25 16:48:42 +02:00
parent 5a00b63de1
commit 1d18370ec0
6 changed files with 659 additions and 920 deletions

View File

@@ -196,9 +196,9 @@
End Function
Public Shared Function UpdateControl(control As Control, properties As Object)
Try
' Nach Typ den Update Befehl anpassen
Dim type As String = control.GetType.Name
' Try
' Nach Typ den Update Befehl anpassen
Dim type As String = control.GetType.Name
Dim SQL As String
Dim NAME As String
@@ -355,11 +355,11 @@
Else
Throw New Exception()
End If
Catch ex As Exception
ClassLogger.Add("Unexpected Error in UpdateControl: " & ex.Message, True)
MsgBox("Unexpected Error in UpdateControl:" + vbNewLine + ex.Message, MsgBoxStyle.Critical)
Return False
End Try
'Catch ex As Exception
' ClassLogger.Add("Unexpected Error in UpdateControl: " & ex.Message, True)
' MsgBox("Unexpected Error in UpdateControl:" + vbNewLine + ex.Message, MsgBoxStyle.Critical)
' Return False
'End Try
End Function
Public Shared Function UpdateControlScreen(control As Control, properties As Object)