lista desplegable de u campo

[capuleto]

Tengo el siguiente codigo en asp, que me muestra todos los alumnos con su identificacion, nombre, apellidos y Programa que cursa...lo que quiero es que en ves del id del programa me muestre el nombre del programa..por ejemplo actualmente me muestra programa 1, me gustaria que me mostrara en una lista desplegable el nombre del programa, por ejemplo: Ingles Basico..
Aqui les dejo el codigo:

Código:

iscolor = true
							nR=1
							for row = Inicio to Inicio + (PorPagina - 1)
							  if nR=1 then
							    Response.write "<table align=center class='cal2' width='100%'><tr><td width='10%' bgcolor='#BBD1E8' align=center><A HREF='adialu.asp'><img src='images/btnAdd.gif' alt='Adicionar' border='0'></a></td><td width='20%' bgcolor='#BBD1E8' align=center><b>IDENTIFICACION</b></td><td width='30%' align=center bgcolor='#BBD1E8'><b>APELLIDOS</b></td><td width='30%' align=center bgcolor='#BBD1E8'><b>NOMBRES</b></td><td width='10%' align=center bgcolor='#BBD1E8'><b>PROGRAMAS</b></td></tr>"
							    nR=2 
							  end if
							  response.write "<tr bgcolor=#EFEFEF>"
							  if rs.eof then exit for
							  if iscolor then
							    iscolor=false
							  else
							    iscolor=true
							  end if
				          %>
						      <td align=left bgcolor='#BBD1E8'>
							  <p align="center"><a href='edialu.asp?cual=<%= rs.Fields("idalumno").Value %>'>
							  <img src='images/btnEdit.gif'  border='0' alt='Editar' name='Edit1'></a>            
							  <a href='elialu.asp?cual=<%= rs.Fields("idalumno").Value %>'> 
						      <img src='images/btnDelete.gif'   border='0' alt='Eliminar' name='Delete1'></a></td>
							  <td valign=top align=left bgcolor='#BBD1E8'><%= rs.Fields("idalumno").Value %></td>
						  <%   
						      response.write "<td>" & Trim(rs("apellidos")) & "</td>"
							  if Len(rs("nombres"))> 0 then
							    response.write "<td bgcolor='#EFEFEF'>" & Trim(rs("nombres")) & "</font></td>"
							  end if
							  response.write "<td>" & Trim(rs("idprograma")) & "</td>"
							  response.write"</tr>"
							  i = i + 1
							  rs.movenext
							next
							Response.write "</table>" 
							rs.close
							set rs= nothing 
							conn.close
							Set conn = Nothing
						  %>

espero y me orienten, ok..gracias y chao...

[Myakire]

Cambia
response.write "<td>" & Trim(rs("idprograma")) & "</td>"
por
response.write "<td>" & Trim(rs("DescripcionPrograma")) & "</td>" donde DescripcionPrograma es el nombre del campo que tiene la información que quieres.

Saludos

[capuleto]

pero como hago, para que DescripcionPrograma, se relacione con el identificador de cada estudiante, es decir, a cada estudiante le salga su programa que le corresponde..??, porque actualmente me sale id del programa 1, y id del programa 2, es decir a cada estudiante le corresponde un programa en particular y de la manera que dices, no me saldra siempre el mismo programa para cada estudiante...??

[Myakire]

Supongamos que TbAlumnos tiene:
IdAlumno
....
IdPrograma

Y tienes una TbProgramas con:
IdPrograma
DescripcionPrograma

Haces una relación:

Select * from TbAlumno A Inner Join TbProgamas P On A.IdPrograma = P.Programa
o bien
Select * from TbAlumno A, TbProgamas P where A.IdPrograma = P.Programa

Lo que pasa es que como no pusiste nada de lo que usas para hacer la conexión, supuse que ya las tenias relacionadas.