Deixa um item do list selecionado.

[natalia 0]

Oi pessoal, alguém saberia me dizer pq não consigo deixar selecionada a subcategoria no list? Se eu fizer assim como no exemplo abaixo não funciona: <select name="sbcCodigo" class="Adm-list"> <% strSubcategoria = " SELECT * FROM Subcategoria ORDER BY sbcNome " Set rsSubcategoria = Conexao.Execute(strSubcategoria) If Not rsSubcategoria.EOF Then While Not rsSubcategoria.EOF %> <option value="<%=rsSubcategoria("sbcCodigo")%>" <% If rsSubcategoria("sbcCodigo") = sbcCodigo Then %> selected <% End If %>><%=Left(rsSubcategoria("sbcNome"),65)%></option> <% rsSubcategoria.MoveNext Wend End If rsSubcategoria.Close Set rsSubcategoria = Nothing %> </select> Só fica selecionada assim, pq? <% Dim strSubcategoria, rsSubcategoria strSubcategoria = " SELECT * FROM Subcategoria WHERE sbcCodigo = " & sbcCodigo Set rsSubcategoria = Conexao.Execute(strSubcategoria) If Not rsSubcategoria.EOF Then sbcCodigo = rsSubcategoria("sbcCodigo") End If rsSubcategoria.Close Set rsSubcategoria = Nothing %> <select name="sbcCodigo" class="Adm-list"> <% strSubcategoria = " SELECT * FROM Subcategoria ORDER BY sbcNome " Set rsSubcategoria = Conexao.Execute(strSubcategoria) If Not rsSubcategoria.EOF Then While Not rsSubcategoria.EOF %> <option value="<%=rsSubcategoria("sbcCodigo")%>" <% If rsSubcategoria("sbcCodigo") = sbcCodigo Then %> selected <% End If %>><%=Left(rsSubcategoria("sbcNome"),65)%></option> <% rsSubcategoria.MoveNext Wend End If rsSubcategoria.Close Set rsSubcategoria = Nothing %> </select>

[jrcardozo 4]

quando você faz a verificação com oif tente assim quando for verdadeiro

 

 <% If rsSubcategoria("sbcCodigo") = sbcCodigo Then %> selected="selected"<% End If %>><%=Left(rsSubcategoria("sbcNome"),65)%>

outra coisa....no primeiro codigo você não usou o where, você passou o parâmentro para a variavel sbcCodigo??

[CassianoVix 0]

Natalia

 

Tenta fazer o seguinte:

 

No lugar de:

 

<% If rsSubcategoria("sbcCodigo") = sbcCodigo Then %>

Tenta:

 

<% If rsSubcategoria("sbcCodigo") = Cint(sbcCodigo) Then %>

O RecordSet provavelmente está retornando um valor inteiro, e a sua variável (se está sendo preenchida com request.form, provavelmente é string.

 

Fazendo essa conversão de tipos, deve funcionar.

 

Abraço,

Cassiano.