Combo Dinamica

[rodrigotnoma]

Estou usando esse codigo para fazer combo dinamica, detalhando:

Tenho 2 combo, no primeiro tenho 2 opções de escolha: usuario e equipamento.quando escolho uma delas o segundo combo atualiza e mostra o que esta no BD.então no evento Click do combo1 coloquei isto:

Set rs = cn.Execute("select * from tb_troca")

Do While Not rs.EOF

Combo2.AddItem rs("combo1.text")

rs.MoveNext

Loop

Mas não esta conseguindo pegar o valor da combo1.text e da essa mensagem:

"O item não pode ser encontrado na coleção correspondente ao nome ou ao ordinal solicitado".

Se puderem me dar uma força agradeço.

Rodrigo

[lcs_sp]

e isso mesmo ?

Combo2.AddItem rs("combo1.text") <--- o nome do recordset e combo1.text

[rodrigotnoma]

Cara, vlw pela ajuda, já consegui resolver:

combo2.clear

x=combo1.text

Set rs = cn.Execute("select * from tb_troca")

Do While Not rs.EOF

Combo2.AddItem rs(x)

rs.MoveNext

Loop

já lembrando que se não colocar o que esta em "laranja", toda vez que fizer uma escolha no combo1 no combo2 o resultado ira se acumulando e não aparecendo os dados corretos.

Obrigado pela ajuda.

Rodrigo