PAGINA1.HTM
-----------
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<script>
function nav(){
if (fr.falcal.value==''){
window.navigate('ASP_pag1.asp?falcal=0')
}else{
window.navigate('ASP_pag1.asp?falcal=1')
}
}
</script>
</HEAD>
<BODY>
<form name="fr" id="fr">
<input id="falcal" name="falcal" value="" onclick="nav()">
</form>
<P>&nbsp;</P>
</BODY>
</HTML>
ASP_pag1.asp
------------
<%@ Language=VBScript %>
<%
' Para js_pag1
if request("falcal")="0" then
Response.Write("0")
end if
if request("falcal")="1" then
Response.Write("1")
end if
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<p></p>
</BODY>
</HTML>