ACTIVE SERVER PAGE

이번에는 도형과 텍스트 글씨를 이미지에 넣는 예제를 보여드리도록 하겠습니다.
 

  Response.ContentType = "image/png"
  Response.Expires = 0
  Response.Buffer = true
  Response.Clear

  'Response.ContentType = "image/Gif"
  'Response.ContentType = "image/jpeg"

  Set Image = Server.CreateObject("csImageFile.Manage")

  Image.NewImage 300, 300, "FFFFFF"
  Image.Rectangle 10, 10, 90, 90
  Image.PenColor = "FF0000"
  Image.PenThickness = 5
  Image.BrushColor = "0000FF"
  Image.BrushStyle = 0
  Image.Rectangle 110, 10, 190, 90
  Image.PenThickness = 1
  Image.Line 0, 100, 100, 199
  Image.Line 100, 199, 199, 100
  Image.BrushColor = "00FF00"
  Image.FloodFill 10, 190

  '텍스트를 입력한다.
  Image.TextSize = 24
  Image.TextOpaque = false
  Image.Antialias = true
  Image.TextColor = "FF0000"
  Image.TextBold = true
  Image.Text 100, 100, "엔터소프트"
  
  '이미지를 출력한다.
  Response.BinaryWrite Image.GIFData

위 소스 예제 결과는 아래 링크를 눌러 확인 할 수 있습니다.

http://ankyu.entersoft.kr/lecture/asp/csimagefile/csimage02.asp