private Sub SaveBlob(Column As String, data() As Byte)
Dim base64 As StringUtils
Dim encoded As String
encoded = base64.EncodeBase64(data)
Dim query As String = $"UPDATE Registrations SET ${Column} = ${"'"&encoded&"'"} WHERE UserName = ${"'"&Starter.userName&"'"} AND PinNumber = ${"'"&Starter.pinNumber&"'"}"$
Log(query)
Common.mysql.AddNonQueryToBatch(query, Null)
Dim SenderFilter As Object = Common.mysql.ExecNonQueryBatch("SQL")
Wait For (SenderFilter) SQL_NonQueryComplete (Success As Boolean)
Log("pictured saved: " & Success)
End Sub