problema con tipo de variable?

[donkanmcklaus]

buenos dias tengo un codigo en ASP que genera un numero aleatorio, ese numero lo muestra en un text field, y ese numero lo necesito en un query de access para buscar una fila en especifico, epro siempre me da error en el query, algo de criteria mismatch, y si en la base de datos cambio el campo a texto me dice que no encuentra el registro, que puedo hacer?? aca les dejo el codigo

Código asp:

<%
    Dim random
 
    Function RandomNumber(inicio, fin)
    Randomize()
    RandomNumber = Int((fin - inicio + 1) * Rnd + inicio)
    End Function
    
    ' generar un numero entre 1 y 5
    'response.write "Numero generado :" &RandomNumber(1, 5)
 
    'random="randomNumber(1,5)"
%>
 
<form name="form1" method="post" action="">
        <label>
          <input type="text" name="rdnnumber" id="rdnnumber" value="<%=Randomnumber(1,5)%>">
          </label>
      </form>
 
<%
    Dim  record, CNN, frase
    Set CNN = Server.CreateObject("ADODB.Connection")
    Set record = Server.CreateObject ("ADODB.RecordSet") 
    CNN.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & Server.MapPath("DB_analistas.mdb") 
            
    sql = "SELECT * FROM Frases where id='"&Request.Form("rdnnumber")&"'"
    Set record = CNN.Execute(Sql)
        
    'frase=record("Frase") & "//" & record("autor")
 
    CNN.close
    Set CNN=Nothing
%>  
 
    <td valign="top" background="images/fondo_header.jpg"><marquee behavior="scroll" scrollamount="1" scrolldelay="40" onMouseOver="'this.stop()'" onMouseOut="'this.start'"><%=response.write(record("frase"))%> <%response.write(Record("autor"))%></marquee></td>
 

[donkanmcklaus]

la idea del codigo anterior es la de mostrar un marquee con frases del dia, pero que lo haga de forma aleatoria, la base de datos tiene 3 columnas ID, frase y autor, la idea es que el query busque el id generado por el numero aleatorio y que el marquee lo muestre, no se si me explico?

[David]

Si el campo id es numérico debería ir sin las comillas simples ('), además, ¿has comprobado que realmente exista el número buscado en la base de datos?. Sin contar que la primera vez que entres no devolverá ningún resultado hasta que envíes el formulario.

[donkanmcklaus]

ya lo arregle, era que tenia malo como tu dices las comillas, y que etsaba cerrando la conexion antes de mostrar el marquee, si alguien necesita un marquee que busque una fila aleatoriamente aca tiene el codigo que funciona para mi.

lo que ahora no me funciona es que cuando me pare con el mouse sobre el parque se pare, y cuando me quite se reanude el movimiento... pero buehh no todo es perfecto

Código asp:

<%
    Dim random
 
    Function RandomNumber(inicio, fin)
    Randomize()
    RandomNumber = Int((fin - inicio + 1) * Rnd + inicio)
    End Function
    
    random=randomNumber(1,5)
%>
 
<%
    Dim  record, CNN, frase
    Set CNN = Server.CreateObject("ADODB.Connection")
    Set record = Server.CreateObject ("ADODB.RecordSet") 
    CNN.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & Server.MapPath("DB_analistas.mdb") 
            
    sql = "SELECT * FROM Frases where id='"&random&"'"
    Set record = CNN.Execute(Sql)
        
    'frase=record("Frase") & "//" & record("autor")
 
    'CNN.close
    'Set CNN=Nothing
%>  
 
La Frase del dia:<marquee scrollamount="1" scrolldelay="40" onMouseOver="'this.stop()'" onMouseOut="'this.start'"><span class="Estilo11"><%response.write(record("frase"))%> </span><span class="Estilo11">/</span> <span class="Estilo11"><%response.write(Record("autor"))%></span></marquee>