This commit is contained in:
SchreiberM
2017-01-04 17:09:26 +01:00
128 changed files with 17813 additions and 20419 deletions

View File

@@ -9,7 +9,7 @@ Public Class ClassFunctionCommandsUI
reminder.AlertTime = DueDateTime
apt.Reminders.Add(reminder)
Dim Value = ClassDatabase.Execute_Scalar(SQL)
Dim Value = ClassDatabase.Execute_Scalar(SQL, True)
If Value Is Nothing Then
apt.Subject = Subject & " - " & Value.ToString()
Else
@@ -37,7 +37,7 @@ Public Class ClassFunctionCommandsUI
reminder.AlertTime = DueDateTime
apt.Reminders.Add(reminder)
Dim Value = ClassDatabase.Execute_Scalar(SQL)
Dim Value = ClassDatabase.Execute_Scalar(SQL, True)
apt.Subject = Subject & " - " & Value.ToString()
apt.Description = Description