nanumi image component

 

NanumiImagePlus_v1_22.zip

 

 

이미지 처리 컴포넌트

 

 

□ 기능

* 다양한 이미지 파일을 처리 할 수 있습니다.(JPG, GIF, BMP, PNG, TIF)
* 이미지 크기를 재조정 할 수 있습니다.(Thumbnail 기능)
* 다양한 이미지 포맷(Format) 변환이 가능합니다.(From: JPG, GIF, BMP, PNG, TIF → To: JPG, GIF, BMP, PNG, TIF)
* 이미지 회전변환이 가능합니다.
* 이미지 저장시 압축된 JPG 파일을 생성 할 수 있습니다.

sub imageSize_sub(filepath)
 dim objImg

 'Response.write (filepath)

 if FSO.FileExists(filepath) then

  'SET objImg = LoadPicture(filepath)
  'imageWidth = INT(objImg.width / 26.4)
  'imageHeight = INT(objImg.height / 26.54)
  'SET objImg = nothing

  Dim Thumb
  set Thumb = server.CreateObject("nanumi.imageplus")
  Thumb.openimagefile  filepath
  imageWidth = INT(Thumb.Width)
  imageHeight = INT(Thumb.Height)
  Thumb.dispose

  'imageWidth = 100
  'imageHeight = 100

 else
  imageWidth = 100
  imageHeight = 100
 end if
end sub