Esportare in excel

[[trodat]]

Ciao, ho una query del tipo:

sql = "TRANSFORM Count([Prot.ID) AS ConteggioDiID SELECT [Prot].[Nome],"_
&"[Prot].[Cognome], [Prot].Indirizzo, Count([Prot].ID) AS [Totale di ID] "_
&" FROM [Prot] WHERE ((([Prot].[Sez]) Is Null) AND (([Prot].Indirizzo) "_
&" Like 'Pippo')) GROUP BY [Prot].[Nome], [Prot].[Cognome],"_
&" [Prot].Indirizzo PIVOT Format([Data],'mmm') In ('gen','feb','mar','apr','mag','giu','lug','ago','set','ott','nov','dic');"

che restituisce un certo numero di records corrispondenti al criterio previsto.

Adesso vorrei esportare in excel quanto restituito da asp ed ho scritto così:

Set rs = Server.CreateObject("ADODB.Recordset")
    rs.Open sql, conn

ID = ""

rs.MoveFirst

do while Not rs.eof	
ID  = ID  & rs("ID") & ","

rs.MoveNext
loop
%>
    <form method="post" action="EsportaInExcel.asp">
<input type="hidden" name="Id" value="<%=Id%>"> 
</form>

Ma l'ID non si valorizza, dove sbaglio?

Grazie

[Roby_72]

Ma dalla query l'hai estratto l'ID?

Roby

[[trodat]]

Originariamente inviato da Roby_72
Ma dalla query l'hai estratto l'ID?

Roby

Questo è il punto, come lo estraggo senza una select?

[Mizushi]

.

[[trodat]]

Voglio dire che provo ad estrarlo così:

sql = "TRANSFORM Count([Prot.ID) AS ConteggioDiID SELECT [Prot].[ID] , [Prot].[Nome],"_
&"[Prot].[Cognome], [Prot].Indirizzo, Count([Prot].ID) AS [Totale di ID] "_
&" FROM [Prot] WHERE ((([Prot].[Sez]) Is Null) AND (([Prot].Indirizzo) "_
&" Like 'Pippo')) GROUP BY [Prot].[Nome], [Prot].[Cognome],"_
&" [Prot].Indirizzo PIVOT Format([Data],'mmm') In  ('gen','feb','mar','apr','mag','giu','lu
g','ago','set','ott','nov','dic');"

ma al momento dell'esecuzione della query lo script restituisce:

Error Type:
Microsoft JET Database Engine (0x80040E21)
You tried to execute a query that does not include the specified expression 'ID' as part of an aggregate function.

[Roby_72]

Devi metterlo anche dopo la clausola GROUP BY.

Roby

[[trodat]]

Ho provato ma la query non estrae più i dati come previsti.

[optime]

devi deciderti. con la pivot fai dei raggruppamenti, quindi ottieni dei dati cumulativi, quindi il singolo dato cumula più id. col singolo id infatti ottieni dati diversi.

[[trodat]]

Bentrovato Optime.

I dati mi servono raggruppati così come sono, ma devo realizzare anche un'estrazione in excel di questi dati ed avevo pensato a passare l'id di ciascun record estratto in un campo hidden, recuperarlo così:

cod = request.querystring("id")
Set rs = DBConn.Execute("SELECT * FROM myTab where ID in ("&cod&")")

Però mi dici che non si può.
Soluzioni alternative? :master:

[optime]

ma l'id "de che"?