Muchas gracias y mucho gusto
Mira ahora tengo esto
Código:
<td width="139" height="146" valign="top" bgcolor="#000000" class="comicsanz">
<marquee behavior="Scroll" direction="Up" height="146" scrollamount="1" scrolldelay="30" onMouseOver="this.stop()" onMouseOut="this.start()">
<%
Do While Not rs1.EOF and tope1 < max
i = 0
Maximo1 = 210
parrafo=rs1("texto")
If len ( parrafo ) > Maximo1 Then
parrafo2 = Split ( parrafo, " " )
parrafo = ""
Do While len ( parrafo ) + len ( parrafo2 ( i ) ) < Maximo1
parrafo = parrafo & " " & parrafo2 ( i )
i = i + 1
Loop
End if %>
<% Do while rs1.EOF
if rs1("valor") = 1 then
%>
<%=rs1.Fields("nombre").value%> <br>
<%=rs1.Fields("mail").value%><br>
<%Response.Write(parrafo)%>
<br>
<br>
<br>
<%
tope1= tope1 +1
rs1.MoveNext
Loop
%>
</marquee> </td>
Que es donde muestro los mensajes, ahora para que aparescan segun el valor que tengo eln la base de datos los tengo que llamar asi
Código:
<% Do while rs1.EOF
if rs1("valor") = 1 then
%>
<%if rs(valor) = 1 then
<%=rs1.Fields("nombre").value%> <br>
<%=rs1.Fields("mail").value%><br>
<%Response.Write(parrafo)%>
end if%>
<%
tope1= tope1 +1
rs1.MoveNext
Loop
%>
o falta algo o esta mal ubicado
