ALTER PROCEDURE ImageSize
	@ImgID as int
AS

/* *******************************************************************************

Procedure usp_ImageSize returns the height and width of a specified image in the
Images table.

Inputs:

	@ImgID -	Integer containing the ID of the image for which to return
			height and width.

Outputs:

	A recorset is returned containing two columns - the first is the height in
	pixels of the image, and the second is the width in pixels of the image.

	If an invalid image ID is passed to the procedure, or the specified image
	has an invalid extension or MIME type, a null value is returned.

Example call:

	exec ImageSize 24

******************************************************************************* */

set nocount on
declare @MIMEType int
set @MIMEType = (select MIMEType from Images where [ID]=@ImgID)

if @MIMEType > 0 begin
	declare @ext char(3)
	declare @width int
	declare @height int
	declare @buf varbinary(10)
	declare @hb smallint
	declare @lb smallint
	set @ext = upper((select Extension from MIMETypes where [ID]=@MIMEType))
	if @ext = 'GIF' begin
		set @buf = (SELECT SUBSTRING(ImageData, 1, 10) FROM images where [ID]=@ImgID)
		set @hb = substring(@buf, 8, 1)
		set @lb = substring(@buf, 7, 1)
		set @width = (256 * @hb) + @lb
		set @hb = substring(@buf, 10, 1)
		set @lb = substring(@buf, 9, 1)
		set @height = (256 * @hb) + @lb
	end else begin
		if @ext = 'JPG' begin
			declare @fp int
			declare @subcode int
			set @subcode = 0
			set @fp = 3
			set @buf = (SELECT SUBSTRING(ImageData, 1, 10) FROM images where [ID]=@ImgID)
			set @hb = substring(@buf, 2, 1)
			set @lb = substring(@buf, 1, 1)
			if (@hb = 216) and (@lb = 255) begin
				while @subcode != 49407 begin
					set @buf = (SELECT SUBSTRING(ImageData, @fp, 10) FROM images where [ID]=@ImgID)
					set @hb = substring(@buf, 2, 1)
					set @lb = substring(@buf, 1, 1)
					set @hb = @hb & 240
					set @subcode = (256 * @hb) + @lb
					if @subcode = 49407 begin
						set @hb = substring(@buf, 6, 1)
						set @lb = substring(@buf, 7, 1)
						set @height = (256 * @hb) + @lb
						set @hb = substring(@buf, 8, 1)
						set @lb = substring(@buf, 9, 1)
						set @width = (256 * @hb) + @lb
					end else begin
						set @hb = substring(@buf, 3, 1)
						set @lb = substring(@buf, 4, 1)
						set @fp = @fp + 2 + (256 * @hb) + @lb
					end
				end
			end else begin
				set @ext = 'nil'
			end
		end else begin
			set @ext = 'nil'
		end
		end
	end
	set nocount off
	if @ext = 'nil' begin
		select null
	end else begin
		select @height, @width
	end
end else begin
	set nocount off
	select null
end

quote:

---

Originally posted by robvolk
BTW, perhaps the image is corrupted? Have you tried exporting it to a file and opening the file?

---