MS Notification
This commit is contained in:
@@ -101,7 +101,7 @@ Public Class frmNotification_Startup
|
||||
Next
|
||||
End If
|
||||
|
||||
If oType = "MESSAGE" Then
|
||||
If oType.ToUpper = "MESSAGE" Then
|
||||
RichEditControl1.Text = oMSG_STRING
|
||||
RichEditControl1.Visible = True
|
||||
RichEditControl1.Dock = Windows.Forms.DockStyle.Fill
|
||||
@@ -159,13 +159,16 @@ Public Class frmNotification_Startup
|
||||
If oSuccess = False Then
|
||||
lbStatus.Caption = "Error while setting History!"
|
||||
lbStatus.ItemAppearance.Normal.BackColor = Color.Red
|
||||
lbStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
Else
|
||||
lbStatus.Caption = "History successfully saved!"
|
||||
lbStatus.ItemAppearance.Normal.BackColor = Color.Green
|
||||
lbStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
If _NotificationsTable.Rows.Count = 1 Then
|
||||
Me.Close()
|
||||
End If
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
Dim oMsgBox As New frmDialog(ex.Message, "Unexpected Error HistoryInsert:", frmDialog.DialogType.Error)
|
||||
oMsgBox.ShowDialog()
|
||||
|
||||
Reference in New Issue
Block a user