Add drawing capabilities to ASP

Good things to share: a component for drawing (Gao, bar, various shape images)
Things are good, but I have no place to put this component, eh.
Why is that a good thing, we look at the following introduction to know that the component has two versions, one is a registered version, a non-registered version of the note
Book version features: (although not registered, but can always use the Oh, this is one of the reasons why I strongly recommend)
1. Graphics files can be generated in JPEG format
2. A graphic file that produces transparent GIF format
3. Graphic files that can be generated in interlaced GIF format
4. There are two ways to save graphics files: One is to generate graphics files directly, and the other is to save to an array and output directly to 5 in the WWW page. Can
To draw text graphics and to support text 6 of any font installed on your machine. You can export and preview documents generated by OLE service programs, such as MS
Word,excel and so on.
7. You can use bitmaps to freely zoom, mirror, rotate, and cut graphics
8. You can use the local graphics cache
9. Can zoom pictures
10. Can get more information about any JPEG, gif,bmp format file
11. Can do Windows grab screen
12. The restrictions for generating animated GIF unregistered versions are as follows:
(1). Can only use up to 8 colors, but I think it is not a limit for most people, hehe
(2). The maximum graphic size that can be generated is 320x240 if it is a registered version:
13. Can modify the existing GIF, JPEG and BMP file 14 online. Customizable Palette 15. Loop-screened GIF animation
Example program:
Examples of VBScript:
Set Obj=createobject ("Shotgraph.image")
size=201
Obj. CreateImage size,size,4
Obj. SetColor 0,255,255,255
Obj. SetColor 1,0,0,0
Obj. SetColor 2,255,108,0
Obj. SetColor 3,0,0,204
Obj. Setbgcolor 0
Obj. FillRect 0,0,size-1,size-1
Obj. Setdrawcolor 1
Obj. Line Size-1,0,0,size-1
Obj. Setbgcolor 2
Obj. Ellipse 5,5,size-6,size-6
Obj. Setbgcolor 3
Obj. Ellipse 5, (size-5)/4,SIZE/2, (size-5) *3/4
Obj. Gifimage 0,1, "test.gif"
Example code for ASP:
Response.contenttype= "Image/gif"
Set Obj=server.createobject ("Shotgraph.image")
size=201
Obj. CreateImage size,size,4
Obj. SetColor 0,255,255,255
Obj. SetColor 1,0,0,0
Obj. SetColor 2,255,108,0
Obj. SetColor 3,0,0,204
Obj. Setbgcolor 0