Problema con redirect

[alasque]

Ciao a tutti,

ho fatto un restyling e probabilmente mi sono perso qualche pezzo.

nella pagina dove vengono visualizzati i links, i links non sono attivi, come se fossero solo testo. C'è qualcuno disposto ad aiutarmi a capire cosa mi manca?

[Roby_72]

Ti sei risposto da solo, non avrai messo il link.

Roby

[alasque]

Ciao Roby_72,

quello che segue è lo script che fungerebbe da link....


<%
if rsAnagrafica.Fields.Item("Offerte_w").Value <> "" AND Not IsNull(rsAnagrafica.Fields.Item("Offerte_w").Value ) then
tmpURL = rsAnagrafica.Fields.Item("Offerte_w").Value
set connx = server.createObject("ADODB.Connection")
connx.open MM_Regioni_STRING
sqlx = "SELECT link_id FROM clicks WHERE link_offerte = '" & tmpURL & "'"
set rsx = connx.execute(sqlx)
if not rsx.eof then
response.write ("Offerta 1")
else
response.write("Offerta 1")
end if
rsx.close
set rsx = nothing
connx.close
set connx = nothing
else
response.write("Offerta 1")
end if
%>

[alasque]

Ciao Roby_72,

sei sparito?

[Roby_72]

Vediamo il codice html che ti restituisce il browser.

Roby

[alasque]

Offerte e Last Minute
<hr />
</div>
</div>
<div align="left" class="Stile106"></div></td>
<td width="150" class="Stile58"><div align="left" class="Stile66 Stile22">
<div align="center" class="Stile106">
<div align="right">Dettagli</div>
</div>
</div></td>
</tr>
<tr class="Testo_Grigio_11">
<td width="85" height="18" class="Stile58"><div align="left" class="Stile73 Stile93 Stile22">
<div align="center">
Offerta 1
</div>
</div></td>
<td width="85" class="Stile58"><div align="left" class="Stile73 Stile93 Stile22">
<div align="center">
Offerta 2
</div>
</div></td>
<td width="85" class="Stile58"><div align="left" class="Stile73 Stile93 Stile22">
<div align="center">
Offerta 3
</div>
</div></td>
<td width="85" class="Stile58"><div align="left" class="Stile73 Stile93 Stile22">
<div align="center">
Offerta 4
</div>
</div></td>
<td width="85" class="Stile58"><div align="left" class="Stile73 Stile93 Stile22">
<div align="center">
Offerta 5
</div>
</div></td>
<td width="85" class="Stile58"><div align="left" class="Stile73 Stile93 Stile22">
<div align="center">
Solidarietà
</div>
</div></td>
<td width="85" class="Stile58"><div align="left" class="Stile73 Stile93 Stile22">
<div align="center">
Last Minute
</div>
</div></td>

[Roby_72]

Non c'è alcun link, non è che non lo visualizza. Vuol dire che non va bene il codice ASP che lo determina.

Roby

[alasque]

eppure funzionava...... cosa potrebbe mancare?

[Roby_72]

Non manca nulla, sono sbagliati gli IF THEN ELSE o la query.

Roby

[alasque]

la query dovrebbe essere la seguente:

<%
Dim rsAnagrafica
Dim rsAnagrafica_cmd
Dim rsAnagrafica_numRows

Set rsAnagrafica_cmd = Server.CreateObject ("ADODB.Command")
rsAnagrafica_cmd.ActiveConnection = MM_Regioni_STRING
rsAnagrafica_cmd.CommandText = "SELECT * FROM strutture where Reg = ? and dati ='ok' and ts='d'"
rsAnagrafica_cmd.Prepared = true
rsAnagrafica_cmd.Parameters.Append rsAnagrafica_cmd.CreateParameter("param1", 200, 1, 255, rsAnagrafica__Param1) ' adVarChar

If (CStr(Request("Pr")) <> "-1") AND (CStr(Request("Pr")) <> "") then
rsAnagrafica_cmd.CommandText = rsAnagrafica_cmd.CommandText + " AND Pr = ?"

rsAnagrafica_cmd.Parameters.Append rsAnagrafica_cmd.CreateParameter("param2", 200, 1, 255, rsAnagrafica__Param2) ' adVarChar
End If

If (CStr(Request("Comune")) <> "-1") AND (CStr(Request("Comune")) <> "") then
rsAnagrafica_cmd.CommandText = rsAnagrafica_cmd.CommandText + " AND Comune = ?"

rsAnagrafica_cmd.Parameters.Append rsAnagrafica_cmd.CreateParameter("param3", 200, 1, 255, rsAnagrafica__Param3) ' adVarChar
End If

If (CStr(Request("T")) <> "-1") AND (CStr(Request("T")) <> "") then
rsAnagrafica_cmd.CommandText = rsAnagrafica_cmd.CommandText + " AND T = ?" + " order by Nome"

rsAnagrafica_cmd.Parameters.Append rsAnagrafica_cmd.CreateParameter("param4", 200, 1, 255, rsAnagrafica__Param4) ' adVarChar
End If

Set rsAnagrafica = rsAnagrafica_cmd.Execute
rsAnagrafica_numRows = 0
%>