This commit is contained in:
JenneJ 2015-10-20 10:28:41 +02:00
parent 8c71506f04
commit 16e858597e

View File

@ -152,7 +152,7 @@ Module Main
If prop = "MarkFeature" Then
If value = "wort-bildmarke" Or value = "bildmarke" Then
Dim imageControlId = db.GetControlId(formId, "MarkImage")
Dim bimage() As Byte = Image.ToByteArray(m.Image.BinaryImage)
Dim bimage() As Byte = Convert.FromBase64String(m.Image.BinaryImage)
db.UpdateImage(bimage, imageControlId, recordId)
End If
End If