7 replies to this topic

[paes]

pessoal... to precisando pegar o cadastro de uma tabela em meu banco de dados e passar para um combo box (akele q vc clica e aparece várias opções)....

alguém me poderia passar o código??

[<% developer %>]

acho q é isso - primeiro vc deve criar a conexao com o Bd e depois setar a variável RS com o código SQL de seleção (num entendeu... veja)

Set conexao = Server.CreateObject("ADODB.Connection")
conexao.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("banco.mdb")

Set RS = conexao.Execute("Select * From nome_da_tabela")

aqui está o código

<% do while not rs.eof %>
<input type="checkbox" name="<%=Rs.Fields("nome_da_coluna")%> />
<% Rs.MoveNext
Loop %>

se não for isso... explique melhor por favor blz?

[siola]

ae developer acho que ele quer esse aqui


<%Set conexao = Server.CreateObject("ADODB.Connection")
conexao.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("banco.mdb")

Set RS = conexao.Execute("Select * From nome_da_tabela") %>
<select size="1" name="campo">
<%While not rs.EOF %>
<option value="<%=rs("campo")%>"><%=rs("campo")%></option>
<%rs.MoveNext
Wend %>
</select>

[<% developer %>]

eh chacal... tbm achei, mas como ele falou combobox, eu assemelhei com checkbox hehehehe

[paes]

ae...
valeu <% developer %> mas é o do chacal q eu quero...
valeu pela ajuda... vo testa aki e se tiver problemas venho novamente aki

[<% developer %>]

tah bom... fica pra kem kiser estudar hehehehe

[Reluviari]

valewwww
caras obrigado por vcs terem colocado isso aki aki...........me ajudou muito

[siola]

o cara desenterou o topico..ehaueha