Hola Muchos como estan?
tengo la necesidad de hacer una especie de noticia con scroll pero lo que me tiene que mostrar el scroll son datos consultados desde una bd y este es el problema, yo lo estoy haciendo de la siguiente forma pero no me funsiona:
<script language="JavaScript1.2">
var marqueewidth=500
var marqueeheight=20
var speed=1
</script>
<%
Dim oConn1, rs1, sql, unidad, fecha, n
set oConn1 = Server.CreateObject("ADODB.Connection")
set rs1=Server.CreateObject("ADODB.Recordset")
OConn1.Open "Provider=SQLOLEDB;Data Source=jnjvecadbws;Initial Catalog=HH; User Id=enlace;Password=123456;"
fechactual = Date()
dia = Day(fechactual)
mes = Month(fechactual)
sql= "Select Empleado.Nombre, Empleado.Email from Empleado where day(Fch_Nacimiento)='"&dia&"'"
rs1.Open sql,oConn1
If rs1.eof then
%>
<script language="JavaScript1.2">
var marqueecontents='nadien cumple años'
</script>
<%
else
%>
<script language="JavaScript1.2">
var marqueecontents='<% while not rs1.eof Response.Write"<p></p><strong><font face=Verdana size=1 color=#1C455E><a href="&rs1.fields("Email")&">"&rs1.Fields("Nombre" )&"</a></strong></font><p></p>")rs1.movenext wend end if%>'
if (document.all)
document.write('<marquee direction="up" scrollAmount='+speed+' style="width:'+marqueewidth+';height:'+marqueeheig ht+'">'+marqueecontents+'</marquee>')
function regenerate(){
window.location.reload()
}
function regenerate2(){
if (document.layers){
setTimeout("window.onresize=regenerate",450)
intializemarquee()
}
}
function intializemarquee(){
document.cmarquee01.document.cmarquee02.document.w rite(marqueecontents)
document.cmarquee01.document.cmarquee02.document.c lose()
thelength=document.cmarquee01.document.cmarquee02. document.height
scrollit()
}
function scrollit(){
if (document.cmarquee01.document.cmarquee02.top>=thel ength*(-1)){
document.cmarquee01.document.cmarquee02.top-=speed
setTimeout("scrollit()",100)
}
else{
document.cmarquee01.document.cmarquee02.top=marque eheight
scrollit()
}
}
window.onload=regenerate2
</script>
Ustedes tendran una mejor idea como puedo hacer funsionar esto amigos por favor....