Ecco il problema.
Ho una pagina di riepilogo che raggruppa tutti i record in un db acces. fin qui tutto bene. Ci arrivo tramite un'altra pagina con il link contenente una query string che si porta dietro l'ID dell'utente attivo. Il report della pagina di riepilogo contiene tutti gli annunci degli altri utenti.
Devo creare un link per ogni annuncio presente e aprire un'altra pagina con il dettaglio dell'annuncio selezionato.
Dunque una nuova query string con l'ID dell'annuncio.
Fin qui tutto bene.
Adesso devo aggiungere a questa ultima query string anche l'ID dell'utente attivo.

passiamo ai fatti.
ecco la query string di arrivo dalla prima pagina a quella di riepilogo:
http://www.miodominio.it/elencoannunci.asp?ID=<%=(rsGruppo.Fields.Item("ID").Value)%>&from=elenc o
dove ID è l'utente loggato.
Il DB interessato è DBgruppi e la tabella gruppi (database utenti)
e DBannunci e la tabella annunci per gli annunci

Ecco il codice della pagina di riepilogo:

<% Set conn2=Server.CreateObject("ADODB.Connection")
conn2.Open MM_connGruppi_STRING
Set rsGruppo = Server.CreateObject("ADODB.Recordset")
%>
<%
While ((Repeat1__numRows <> 0) AND (NOT rsDate.EOF))
%>

<% rsGruppo.Open "SELECT * FROM gruppi WHERE ID="&rsDate.Fields.Item("ID").Value, conn2 %>

<% if rsDate.Fields.Item("gruppoID").Value>0 then %>

<%= DoDateTime((rsDate.Fields.Item("data").Value), 2, 1040) %></span>

' la query string funzionante che porta solo il valore dell'ID annuncio alla pagina di dettaglio

&from=dettaglio" class="annunciotitolo">(Dettaglio)

<% end if %>
<% rsGruppo.Close %>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
rsDate.MoveNext()
Wend
%>


Ho cercato di inserire l'ID utente utilizzando l'oggetto request. Infatti a inizio pagina ho realizzato il seguente codice per il recupero del valore della prima pagina......

<%@LANGUAGE="VBSCRIPT"%>


<%
Dim rsGruppo__MMColParam
rsGruppo__MMColParam = "1"
if (Request.QueryString("ID") <> "") then rsGruppo__MMColParam = Request.QueryString("ID")
%>
<%
set rsGruppo = Server.CreateObject("ADODB.Recordset")
rsGruppo.ActiveConnection = MM_connGruppi_STRING
rsGruppo.Source = "SELECT * FROM gruppi WHERE ID = " + Replace(rsGruppo__MMColParam, "'", "''") + ""
rsGruppo.CursorType = 0
rsGruppo.CursorLocation = 2
rsGruppo.LockType = 3
rsGruppo.Open()
rsGruppo_numRows = 0
%>

subito dopo ho realizzato....

<%
Dim idsettore
IDutente=rsGruppo.Fields.Item("ID")
%>

poi sono andato nella tabella e ho modificato la query string da lanciare alla pagina di dettaglio:

&IDutente="&IDutente&"&from=dettaglio">Dettagli o

inutile dire che non funziona. Spero sempre di trovare qualcuno piu bravo di me...