asp y vbscript - msgbox y paso variables

[xaime]

El código de abajo no me funciona, dice:
Error de Microsoft VBScript en tiempo de ejecución (0x800A000D)
No coinciden los tipos: 'mensaje'

¿Cómo puedo pasar valores de variables en ejecución en servidor <%%> a un
script cliente ?

<%
dim nomeUser
dim nomePass
nomeUser=request.queryString("user")
nomePass=request.queryString("pass")
response.write("Chequeo de valores: " & nomeUser & " _ " & nomePass)

'//-- mirar para que funcione.
'set frm1=Document.inscripcion
'frm1.nombreUsuario.Focus()
call mensaje(nomeUser, nomepass)
%>
<script language="VBScript">
Sub mensaje (user, pass)
msgBox("nombreYpass: " & user & " " & pass)
'msgBox(SQL)
End sub
</script>

[Matias Iacono]

Nunca podras hacerlo de la forma como lo planteas.

ASP corre del lado del servidor, y VBScript o JavaScript corren en el
cliente.

Entre ambos no se conocen.

Lo maximo que puedes hacer es ESCRIBIR la llamada en el HTML, pero no podras
retornarle valores al ASP salvo que recargues la pagina y ejecutes todo el
procedimiento nuevamente.

Por ejemplo:

<%
dim nomeUser
dim nomePass
nomeUser=request.queryString("user")
nomePass=request.queryString("pass")
response.write("Chequeo de valores: " & nomeUser & " _ " & nomePass)

'//-- mirar para que funcione.
'set frm1=Document.inscripcion
'frm1.nombreUsuario.Focus()
response.write("mensaje(" & nomeUser & ", " & nomePass & ")")
%>
<script language="VBScript">
Sub mensaje (user, pass)
msgBox("nombreYpass: " & user & " " & pass)
'msgBox(SQL)
End sub
</script>

Saludos,
--
Matias Iacono
Microsoft MVP ASP/ASP.net
***@info-arch.com
Perfil: http://aspnet2.com/mvp.ashx?MatiasIacono

Post by xaime
Error de Microsoft VBScript en tiempo de ejecución (0x800A000D)
No coinciden los tipos: 'mensaje'
¿Cómo puedo pasar valores de variables en ejecución en servidor <%%> a un
script cliente ?
<%
dim nomeUser
dim nomePass
nomeUser=request.queryString("user")
nomePass=request.queryString("pass")
response.write("Chequeo de valores: " & nomeUser & " _ " & nomePass)
'//-- mirar para que funcione.
'set frm1=Document.inscripcion
'frm1.nombreUsuario.Focus()
call mensaje(nomeUser, nomepass)
%>
<script language="VBScript">
Sub mensaje (user, pass)
msgBox("nombreYpass: " & user & " " & pass)
'msgBox(SQL)
End sub
</script>

[Int_21]

<script language="VBScript">
call mensaje("<%=nomeUser%>", "<%=nomepass%>")
</script>

no te sirve algo asi??