<%
Response.buffer = TRUE
Imagesize = request.totalbytes' Number of total bytes of submitted data volume
ImageData = Request.binaryRead (ImageSize) Saves data from the client read
'Optimize read binary data
BNCRLF = Chrb (13) & chr (10)
Divider = Leftb (ImageData, ClNG (IMAGEDATA, BNCRLF) - 1)
DStart = INSTRB (ImageData, Bncrlf & Bncrlf) 4
Dend = INSTRB (DSTART 1, ImageData, Divider) - DSTART
MyData = MIDB (imagedata, dstart, dend)
