¿Ayudita con ASP, please?

Hola Alfredo,

Para llenar un combo es muy simple, primero debes conectarte a una base de
datos, realizar la consulta (select * from tabla) y luego llenar el combo.

Antes que nada todo lo que está entre <% %> es código del servidor y todo
lo demás es el código que verá el usuario en el browser.

<%
Dim objCon, objRec, Sql
'Establecemos la conección con la base de datos
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "string de connection" 'Dependerá de la base de datos

'Creamos la consulta
Sql = "Select * From Productos "

'Devolvemos los datos
Set objRec = objCon.Execute(Sql)
'Mostramos el Combo
%>
<select name="Productos">
<%

While Not objRec.EOF()
Response.Write "<option value='" & objRec("Codigo) "& "'>" &
objRec("Producto") & "</option>"
objRec.MoveNext
Wend

%>
</select>
<%


Set objRec = Nothing

objCon.Close
Set objCon = Nothing
%>


Eso, espero que te ayude.

Saludos,
Jhonny Vargas P.
Santiago de Chile




"©Alf®edo©" escribió en el mensaje
news:
Mostrar la cita

Hola a todos. Yo programo en VB desde hace ya algunos años pero me han
preguntado cómo hacer una página como esta en ASP y no tengo ni idea de

cómo
Mostrar la cita

sería.

http://www.hermes-schleifmittel.com...ameset.htm
Mostrar la cita

Se trata de hacer el "Product Finder", no el resto. Como véis es un
combobox que carga al principio unas referencias y en función de la que se
elija aparece otra pantalla con otros combobox para seguir seleccionando
cosas. En realidad es un filtrado que permite al cliente ir seleccionando

el
Mostrar la cita

artículo final. Aunque la página está en alemán, el concepto es el que se
necesita hacer.

Yo lo podría hacer en VB sin problemas pero en ASP ni idea de cómo es.
¿Cambiaría mucho la cosa? ¿Me podéis dar alguna pista?

Gracias y en especial a Johnny por darme la idea de postear en este
grupo que no conocía.

Un saludo.