Foros del Web - Ver Mensaje Individual - Problemas para crear una lista con valores de base datos mysql

JaioneA · #1 (**permalink**) 08/06/2004, 08:31

Tengo un item en un form en el cual quiero cargar una lista de numeros que estan guardados en una tabla mysql. La columna de la tabla mysql de donde cojo los datos esta definida como int 8. En el form tambien tengo un boton.
Ahora mismo en la tabla mysql tengo tres numeros, 1, 2 y 3.
Quisiera lograr lo siguiente:

1- La primera vez que entro en el form, quisiera cargar los numeros en la lista y que quedase seleccionado el mayor numero. Para lograr esto, recorro la tabla en orden desdendente y cuando estoy tratando el primer registro, lo selecciono (escribo el texto 'selected'). Esto lo hace bien.

2- Quisiera que cuando el usuario elija un numero de los que he cargado, al pulsar el boton, se cargara la lista de la base de datos (los numeros 1, 2 y 3 adtualmente) y quedara seleccionado el numero elegido. Esto es lo que no logro hacer. Para esto, ejecuto la misma select que en el caso 1 y voy comparando cada numero de la base de datos con el request.form("rev"). El problema es que esta comparacion ->
if (request.form("rev") = ordenes_dd("revision_dd"))
nunca es true.
¿Que debo hacer?

Este es el codigo :

<% Option Explicit %> <!- Para que obligue a declarar toda variable utilizada ->

<html>
<head>
<title> Diseinurako datuak </title>

</head>
<body>

<h3 align= 'center'> DISEINURAKO ORRIAK / HOJAS DE DISEÑO </h3>

<%

'---------------------------------------------------------------------------------
' EJECUCION PRINCIPAL
'---------------------------------------------------------------------------------

Dim v_conn
Dim ordenes_dd
Dim v_rev
Dim v_veces
Dim cc_p1_dd
Dim nombre
Dim v_revision_dd
Dim indice
Dim v_elegido_sn
Dim cambio_pagina2
Dim p1_hf
Dim v_sql
Dim v_aux

response.write("<form name = 'diseno' action= 'TAR_LIST.asp' method = 'post'>")

' Dibujar lista de revisiones para esa of

response.write ("Berrik./Rev.")

set v_conn = Server.createobject ("adodb.connection")
v_conn.open "dd_hf"
set ordenes_dd = Server.createobject ("adodb.recordset")

ordenes_dd.open "select * from ordenes_dd where gpoftip_cod ='P' and n_orden=14005

order by revision_dd desc " , v_conn

v_rev = "<select name = 'rev' >"
v_veces = 0
do until ordenes_dd.eof
if (request.form("rev") <> "") then ' El usuario ha elegido una revision
if (request.form("rev") = ordenes_dd("revision_dd")) then
v_elegido_sn = "selected"
else
v_elegido_sn = ""
end if

v_rev=v_rev& "<option value = '" & ordenes_dd("revision_dd") & "'" &

v_elegido_sn & " >" & ordenes_dd("revision_dd") & "</option>"

else ' es la primera vez que entramos, visualizaremos la ultima revision
if (v_veces = 0) then
v_veces = 1
v_revision_dd = ordenes_dd("revision_dd") ' la ultima revision
v_rev=v_rev& "<option value = '" &ordenes_dd("revision_dd")& "' selected

>"&ordenes_dd("revision_dd")&"</option>"
else
v_rev=v_rev& "<option value = '" &ordenes_dd("revision_dd")&

"'>"&ordenes_dd("revision_dd")&"</option>"
end if
end if
ordenes_dd.movenext
loop

v_rev = v_rev & "</select>"

response.write(v_rev)
response.write("<input type='submit' name='b_cargar' value='Datuak kargatu'>")

ordenes_dd.close
set ordenes_dd = Nothing

v_conn.close
set v_conn = Nothing

response.write("</form>")

%>

</body>
</html>

Muchas Gracias.

Simplemente quiero añadir que no he probado a modificar la base de datos y en vez de int, definir el campo como varchar y en este caso no me da problemas. Yo necesito que el campo sea int, que puedo hacer?