dim b as new byte()
b=dr.GetBytes(fileDataCol, 0, null, 0, int.MaxValue)