Active Server Image

[xanburzum 169]

Você precisa de um componente ASP de gráficos? Você precisa de algum servidor de visualização de dados secundários? Os padrões de gráficos como LINE, BAR, PIE não são o suficiente para mostrar os seus próprios dados? Tente Active Server Image, que fornece um canvas pelo tamanho que você especificou, e você pode chamar qualquer gráfico pelo script com seus dados complexos.O Active Server Image é um poderoso elemento gráfico, profissionalmente para criar gráficos personalizados no lado do servidor PNG, JPEG, BMP. A Active Server Image foi especialmente concebido para gerar gráficos de dados industrial, fabricação, negócios, médicos, químicos, etc. Ele lida com múltiplas solicitações simultâneas com rapidez, de design leve, consome apenas pouca quantidade de recursos de sistema.

 

Principais Características:

 

Rápido, flexível, fácil de usar, Active Server Image é um componente web charting and web graphing(imaging) para a incorporação nas aplicações.

Suporte a strings UTF8 (Unicode), e caracteres de vários idiomas.

Suporte formato de arquivo PNG, JPEG, BMP. Salva no arquivo de saída gráfica binarydata do servidor diretamente ao browser.

Browser friendly: Servidor dll, não Java ou controles ActiveX são obrigatórios. Fornecendo-lhe a flexibilidade para draw canvas Visualização de dados personalizados.

Linguagem de Programação suportadas: ASP / PHP / COM / Delphi / Visual Basic / VBScript / JScript / C / C + +

 

Suporte Plataformas: Windows 98/ME/2000/XP/NT

 

Propriedades:

 

Bmp, BrushColor, BrushStyle, ClipRect, FontCharset, FontColor, FontHeight, FontName, FontNames, FontSize, FontStyle, Height, Jpg, PenColor, PenMode, PenPos, PenStyle, PenWidth, PixelColor, Png, TextFlag, TextHeight, TextWidth, Width

 

 

Métodos:

 

Arc, Chord, CreateImage, Ellipse, FillRect, FrameRect, Free, LineTo, LoadFromFile, MoveTo, Pie, PolyBezier, PolyBezierTo, Polygon, Polyline, Rectangle, Refresh, RoundRect, SaveToFile, SetCanvasColor, TextOut, WriteRectText, WriteRotatedText RoundRect, SaveToFile, SetCanvasColor, TextOut, WriteRectText, WriteRotatedText

Exemplo: Estatistica

 

Charts-2.asp

<% @LANGUAGE="VBSCRIPT" %>
<%
'***************** **********************


%>
<%
Server.ScriptTimeout = 900 
' Cria objeto  drawing 
Set obj=Server.CreateObject("eMarkASI.Painter")
	obj.CreateImage 940,540
' Draw background 
a=10
b=10
x=176 
a1=22 
y=96 
b1=12 

for i=1 to 5
	for j=1 to 5
obj.PenStyle=1
obj.PenColor = "black"
obj.Rectangle (i-1)*x+i*a,(j-1)*y+j*b,i*x+i*a,j*y+j*b
for k=1 to 7
for l=1 to 7 
if k=4 or l=4 then 
'solid line
obj.PenStyle=1
obj.PenColor = "black" 
else 

obj.PenStyle=2
obj.PenColor = "#BDBDB5" 
end if

obj.MoveTo (i-1)*x+i*a+k*a1,(j-1)*y+j*b 
obj.LineTo (i-1)*x+i*a+k*a1,j*y+j*b

obj.MoveTo (i-1)*x+i*a,(j-1)*y+j*b+l*b1 
obj.LineTo i*x+i*a,(j-1)*y+j*b+l*b1 
	next
next
'random ellipse
obj.PenStyle=1
obj.PenColor = "black"
rgbx0=(i-1)*x+i*a+4*a1
rgby0=(j-1)*y+j*b+4*b1

for m=0 to 28 
randomize 
rgbx=Int(20 * Rnd)*((-1)^Int(2 * Rnd))
rgby=Int(20 * Rnd)*((-1)^Int(2 * Rnd))
DrawRound rgbx0,rgby0,rgbx,rgby,obj 
next 
	next
next 
Response.ContentType = "image/png"
Response.BinaryWrite obj.Png 
' circle function
Function DrawRound(x0,y0,x,y,obj) 
dim Points(2,2)
Points(0,0) = x0+x-5
Points(0,1) = y0-y-5

Points(1,0) = x0+x+5
Points(1,1) = y0-y+5 

obj.Ellipse Points(0,0),Points(0,1),Points(1,0),Points(1,1)

'dim Ax,Ay
'Ax= x0+x
'Ay= y0-y
'obj.MoveTo Ax,Ay
'obj.LineTo x0,y0 
End function 
'=====================
%>

[jrcardozo 4]

esse objeto é nativo do IIS?

[xanburzum 169]

não é da empresa eMarkSoft Inc.