FIXED AND ALL WORKING:
The fail was in the reading binary part.
SOLUTION:
Dim B() As Byte
srcFile = "a.jpg"
Open srcFile For Binary Access Read As #1
ReDim B(LOF(1) - 1)
Get #1, , B
Close #1
On Error GoTo ErrorHandlerPush
mObjectPush.Put srcFile, B
ErrorHandlerPush:
listLog.AddItem Err.Description