Judging how the GIF image size

zhaozj2021-02-11  177

Judging how the GIF image size

Http://www.tongyi.net: 51study.com Click: 2127

Here is the method of judging the GIF image size according to the GIF image format. Please give some opinions up.htm

Please select the GIF picture you want to upload:

Up.asp <% FormSize = Request.TotalBytes FormData = Request.BinaryRead (FormSize) bncrlf = chrb (13) & chrb (10) divider = leftb (formdata, instrb (formdata, bncrlf) -1) datastart = instrb (formdata, bncrlf & bncrlf) 4 dataend = instrb (datastart 1, formdata, divider) -datastart Image = midb (formdata, datastart, dataend) head_version = Ascb (midb (Image, 1,3)) head_subversion = Ascb (midb (Image, 4,3)) head_width_l = ASCB (MIDB (Image, 7, 1)) HEAD_WIDTH_H = ASCB (MIDB (Image, 8, 1)) HEAD_HEIGHT_L = ASCB (MIDB (Image, 9, 1)) HEAD_HE ight_h = Ascb (midb (Image, 10,1)) head_colors = Ascb (midb (Image, 11, 1)) head_width_h = head_width_h * 256 head_height_h = head_height_h * 256 head_colors = head_colors And & H07 Response.Write "image size" & HEAD_WIDTH_H HEAD_WIDTH_L & "X" & Head_HEight_H Head_HEight_L _ & "X" & "

转载请注明原文地址:https://www.9cbs.com/read-5453.html

New Post(0)
CopyRight © 2020 All Rights Reserved
Processed: 0.041, SQL: 9