Valore riga come intestazione colonna

[ubbicom]

Ciao a tutti.

E' possibile con ASP assegnare il valore di un record all'intestazione della colonna?

La mia tabella è questa:

NAME	|	YEAR	|	MONTH	|	MONEY
AAA	|	2008	|	JAN	|	0
AAA	|	2008	|	FEB	|	0
AAA	|	2008	|	MAR	|	2000
AAA	|	2008	|	APR	|	2200
AAA	|	2008	|	MAY	|	2100
AAA	|	2008	|	JUN	|	2200
AAA	|	2008	|	JUL	|	2300
AAA	|	2008	|	AUG	|	0
AAA	|	2008	|	SEP	|	0
AAA	|	2008	|	OCT	|	0
AAA	|	2008	|	NOV	|	0
AAA	|	2008	|	DEC	|	0

BBB	|	2008	|	JAN	|	0
BBB	|	2008	|	FEB	|	0
BBB	|	2008	|	MAR	|	10000
BBB	|	2008	|	APR	|	11000
BBB	|	2008	|	MAY	|	12000
BBB	|	2008	|	JUN	|	15000
BBB	|	2008	|	JUL	|	12000
BBB	|	2008	|	AUG	|	0
BBB	|	2008	|	SEP	|	0
BBB	|	2008	|	OCT	|	0
BBB	|	2008	|	NOV	|	0
BBB	|	2008	|	DEC	|	0

Si può estrarre un report del genere?

NAME	|	JAN	|	FEB	|	MAR	|	...	|	YEAR
AAA	|	12000	|	12200	|	...	|	...	|	2008
BBB	|	12008	|	15000	|	...	|	...	|	2008

[agenti]

mhhhh


forse senza testare:


select distinct name,
(select sum(money) from tabella where month = 'JAN' AND YEAR=2008 AND name = tabella.name) AS JAN,
(select sum(money) from tabella where month = 'FEB' AND YEAR=2008 AND name = tabella.name) AS FEB

FROM tabella

MA DI SICURO NON DAREI NOME YEAR AD UN CAMPO...

[ubbicom]

Originariamente inviato da agenti

MA DI SICURO NON DAREI NOME YEAR AD UN CAMPO...

E perchè no?
In mysql nelle query basta mettere il nome del campo all'interno di apici, così `YEAR` e si risolve qualsiasi problema.

Grazie, provo la tua query e ti rispondo.

[ubbicom]

Ho provato la tua query ma:

Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[MySQL][ODBC 3.51 Driver][mysqld-5.0.21-community-nt]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near

   strSql = " SELECT DISTINCT NAME, MONTH "
   strSql = strSql & " ( SELECT SUM(MONEY) FROM mytable WHERE `MONTH` = 'jan' AND `YEAR` = 2008 AND NAME = mytable.NAME ) AS JAN, "
   strSql = strSql & " ( SELECT SUM(MONEY) FROM mytable WHERE `MONTH` = 'feb' AND `YEAR` = 2008 AND NAME = mytable.NAME ) AS FEB "
   strSql = strSql & "  FROM mytable "

[optime]

manca una virgola alla fine della prima riga

[ubbicom]

Originariamente inviato da optime
manca una virgola alla fine della prima riga

Grazie, ma qualcosa non funziona... in allegato la nuova tabella dati ed il risultato della query...

[agenti]

ma il mese non era testo ?

JAN FEB ??

[ubbicom]

Originariamente inviato da agenti
ma il mese non era testo ?

JAN FEB ??

inizialmente si, ma adesso ho preferito caricare il numero mese e con un array ricavo il nome del mese... gestire numeri è per me più facile...

[optime]

posta la query attuale

[ubbicom]

Originariamente inviato da optime
posta la query attuale

Ecco, grazie:

   strSql = " SELECT DISTINCT NOME, MESE, "
   strSql = strSql & " ( SELECT SUM(TOT) FROM COSTI_PERSONALE WHERE MESE = 1 AND ANNO = 2008 AND ID_NOME = COSTI_PERSONALE.ID_NOME ) AS JAN, "
   strSql = strSql & " ( SELECT SUM(TOT) FROM COSTI_PERSONALE WHERE MESE = 2 AND ANNO = 2008 AND ID_NOME = COSTI_PERSONALE.ID_NOME ) AS FEB "
   strSql = strSql & "  FROM COSTI_PERSONALE "
   strSql = strSql & "  GROUP BY ID_NOME "

   Set rec = Server.CreateObject("ADODB.Recordset")
   rec.Open strSql, objconn
   
   if not rec.eof then

                Response.Write "Gennaio
"
                Response.Write "Febbraio"

   rec.MoveFirst() 
      Do While Not rec.EOF

                Response.Write rec("JAN") & "
"
                Response.Write rec("FEB")

   rec.MoveNext()
      Loop 				
 end if
   
   rec.Close()
   Set rec = Nothing

   objconn.Close()
   Set objconn = Nothing