Pagina 4 di 4 primaprima ... 2 3 4
Visualizzazione dei risultati da 31 a 36 su 36
  1. #31
    Utente di HTML.it
    Registrato dal
    Sep 2003
    Messaggi
    359
    Il valore che stampa è l'ultimo elemento del recordset.
    Forse non è possibile fare quello che voglio io, nel modo in cui voglio farlo io.
    Io ho una tabella con date e valori, con il recordset Assenti io voglio estrapolare tutte le date in cui il campo motivo è <= a 5, quindi l'array che si produce andare a visualizzarlo in un grafico. Il mio codice è in grado di farlo?
    Chi Crede in Me non Perirà MAI

  2. #32
    Utente di HTML.it
    Registrato dal
    Sep 2003
    Messaggi
    359
    Hai finito le idee oppure la pazienza
    Chi Crede in Me non Perirà MAI

  3. #33
    Cosa vuoi che ne sappia io se i tuoi dati possono essere rappresentati su un grafico...?!
    Ho cercato di mostrarti come rendere dinamici i grafici.
    Se hai capito buon per te, non sono qui per fare il tuo lavoro al posto tuo.

  4. #34
    Utente di HTML.it
    Registrato dal
    Sep 2003
    Messaggi
    359
    E' vero, ma volevo solamente sapere se partendo da una query che restituisce valori come ti ho detto precedentemente è possibile rappresentare una grafico a linee. Non c'è bisogno che ti scaldi
    Chi Crede in Me non Perirà MAI

  5. #35
    Utente di HTML.it
    Registrato dal
    Sep 2003
    Messaggi
    359
    Ciao a tutti, sono arrivato ad un punto abbastanza avanti, per non dire che ho quasi finito, ma adesso il problema è che non stampa i dati.
    Questo il codice:
    codice:
    <HTML>
    <HEAD>
    <title>TEAM-GEST: SOFTWARE PROFESSIONALE PER GESTIRE IL TUO TEAM</title>
    <link href="stile.css" rel="stylesheet" type="text/css" />
    <link rel="icon" href="/images/logo1.ico" />
    <script type="text/javascript" src="https://www.gstatic.com/charts/loader.js"></script>   
    <script type="text/javascript" src="Chart.js"></script>
    <%
    Categoria = request.form("Categoria")
    
    
    ' stringa di conn
    Set Conn = Server.CreateObject("ADODB.Connection")
    Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(""& session("MM_Percorso") &"")
    Conn.Open Connect
    
    
    Set rs = Server.CreateObject("adodb.recordset")
    rs.Open "SELECT * FROM T_Presenze_Assenze"&session("StagioneAttuale")&" where Categoria='" & Categoria & "'", Conn,3,3
    
    
    if not rs.eof then
    Gennaio = 01
    Febbraio = 02
    
    
    Set rsAssentiGennaio = Server.CreateObject("adodb.recordset")
    rsAssentiGennaio.Open "SELECT DISTINCT count([T_Presenze_Assenze"&session("StagioneAttuale")&"].Motivo) as ConteggioMotivo, DataInsert FROM T_Presenze_Assenze"&session("StagioneAttuale")&" where Motivo <= '5' and Categoria='" & Categoria & "' and (((Month([DataInsert]))='" & Gennaio & "')) group by DataInsert", Conn,3,3
    
    
    Set rsAssentiFebbraio = Server.CreateObject("adodb.recordset")
    rsAssentiFebbraio.Open "SELECT DISTINCT count([T_Presenze_Assenze"&session("StagioneAttuale")&"].Motivo) as ConteggioMotivo, DataInsert FROM T_Presenze_Assenze"&session("StagioneAttuale")&" where Motivo <= '5' and Categoria='" & Categoria & "' and (((Month([DataInsert]))='" & Febbraio & "')) group by DataInsert", Conn,3,3
    
    
    %>
    </HEAD>
    <body bgcolor="#7A8996">
    <canvas id="myLineChart" width="800" height="600"></canvas> 
    <script> 
    // Definisco i dati da mostrare nel grafico 
    var data = {
    			<%	 'Response.Write("labels: [")
    				 'while not rsAssentiGennaio.eof
    				 'Response.Write(""&Chr(34)&""&rsAssentiGennaio("DataInsert")&""&Chr(34)&",")
    				 'rsAssentiGennaio.movenext
    				 'wend
    				 'Response.Write("],")
    			%>			  
        datasets: [ 
            { 
                label: "Temperature 2013", 
                fillColor: "rgba(99,240,220,0.2)", 
                strokeColor: "rgba(99,240,220,1)", 
                pointColor: "rgba(99,240,220,1)", 
                pointStrokeColor: "#fff", 
                pointHighlightFill: "#fff", 
                pointHighlightStroke: "#fff", 
                //data: [8, 11, 18, 22, 24, 26, 34, 39, 31]
    			<%   'rsAssentiGennaio.movefirst
    				 'Response.Write("data: [")
    				 'while not rsAssentiGenaio.eof
    				 'Response.Write(""&rsAssentiGennaio("ConteggioMotivo")&",")
    				 'rsAssentiGennaio.movenext
    				 'wend
    				 'Response.Write("]")
    			%>			 
            } 
        ] 
    }; 
    // Ottengo il contesto 2D del Canvas in cui mostrare il grafico 
    var ctx = document.getElementById("myLineChart").getContext("2d"); 
     
    // Crea il grafico e visualizza i dati 
    var myLineChart = new Chart(ctx).Line(data); 
    </script>
    
    Grazie
    Chi Crede in Me non Perirà MAI

  6. #36
    Utente di HTML.it
    Registrato dal
    Sep 2003
    Messaggi
    359

    RISOLTO

    Se a qualcuno dovesse interessare questo è il codice definitivo.
    codice:
    <body bgcolor="#7A8996">
    <canvas id="myChart" width="800" height="600"></canvas> 
    <script> 
    // Definisco i dati da mostrare nel grafico 
    var data = {
    			//labels: ["Gennaio", "Febbraio", "Marzo", "Aprile", "Maggio", "Giugno", "Luglio", "Agosto", "Settembre"],
    			<%	 Response.Write("labels: [")
    				 while not rsAssentiGennaio.eof
    				 Response.Write(""&Chr(34)&""&rsAssentiGennaio("DataInsert")&""&Chr(34)&",")
    				 rsAssentiGennaio.movenext
    				 wend
    				 Response.Write("],")
    			%>			  
        datasets: [ 
            { 
                label: "Temperature 2013", 
                fillColor: "rgba(99,240,220,0.2)", 
                strokeColor: "rgba(99,240,220,1)", 
                pointColor: "rgba(99,240,220,1)", 
                pointStrokeColor: "#fff", 
                pointHighlightFill: "#fff", 
                pointHighlightStroke: "#fff", 
                //data: [1, 1, 2, 2, 2, 2, 2, 2, 2]
    			<%   rsAssentiGennaio.movefirst
    				 Response.Write("data: [")
    				 while not rsAssentiGennaio.eof
    				 Response.Write(""&rsAssentiGennaio("ConteggioMotivo")&",")
    				 rsAssentiGennaio.movenext
    				 wend
    				 Response.Write("]")
    			%>			 
            } 
        ] 
    }; 
    // Ottengo il contesto 2D del Canvas in cui mostrare il grafico 
    var ctx = document.getElementById("myChart").getContext("2d"); 
     
    // Crea il grafico e visualizza i dati 
    //var myLineChart = new Chart(ctx).Line(data);
    var myNewChart = new Chart(ctx);
    myNewChart.Bar(data);
    </script>
    Chi Crede in Me non Perirà MAI

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.