Dim aAllDataB
aAllDataB = Request.BinaryRead(Request.TotalBytes)

Вроде, работает, но по странным причинам иногда вываливается на строке Request.BinaryRead(Request.TotalBytes) с ошибкой 500.
Закономерности не вижу, иногда берет и файлы размера 100 метров, иногда и 2к не желает
Помогите, кто может, или подскажите нормальный фришный аплоадер