Itens selecionados na select

[suzaco7 0]

Boa tarde pessoal, estou passando um sufoco aqui e queria a ajuda de vcs.

Primeiro eu tenho uma tabela de clientes e outra de forma de pagamento. Através de um sp eu listo a tabela de cliente referente ao registro selecionado e na tabela de forma de pagamento as formas de pagto onde o id é igual a do cliente.

Tenho um cadastro de clientes, onde neste formulário existe um campo forma de pagamento. Este campo está um uma <select> onde na hora do cadastro pode ser selecionado as formas de pagamentos que este cliente pode pagar se for fazer alguma compra.

Consigo cadastrar e alterar, mais quando seleciono um cliente, os dados vem carregados normalmente, mais não sei como trazer esta lista com os itens de formas de pagamento selecionadas.

Será q alguem pode me dar uma luz?

Estou tentando fazer com um do while para pegar os dados em forma de array e trata-los, mais aceito sugestões, pois nunca fiz isso.

Agradeço a ajuda.

 

ASP

sql = "sp_Forma_Pagamento_Cliente_Lista " & codCliente

    set oRsFormaPagto = ReadQuery(sql, SysConnection)

 

    if not oRsFormaPagto.EOF then

        do while not oRsFormaPagto.EOF

            arrFormPgto = oRsFormaPagto("codFormaPagto")

            arrFormPgtoAnt = arrFormPgtoAnt & ", " & arrFormPgto

        loop

    end if

 

    oRsFormaPagto.close

    set oRsFormaPagto = nothing

[SerraVentura 0]

você pode criar uma função...

mais ou menos assim...

 

<select>

<%=lista(id)%>

</select>

 

ASP

<%

function lista (id)

   for ...

      if id = rs("id") then sel = "selected" else sel = ""

      response.write "<option "&sel&" value=""&rs("id")&"">"&rs("nm_formpag")&"</option>"

   next...

end function

%>

 

é só uma ideia...