salve

ho fatto un semplice script di prova per iniziare a realizzare un grafico dinamicamente
codice:
<%@ Page ContentType = "image/gif"%>
<%@ Import Namespace = "System.Drawing" %>
<%@ Import Namespace = "System.Drawing.Imaging" %>
<%@ Import Namespace="System.Drawing.Drawing2D" %> 

<Script Runat = "Server">

Sub Page_Load

Dim objBitmap As Bitmap
Dim objGraphics As Graphics
Dim i

objBitmap = New Bitmap(560, 400)
objGraphics = Graphics.FromImage(objBitmap)
'objGraphics.Clear(Color.FromArgb(167, 187, 215, 255)) 
objGraphics.SmoothingMode = SmoothingMode.AntiAlias 

For i = 0 to 560 step 20
	objGraphics.DrawLine(new Pen(Color.Gray), i, 0, i, 400)
Next

objGraphics.DrawLine(new Pen(Color.Red), 0, 400, 20, 370)
objGraphics.DrawLine(new Pen(Color.Red), 20, 370, 40, 360)
objGraphics.DrawLine(new Pen(Color.Red), 40, 360, 60, 360)
objGraphics.DrawLine(new Pen(Color.Red), 60, 360, 80, 330)
objGraphics.DrawLine(new Pen(Color.Red), 80, 330, 100, 330)
objGraphics.DrawLine(new Pen(Color.Red), 100, 330, 120, 300)


objBitmap.Save(Response.OutputStream, ImageFormat.Gif)

objBitmap.Dispose()
objGraphics.Dispose()
End Sub

</Script>
Per adesso niente di speciale, solo prove
però vorrei applicare un buon antialiasing alla retta

con il codice che ho inserito (trovato su html.it) la retta è un po più spessa, ma mostra sempre segni fastidiosi di aliasing

ah! a che ci siamo come faccio a stabilire lo spessore di una retta?