Quantcast
Channel: Fórum ASP
Viewing all articles
Browse latest Browse all 1214

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

$
0
0

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>
<!--#Include file="dbConexao.asp"-->
<%
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>


Viewing all articles
Browse latest Browse all 1214

Trending Articles