[Resolvido] Exibir todos os dados dentro dentro de um combo box

[Jow Xavier 0]

Estou tentando exibir os dados do meu banco de dados dentro um combo box, preciso trazer o registro cadastrado selecionado, e junto os outros registros do banco ... meu código está assim:

<td width="109" valign="top" class="titulo1">Classificação</td>

<td width="319"><select name="id_categoria" class="formulario">

<option <% Response.Write("selected=""selected""") : %>><%=tab("id_categoria")%></option>

 

</select>

... Só não estou conseguindo trazer o restante dos dados, junto do registro selecionado ...

[Mário Monteiro 179]

mande listar exatamente igual ao formulario de cadastro

 

a unica diferença é que voce colocará um IF nos options perguntando se seu valor é igual ao que foi cadastrado

 

se for escrever selected

[Jow Xavier 0]

Então Mário acontece q do jeito q está o meu script ele está trazendo selecionado do banco de dados o q foi cadastrado ... O q eu preciso é q além de trazer o registro cadstrado ele tbm traga os outros dados do banco .. Por exemplo na combo do formulário de cadastro eu tenho os valores: x, y, z ... o usuário cadastrou z ... Em um formulário de update ... O meu campo traga em uma combo o valor selecionado "z" e tbm traga os valores "x" e "y" ...

[Mário Monteiro 179]

por isso disse que tem que ser igual ao form de inclusao

 

como esta este?

 

é so fazer uma copia e mudar a parte que coloca os valores que vem do db

[Jow Xavier 0]

Ok ... como ficaria a string "Alteração" abaixo com o valor do banco de dados ..

<option <% If tab("id_categoria") = "Alteração" Then : 
 Response.Write("selected=""selected""") : End If%>><%=tab("cliente")%>

[Mário Monteiro 179]

antes disso me mostre como fez o form que insere no db

 

é com base nele que deve ser feito esse

[Jow Xavier 0]

<!-- #include file="config/conexao.asp"-->

<% call abre_conectar

sql = "Select * from categorias"

set tab = cnn.execute(sql)%>

 

<form name="form1" action="inserir_produto.asp" method="post" enctype="multipart/form-data">

<table align="center">

<tr>

<td class="titulo1">Classificação:</td>

<td>

<% if not tab.EOF then %>

 

<SELECT NAME="id_categoria" class="formulario">

<%while not tab.EOF %>

<OPTION value="<%=tab("classificacao")%>"><%=tab("classificacao")%></OPTION>

<%

tab.movenext

wend

%>

</SELECT>

<%

end if

call fecha_conectar

set tab = nothing

%>

[Mário Monteiro 179]

Entao a parte so terá a alteração da inclusao do IF

 

So que voce precisará comparar com o que ta no DB

 

<% if not tab.EOF then %>  
						  
	<SELECT NAME="id_categoria" class="formulario">
<%while not tab.EOF %>
		<OPTION value="<%=tab("classificacao")%>" <%IF tab("classificacao") = RS("ValornoDB")% THEN Response.Write "selected" END IF%>><%=tab("classificacao")%></OPTION>			
		<%
			tab.movenext
		wend
%>
	</SELECT>
<%
	end if

Teste

[Jow Xavier 0]

Bom dia Mário, cara eu consegui resolver de outra forma, mais meu código ficou muito grande, por isso resolvi da sua forma q funcionou perfeito, só kebrei um pouco a cabeça pq ñ estava exibindo o restante dos dados, mas ai eu percebi q ñ estava exibindo pq a minha sql estava assim:

<% 

id1 = Request.QueryString("alterar")

 

sql = "SELECT * FROM produtos WHERE id = "&id1

set tab = cnn.execute(sql) %>

ou seja estou mandando trazer no formulário apenas o registro q o usuário selecionou, pra trazer o restante dos dados no campo SELECT, fiz assim:

sql = "SELECT * FROM produtos "

set tab = cnn.execute(sql) %>

funcionou maravilha ... Valeu problema resolvido !!!

[Mário Monteiro 179]

Que bom qeu conseguiu

 

Parabens