como se el valor de combo

[LinosINK]

Buenas a todos, q tal?
Como le paso el valor d un combo a una caja estando en la misma página?.

A ver si me explico:
Cargo un combo d una base d datos con nombres d cursos y quiero q al pinchar en el curso automaticamente me ponga su precio en una caja, pero me falla, se hacerlo con formulario con el request.form pero estando en la misma página no me pispo, se q es una tonteria pero q se le va a hacer, jeje, si me pudieras ayudar os lo agradeceria.
tendria q guardarlo en una varieble?: Nombre=Request ("cmbNombre")

<tr><td>
<%
dim R,C,sSQL

Set C = Server.CreateObject ("ADODB.Connection")
C.Open "DSN=dominio.com.tienda"

sSQL = "Select precio from Articulos where nombre= ???
Set R = C.Execute (sSQL)
%>

Precio Curso:
<input name="txtPrecio" type="text" value='<%Response.Write R.fields("precio")%>' size="10" maxlength="10">
</td></tr>

Gracias.