MS

app/DD-Record-Organizer/ClassControlCommandsUI.vb

@@ -821,6 +821,7 @@ Public Class ClassControlCommandsUI
             Dim AddedWho = USER_USERNAME
             Dim converted_value = Check_and_Format_Value(ControlID, RecordID, Value)
             If Not IsNothing(converted_value) Then
+                converted_value = converted_value.Replace("'", "´")
                 Dim ins As String = String.Format("INSERT INTO TBPMO_CONTROL_VALUE (CONTROL_ID, RECORD_ID, VALUE, ADDED_WHO) VALUES ({0}, {1}, '{2}', '{3}')", ControlID, RecordID, converted_value, AddedWho)
                 If LICENSE_PROXY = True Or clsDatabase.DB_PROXY_INITIALIZED = True Then
                     If ClassDatabase.Execute_non_Query(ins) = True Then