<!--#include file="diagram.asp"-->

<%	

Set D=New Diagram

Set D.Img=CreateObject("gdImage.Images.1")

D.Img.ImageCreate 480, 320

D.Img.ImageColorAllocate 0,255,255,255 'Background Color



D.SetFrame 80, 40, 450, 280

D.SetBorder 10, 50, 0, 4

D.SetText "X-Label","Y-Label","Title"

D.SetGridColor "#44CC44",""

D.Draw "#80FF80","#0000FF",true,"Click on me !","DiagramClick()"



FN="diagram_object.png"

if isObject(Server) then FN=Server.mappath(FN) 

D.Img.ImagePng 0, FN

D.Img.ImageDestroy 0

Set D.Img=Nothing

%>

<HTML><HEAD></HEAD> 

<BODY bgcolor="#eeeeee"> 

<table border><tr><td><IMG src="diagram_object.png" width=480 height=320 usemap="#map1" border=0></td></tr></table> 

<map name="map1"> 

<%Response.Write D.ImgMapData%> 

</map> 

<script language="JavaScript"> 

function DiagramClick(){ alert("Use your own function here."); } 

</script> 

</BODY> 

</HTML>