asp y vbscript - msgbox y paso variables

16/03/2005 - 13:59 por xaime | Informe spam
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>
 

Leer las respuestas

#1 Matias Iacono
16/03/2005 - 15:25 | Informe spam
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

Perfil: http://aspnet2.com/mvp.ashx?MatiasIacono
"xaime" wrote in message
news:
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>


Preguntas similares