Pasar parametro asp a una funcion VBScript

[qvenmisakais]

buenas compañeros,

Vereis tengo la siguente funcion escrita en vb script

<SCRIPT language="vbscript">
Sub Seleccionar_Items_Combos(Valor)
dim i,pos,var1

msgbox "Punto de control"

for i=0 to document.formulario.elements
("cmbresponsable").options.length -1

formulario.elements("cmbresponsable").selectedInde x=i
if(document.formulario.elements("cmbresponsable"). options(i).text=valor)then
pos=i
end if
next
End Sub
</SCRIPT>

Y la llama desde al final de la pagina con la siguiente instruccion.
Si el valor es fijo como en el primer caso pepe, la cosa va estupenda.

<SCRIPT language="vbscript">
Seleccionar_Items_Combos ("Pepe")
</SCRIPT>

Pero si intento pasarle un valor dinamico que recogo en un textbox, la cosa no tira. La pagina se abre, no me da error pero no ejecuta la funcion. Lo se por que no sale el msgbox de Punto de control.

<SCRIPT language="vbscript">Seleccionar_Items_Combos <%RsVisProducto(Nombre).value%> </SCRIPT>

Supongo que es por que realmente no esta llamando a la funcion.

Alguien me puede hechar una mano?

Gracias.