link su record

[ettorpa]

Salve amici miei...qualcuno potrebbe aiutarmi?

ho una pagina categoria.asp dove vengono visualizzati i prodotti.
ho la necessità di linkare i record...mi spiego meglio:
estraggo i record dal db dove mi mostra gli articoli/descrizioni/prezzo etc.. pero' avrei bisogno che il campo relativo alla "descrizione" risultasse linkabile..in modo da visualizzarne la relativa scheda tecnica...

grazie.

[michele.santoro]

Non è che ti sei spiegato molto bene. Vuoi lincare il campo descrizione per far apparire la scheda tecnica relativa ... ma dove deve apparire? In un'altra pagina, in una finestrra popup o dove?
Comunque se non ho capito male devi usare una querystring.

[ettorpa]

si michele...in effetti la scheda tecnica la farei visualizzare in un'altra pagina html

[michele.santoro]

Non puoi usare una querystring in una pagina html e quindi per forza di cose devi recuperare i dati in una pagina ASP.
Nella pagina "categoria.asp" linki il campo descrizione così:

"><%=rec("descrizione")%>

poi nella pagina "pagina_scheda.asp" recuperi in questo modo:

<%
Dim cod
cod=Request.Querystring("cod")
Dim SQL,Rec
SQL="SELECT * FROM nome_tua_tabella WHERE ID="&cod                                                     
Set rec = Server.CreateObject("ADODB.Recordset")
Set Rec=Conn.Execute(SQL)

<%=rec("campo_scheda_tecnica")%>
%>

Naturalmente in questo esempio ID è un campo contatore con chiave primaria.
Questo per visualizzare la scheda tecnica in una nuova pagina, se invece vuoi visualizzarla in una popup devi aggiungerci javascript.
Scusa eventuali errori ma sono al lavoro e l'ho scritta di getto.

[ettorpa]

Ciao Michele, ti posto il codice della pagina categoria.asp


<%

Response.write (cat)

cat=Request.QueryString("CAT")

If Len(cat)="0" Then

cat=Session("Tipo")

End If

strsqlPROD="SELECT art.ID as id, Descrizione1, Descrizione2, Descrizione3, L2, Codice, FlagDisattivato,ordinecliente,esistenza,esistenza-ordinecliente as disponibilita,esistenza as disp FROM mydb art inner join mydb.movimentazione mov on art.id=mov.idart WHERE len(deposito)=1 and FlagDisattivato=0 and (esistenza)>0 and Tipo = '" & cat & "' ORDER BY Descrizione1 ASC "

Set objRSPROD = Server.CreateObject("ADODB.Recordset")
objRSPROD.Open strsqlPROD, objConn

Do While Not objRSPROD.EOF
%>
<form action="script/basket.asp" method="post">
<input name="Cat" type="hidden" value="<%=cat%>"><tr>
<input name="IDArt" type="hidden" value="<%=objRSPROD("id")%>"><tr>
<input name="L2" type="hidden" value="<%=objRSPROD("L2")%>"><tr>
<input name="esistenza" type="hidden" value="<%=objRSPROD("esistenza")%>"><tr>
<input name="codiceart" type="hidden" value="<%=objRSPROD("codice")%>"><tr>
<input name="ordinecliente" type="hidden" value="<%=objRSPROD("ordinecliente")%>"><tr>
<input name="disponibilita" type="hidden" value="<%=objRSPROD("disponibilita")%>"><tr>
<input name="descrizione1" type="hidden" value="<%=objRSPROD("Descrizione1")%>"><tr>
<input name="descrizione2" type="hidden" value="<%=objRSPROD("Descrizione2")%>"><tr>
<input name="descrizione3" type="hidden" value="<%=objRSPROD("Descrizione3")%>"><tr>


ho provato ad inserire la query dopo la connessione ma non funziona il link

[la_gabylla]

Ciao, magari questo ti può aiutare...
....
do while not(rs.EOF)
%>
<TR><TD><center><%=rs("descrizione")%></center></TD>

<TD>"><%=rec("descrizione")%></TD>


<%

RS.MoveNext
loop
call closeconn
%>
....

[ettorpa]

Grazie gabylla


ti faccio sapere


p.s. scusa il ritardo nella risposta