Dim B64 As Base64
Dim by() As Byte
by = B64.DecodeStoB(mapJOB.Get("fieldcontainsab64data"))
'if lenght of mapJOB.Get("fieldcontainsab64data") is lover then 2MB is all right
' if my file greather than 2Mb i have error
'any suggestion for resolve this?