[  Tutti i forum | Ricerca | FAQ | Login | Iscriviti | Utenti ]

.NET Framework   ASP.NET 2.0   
      Inserimento Grafico dinamico

  Vai all'ultimo messaggio della discussione Vai all'ultimo messaggio  
Pagine: [1] 2 Avanti >>

Inserimento Grafico dinamico
Nightwind non è online. Ultima attività: 21/05/2008 22.36.02Nightwind
Inserito il: 20 maggio 2008 15.48
5 messaggi dal 16 apr 2008
Ragazzi dopo innumerevoli peripezie, sono riuscito a creare un programma che disegni il grafico della retta dei minimi quadrati una volta calcolata la sua equazione partendo da alcune coppie di numeri reali presi da tastiera, però ho ancora alcuni dubbi e problemi che spero voi possiate aiutarmi a risolvere.
Inizio con il postare il codice che ho scritto (tutto a mano con il blocco note):



<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Imaging" %>
<script runat="server">
Sub Page_Load (sender As Object, e As EventArgs)
lbll.Text = "Calcolo della retta dei minimi quadrati "
End sub

Sub Submit(sender as object, e as EventArgs)
Dim valori(5,5) As double
Dim I, Sx, Sy, Sxy, Sx2, m, q, n As double
Dim y01, y02 As double
Dim objBitmap As New Bitmap(200,200)
Dim objGraphic As Graphics = Graphics.FromImage(objBitmap)
Dim whiteBrush As New SolidBrush(Color.White)
Dim redpen As New pen(Color.Red, 2)
Dim blackPen As New Pen(Color.Black, 2)

valori(1,1) = x1.text
valori(1,2) = y1.text
valori(2,1) = x2.text
valori(2,2) = y2.text
valori(3,1) = x3.text
valori(3,2) = y3.text
valori(4,1) = x4.text
valori(4,2) = y4.text
valori(5,1) = x5.text
valori(5,2) = y5.text
n = 5
sx = 0
sy = 0
sx2 = 0
sxy = 0
For I = 1 to 5
Valori(I,3) = valori(I,1) * valori(I,1)
Valori(I,4) = valori(I,1) * Valori(I,2)
Sx = sx + valori(I,1)
Sy = sy + valori(I,2)
Sx2 = sx2 + valori(I,3)
Sxy = sxy + valori(I,4)
Next I
m = (n*sxy-sx*sy)/(n*sx2-(sx)*(sx))
q = (sx2*sy-sxy*sx)/(n*sx^2-(sx)*(sx))
If q > 0 Then
lbl2.Text = "Risultato : Y=" & m & "X+" & q
Else
lbl2.Text = "Risultato : Y=" & m & "X" & q
End if
y01 = 195 - q
y02 = 195 - ((195*m)+q)
objGraphic.FillRectangle(whiteBrush, 0, 0, 200, 200)
objGraphic.DrawLine(blackPen, New Point(0,195), New Point(195,195))
objGraphic.DrawLine(blackPen, New Point(5,5), New Point(5,200))
objGraphic.DrawLine(redPen, New Point(5, y01), New Point(195, y02))
Response.ContentType = "image/gif"
objBitmap.Save (Response.OutputStream, ImageFormat.Gif)
End Sub
</script>
<html>
<body>
<form runat="server">
<p>
<asp:label id="lbll" runat="server"
forecolor="#0000FF"
font-bold="true"/></p>
x1: <asp:TextBox id="x1" columns="10" runat="server" />
y1: <asp:TextBox id="y1" columns="10" runat="server" /><br>
x2: <asp:TextBox id="x2" columns="10" runat="server" />
y2: <asp:TextBox id="y2" columns="10" runat="server" /><br>
x3: <asp:TextBox id="x3" columns="10" runat="server" />
y3: <asp:TextBox id="y3" columns="10" runat="server" /><br>
x4: <asp:TextBox id="x4" columns="10" runat="server" />
y4: <asp:TextBox id="y4" columns="10" runat="server" /><br>
x5: <asp:TextBox id="x5" columns="10" runat="server" />
y5: <asp:TextBox id="y5" columns="10" runat="server" /><br>
<asp:Button onClick="Submit" Text="Esegui" runat="server" />
<p> <asp:Label id="lbl2" runat="server" /></p>
</form>
</body>
</html>


il codice qui sopra disegna effettivamente il grafico, però solo quello, voglio dire una volta che clicco il tasto esegui la pagina si svuota completamente, viene cancellata tutta la form e resta solamente il grafico.... oltretutto non mostra neppure l'equazione che dovrebbe fare con l'IF! Qulcuno di voi sà suggerirmi come far disegnare il grafico sotto la form e sotto l'equazione della retta? inoltre visto che utilizzo il tipo dati "double" perchè mi occorrono i decimali qualcuno mi sà dire come limitare il numero di cifre dopo la virgola da prendere? perchè altrimenti quando mi scrive l'equazione della retta scrive moltissime cifre dopo la virgola ed esteticamente non è che sia il massimo, naturalmente usando solamente il visual basic come linguaggio e il metodo più semplice che vi viene in mente visto che sono alle prime armi........ GRAZIE ANTICIPATAMENTE A CHI MI VORRà AIUTARE!
RE: Inserimento Grafico dinamico
Nightwind non è online. Ultima attività: 21/05/2008 22.36.02Nightwind
Inserito il: 20 maggio 2008 17.29
5 messaggi dal 16 apr 2008
dai su non siate timidi
RE: Inserimento Grafico dinamico
nostromo è online. Ultima attività: 05/07/2008 0.40.19nostromo
Inserito il: 20 maggio 2008 18.16
Microsoft Most Valuable Professional
contributi / Top Poster / Community manager / www.soluzioni4d.it / Blog / 11537 messaggi dal 18 feb 2004
non puoi avere nella solita pagina ContentType = "image/gif" e html

aggiungi un immagine alla tua pagina, la fai puntare ad una pagina aspx e in quella pagina inserisci il codice di creazione dell'immagine

ciao marco
Where we're going, we don't need roads!
http://nostromo.spaces.live.com/default.aspx
RE: Inserimento Grafico dinamico
Nightwind non è online. Ultima attività: 21/05/2008 22.36.02Nightwind
Inserito il: 20 maggio 2008 23.46
5 messaggi dal 16 apr 2008
Devi scusarmi ma siccome è la prima volta che mi cimento con asp.net non ho capito nulla di ciò che hai detto puoi cercare di essere più chiaro?
RE: Inserimento Grafico dinamico
nostromo è online. Ultima attività: 05/07/2008 0.40.19nostromo
Inserito il: 21 maggio 2008 00.02
Microsoft Most Valuable Professional
contributi / Top Poster / Community manager / www.soluzioni4d.it / Blog / 11537 messaggi dal 18 feb 2004
andiamo per gradi, togli tutto il codice da: Sub Submit, inserisci un controllo AspImage nella pagina, imposta la visibilità su false.

crea una nuova pagina e chiamala DynamicImage.Aspx, nel PageLoad inserisci tutto il codice che hai tolto dalla sub di prima, considera che i parametri che prima ottenevi tramite controlli adesso li otterrai tramite querystring

iniziamo con questo, domani ad un ora più consona il resto

ciao marco
Where we're going, we don't need roads!
http://nostromo.spaces.live.com/default.aspx
RE: Inserimento Grafico dinamico
Nightwind non è online. Ultima attività: 21/05/2008 22.36.02Nightwind
Inserito il: 21 maggio 2008 12.18
5 messaggi dal 16 apr 2008
ma se inserisco tutto il codice della sub submit in un altra pagina non resta lo stesso il problema che mi visualizza il grafico ma non l'equazione della retta?
RE: Inserimento Grafico dinamico
nostromo è online. Ultima attività: 05/07/2008 0.40.19nostromo
Inserito il: 21 maggio 2008 12.49
Microsoft Most Valuable Professional
contributi / Top Poster / Community manager / www.soluzioni4d.it / Blog / 11537 messaggi dal 18 feb 2004
no perché quella pagina la userai come sorgente della tua immagine.

ovvero avrei ImageUrl="DynamicImage.Aspx?parametriQueryString=1"

ciao marco
Where we're going, we don't need roads!
http://nostromo.spaces.live.com/default.aspx
RE: Inserimento Grafico dinamico
Nightwind non è online. Ultima attività: 21/05/2008 22.36.02Nightwind
Inserito il: 21 maggio 2008 14.20
5 messaggi dal 16 apr 2008
devi scusarmi ma siccome sono un povero niubbo non ci ho capito granchè... la storia del query string non mi è chiara... è un metodo per passare variabili da una pagina ad un altra forse? puoi esser epiù chiaro magari aiutandoti con degli esempi di codice? grazie ancora


Pagine: [1] 2 Avanti >> | Torna al forum
Vai a:

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.


COMMUNITY
ULTIMI MESSAGGI
MEDIA

Tutti i media



IN EVIDENZA
MISC
Powered by .db Forums