Testo scorrevole linkato

[fruttosio79]

Ciao a tutti,
calcolando che uso questo codice per sviluppare lo script del testo scorrevole e la relativa "pescata" di dati da DB MySql:

<script language="JavaScript">
var max=0;
function textlist()
{
max=textlist.arguments.length;
for (i=0; i<max; i++)
this[i]=textlist.arguments[i];
}
tl=new textlist
(
<%
Set newsRS = Server.CreateObject( "ADODB.Recordset" )
newsRS.ActiveConnection = Con
sqlString = "SELECT newsbar_testo FROM newsbar"
newsRS.Open sqlString
primo = true
while not newsRS.EOF
if not primo then Response.Write ", "
primo = false
Response.Write """" & newsRS("newsbar_testo") & """"
newsRS.MoveNext
wend
newsRS.Close
%>
);
var x=0; pos=0;
var l=tl[0].length;
function textticker()
{
document.getElementById('ticktd').innerHTML=tl[x].substring(0,pos); 
if(pos++==l) { pos=0; setTimeout("textticker()",2000); x++;
if(x==max) x=0; l=tl[x].length; } else
setTimeout("textticker()",120);
}
</script>

e poi lo richiamo dentro la pagina con:

<td id="ticktd" width="60%">
					
</td>

Vorrei che ognuno di questi testi sia un <a href="newsbar_link"> ovvero che mi linki ad un collegamento che io specificherò nel DB con newsbar_link.

Mi spiegate come fare?

[Yappy]

Al posto di creare una lista con il metodo precedente prova a creare due array in javascript uno per i testi ed uno per i collegamenti.


tl=new Array();
cl=new Array();
indice=0;

Durante la consultazione del database metti:

Response.Write "t1[indice]=" & newsRS("newsbar_testo") & ";\n"
Response.Write "t1[indice]=" & newsRS("newsbar_link") & ";\n"
indice=indice+1

infine concatena:

document.getElementById('ticktd').innerHTML="<a href=\""+c1[x]+"\">"+tl[x]+"</a>";

Ciao,
Banda Bassotti

[fruttosio79]

azz....
io so' programmare in asp discretamente, ma in javascript sono una schiappa !!!

Secondo te non è proprio possibile variare il mio codice aggiungendo il tag <a>. Io sto provando qualcosa tipo

primo = false
Response.Write "<a href=''>"
Response.Write """" & newsRS("newsbar_testo") & """"
Response.Write "</a>"
newsRS.MoveNext

solo che mi da "previsto oggetto" in Response.Write """" & newsRS("newsbar_testo") & """"

Come posso correggere?

[fruttosio79]

[fruttosio79]

[Yappy]

Prova così:

primo = false
Response.Write """" & "<a href='" & newsRS("newsbar_link") & "'>"
Response.Write newsRS("newsbar_testo")
Response.Write "</a>" & """"
newsRS.MoveNext

L'errore che notavi era che """" deve stare all'inizio ed alla fine del response.write

Ciao,
Banda Bassotti

[Yappy]

Puntualizzo """" deve stare all'inizio ed alla fine del gruppo di response.write

Ciao

[br1]

Io non riesco a seguire la discussione su due forum... prosegue nell'altro