Publicado em 4 de dez.

Caixa de Seleção com dados de um banco de dados (tb)

Tenho uma "tb_siglas_paises" e um dos campos tem o nome: "nome_pais".

Gostaria de colocar todos os países que estão na "tb_siglas_paises" dentro de uma "Caixa de Seleção" e um botão do lado "OK". Escolhendo um determinado país na "Caixa de Seleção" e clicando no botão "OK" iria para outra página onde se encontra um mapa que tem o campo "nome_pais" daquele país que escolhi na "Caixa de Seleção" em um determinado local.

Estou tentando criar primeiro a "Caixa de Seleção" mas abre umas besteiras, ou seja, diversas "Caixas de Seleção" vazias, já andei alterando e abriu um "Caixa de Seleção" para cada país.

Tenho consciência que estou no caminho errado.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Selecione um país</title>

<%
Dim conexaoDatabase
Call AbreConexao
'crio o rs
set rs=Server.CreateObject("ADODB.Recordset")
'crio o SQL
SQL="SELECT tb_siglas_paises.nome_pais FROM tb_siglas_paises"
rs.open SQL,conexaoDataBase,1,3
'Fechando a conexão
set conexaoDataBase = nothing
%>

</head>

<body>

<%while not rs.eof%>

<select name="modo">
 <option value=<%=rs("nome_pais")%>"Entidade"</option>
</select>

<% rs.movenext
wend
Set rs=nothing
Set conexaoDatabase=nothing
%>

</body>
</html>

Discussão (7)

Entre ou cadastre-se para participar da discussão

Entrar Criar conta

Carregando comentários...