Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Ayuda por favor, gran problema!!

08/12/2004 - 22:14 por Alex | Informe spam
Ayuda Hacer una pregunta
Que tal buenas tardes a todos, quisiera ver si alguien me hecha un hilo con
este codigo ya que por mas que he buscado no hago que funcione

Tengo 2 Radio/Button(1 y 2) llamado rg1 y un List/Menu llamado sel, ahora si
oprimen el boton 2 seleccionan una opcion de list/menu todo esto no hay
problema, el problema lo tengo cuando tengo que pasar los valor a la otra
pagina, puse el siguiente codigo para que dependiendo de la opcion me diriga
a una pagina a otra
<%
Sub redirectMe()
Dim strChoice
strChoice = Request.Form("rg1")
if strChoice <> "" then
select case strChoice
Case 1
response.Redirect "Todo.asp"
Case 2
response.Redirect "Ejecutivo.asp"
end select
end if
End Sub
%>
y me funciona bien, pero no me pasa los valores a la otra pagina ni de los
radio/button ni el del list/menu, creo que en algun momento se pierden los
valores pero no se ni donde ni que onda.
Alguien me puede ayudar por favor ya no se que hacer!!!! Saludos!!!
email Siga el debateRespuesta 7 respuestasRespuesta Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 Manuel Vera
08/12/2004 - 22:58 | Informe spam
Por lo que comentas, creo que estas trabajando con 2 ASP:
a.- donde esta el <FORM>
b.- procesas y redireccionas
c.- recibes

Si este es el caso no te sirve usar Response.Redirect pues los datos se
quedan en (b).
Creo que puedes probar con:
Server.Execute(url)
Ejecuta la url y permanece en (b)
o
Server.Transfer(url)
Es similar a Redirect pero mantiene el POST del <FORM> de (a)

Chequea la sintaxis de esos dos metodos pues no estoy seguro si reciben otro
parametro.

Salu2
MV

"Alex" wrote in message
news:%
Que tal buenas tardes a todos, quisiera ver si alguien me hecha un hilo


con
este codigo ya que por mas que he buscado no hago que funcione

Tengo 2 Radio/Button(1 y 2) llamado rg1 y un List/Menu llamado sel, ahora


si
oprimen el boton 2 seleccionan una opcion de list/menu todo esto no hay
problema, el problema lo tengo cuando tengo que pasar los valor a la otra
pagina, puse el siguiente codigo para que dependiendo de la opcion me


diriga
a una pagina a otra
<%
Sub redirectMe()
Dim strChoice
strChoice = Request.Form("rg1")
if strChoice <> "" then
select case strChoice
Case 1
response.Redirect "Todo.asp"
Case 2
response.Redirect "Ejecutivo.asp"
end select
end if
End Sub
%>
y me funciona bien, pero no me pasa los valores a la otra pagina ni de los
radio/button ni el del list/menu, creo que en algun momento se pierden los
valores pero no se ni donde ni que onda.
Alguien me puede ayudar por favor ya no se que hacer!!!! Saludos!!!


Respuesta Responder a este mensaje
#2 Alex
08/12/2004 - 23:31 | Informe spam
Gracias Manuel por la ayuda, tratare de explicar un poco mejor lo que estoy
haciendo, a ver que me aconsejan
Tengo una pagina llamada filtro.asp donde coloco un form con 2
radio/botton con valor 1 y 2 respectivamente, y un combobox
ahora si selecciona el radio/botton 1 se dirige a una pagina llamada
todo.asp y si escogen el radiobotton 2 se activa el combobox y escogen un
producto
que va a la pagina ejecutivo.asp, es decir tengo 3 asp la primer de
filtro (filtro.asp)

la segunda todo.asp y la tercera ejecutivo.asp
pero cuando puse la funcion que anote anteriormente para ver a que pagina se
dirigia dependiendo la opcion que escogieron, no me pasa nada de los valores
entonces no se que pasa, ayuda porfa!!!!
Ahora pongo aqui todo el codigo de la pagina no lo hice en el primer mensaje
porque creo esta algo largo pero lo pongo

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="../../Connections/base.asp" -->
<%
Dim CboFiltro2
Dim CboFiltro2_numRows

Set CboFiltro2 = Server.CreateObject("ADODB.Recordset")
CboFiltro2.ActiveConnection = MM_base_STRING
CboFiltro2.Source = "SELECT DISTINCT ClvEjecutivo, Ejecutivo FROM Categoria
ORDER BY Ejecutivo ASC"
CboFiltro2.CursorType = 0
CboFiltro2.CursorLocation = 2
CboFiltro2.LockType = 1
CboFiltro2.Open()

CboFiltro2_numRows = 0
%>
<%
Sub redirectMe()
Dim strChoice
strChoice = Request.Form("rg1")
if strChoice <> "" then
select case strChoice
Case 1
response.Redirect "Todo.asp"
Case 2
response.Redirect "Ejecutivo.asp"
end select
end if
End Sub
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<SCRIPT LANGUAGE="JavaScript">

function Disab (val) {
if(val=="0") then
{
form1.sel1.disabled=true
}
if(val=="1") then
{
form1.sel1.disabled=false
}
}
</SCRIPT>

</head>

<body>
<form name="form1" method="post">
<p>
<label> </label>
</p>
<table width="48%" border="0" align="center" cellpadding="0"
cellspacing="0">
<tr>
<td width="21%"><input name="rg1" type="radio" onClick="Disab
(1)" value="1" checked></td>
<td width="45%">Todo</td>
<td width="34%">&nbsp;</td>
</tr>
<tr>
<td><input type="radio" name="rg1" onClick="Disab
(2)" value="2"></td>
<td>Por Ejecutivo</td>
<td><select name="sel1" id="sel1" disabled>
<%
While (NOT CboFiltro2.EOF)
%>
<option
value="<%=(CboFiltro2.Fields.Item("ClvEjecutivo").Value)%>"><%=(CboFiltro2.F
ields.Item("Ejecutivo").Value)%></option>
<%
CboFiltro2.MoveNext()
Wend
If (CboFiltro2.CursorType > 0) Then
CboFiltro2.MoveFirst
Else
CboFiltro2.Requery
End If
%>
</select></td>
</tr>
<tr>
<td>&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
<td><input type="submit" name="Submit" value="Submit"></td>
<td>&nbsp;</td>
</tr>
</table>
<p>&nbsp;</p>
<p><br>
</p>
<p>
<label> </label>
</p>
</form>
<%
call redirectMe()
%>
</body>
</html>
<%
CboFiltro2.Close()
Set CboFiltro2 = Nothing
%>


Saludos!!!! cualquier ayuda me servira gracias!!!!

"Manuel Vera" escribió en el mensaje
news:
Por lo que comentas, creo que estas trabajando con 2 ASP:
a.- donde esta el <FORM>
b.- procesas y redireccionas
c.- recibes

Si este es el caso no te sirve usar Response.Redirect pues los datos se
quedan en (b).
Creo que puedes probar con:
Server.Execute(url)
Ejecuta la url y permanece en (b)
o
Server.Transfer(url)
Es similar a Redirect pero mantiene el POST del <FORM> de (a)

Chequea la sintaxis de esos dos metodos pues no estoy seguro si reciben


otro
parametro.

Salu2
MV

"Alex" wrote in message
news:%
> Que tal buenas tardes a todos, quisiera ver si alguien me hecha un hilo
con
> este codigo ya que por mas que he buscado no hago que funcione
>
> Tengo 2 Radio/Button(1 y 2) llamado rg1 y un List/Menu llamado sel,


ahora
si
> oprimen el boton 2 seleccionan una opcion de list/menu todo esto no hay
> problema, el problema lo tengo cuando tengo que pasar los valor a la


otra
> pagina, puse el siguiente codigo para que dependiendo de la opcion me
diriga
> a una pagina a otra
> <%
> Sub redirectMe()
> Dim strChoice
> strChoice = Request.Form("rg1")
> if strChoice <> "" then
> select case strChoice
> Case 1
> response.Redirect "Todo.asp"
> Case 2
> response.Redirect "Ejecutivo.asp"
> end select
> end if
> End Sub
> %>
> y me funciona bien, pero no me pasa los valores a la otra pagina ni de


los
> radio/button ni el del list/menu, creo que en algun momento se pierden


los
> valores pero no se ni donde ni que onda.
> Alguien me puede ayudar por favor ya no se que hacer!!!! Saludos!!!
>
>


Respuesta Responder a este mensaje
#3 Manuel Vera
09/12/2004 - 00:12 | Informe spam
Yo cambiaria algo como.

Dentro del <HEAD> colocas

<HEAD>
<script language=javascript>
function salida(oF){
var u;
u = (oF.elements['rg1'].checked) ? 'todo.asp' : 'ejecutivo.asp';
oF.action=u;
return true;
}
</script>
</HEAD>

Y luego en tu <FORM> esto otro

<form name="form1" method="post" ONSUBMIT="return salida(this)">

Saludos
MV


"Alex" wrote in message
news:%
Gracias Manuel por la ayuda, tratare de explicar un poco mejor lo que


estoy
haciendo, a ver que me aconsejan
Tengo una pagina llamada filtro.asp donde coloco un form con 2
radio/botton con valor 1 y 2 respectivamente, y un combobox
ahora si selecciona el radio/botton 1 se dirige a una pagina llamada
todo.asp y si escogen el radiobotton 2 se activa el combobox y escogen un
producto
que va a la pagina ejecutivo.asp, es decir tengo 3 asp la primer de
filtro (filtro.asp)

la segunda todo.asp y la tercera ejecutivo.asp
pero cuando puse la funcion que anote anteriormente para ver a que pagina


se
dirigia dependiendo la opcion que escogieron, no me pasa nada de los


valores
entonces no se que pasa, ayuda porfa!!!!
Ahora pongo aqui todo el codigo de la pagina no lo hice en el primer


mensaje
porque creo esta algo largo pero lo pongo

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="../../Connections/base.asp" -->
<%
Dim CboFiltro2
Dim CboFiltro2_numRows

Set CboFiltro2 = Server.CreateObject("ADODB.Recordset")
CboFiltro2.ActiveConnection = MM_base_STRING
CboFiltro2.Source = "SELECT DISTINCT ClvEjecutivo, Ejecutivo FROM


Categoria
ORDER BY Ejecutivo ASC"
CboFiltro2.CursorType = 0
CboFiltro2.CursorLocation = 2
CboFiltro2.LockType = 1
CboFiltro2.Open()

CboFiltro2_numRows = 0
%>
<%
Sub redirectMe()
Dim strChoice
strChoice = Request.Form("rg1")
if strChoice <> "" then
select case strChoice
Case 1
response.Redirect "Todo.asp"
Case 2
response.Redirect "Ejecutivo.asp"
end select
end if
End Sub
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<SCRIPT LANGUAGE="JavaScript">

function Disab (val) {
if(val=="0") then
{
form1.sel1.disabled=true
}
if(val=="1") then
{
form1.sel1.disabled=false
}
}
</SCRIPT>

</head>

<body>
<form name="form1" method="post">
<p>
<label> </label>
</p>
<table width="48%" border="0" align="center" cellpadding="0"
cellspacing="0">
<tr>
<td width="21%"><input name="rg1" type="radio" onClick="Disab
(1)" value="1" checked></td>
<td width="45%">Todo</td>
<td width="34%">&nbsp;</td>
</tr>
<tr>
<td><input type="radio" name="rg1" onClick="Disab
(2)" value="2"></td>
<td>Por Ejecutivo</td>
<td><select name="sel1" id="sel1" disabled>
<%
While (NOT CboFiltro2.EOF)
%>
<option



value="<%=(CboFiltro2.Fields.Item("ClvEjecutivo").Value)%>"><%=(CboFiltro2.F
ields.Item("Ejecutivo").Value)%></option>
<%
CboFiltro2.MoveNext()
Wend
If (CboFiltro2.CursorType > 0) Then
CboFiltro2.MoveFirst
Else
CboFiltro2.Requery
End If
%>
</select></td>
</tr>
<tr>
<td>&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
<td><input type="submit" name="Submit" value="Submit"></td>
<td>&nbsp;</td>
</tr>
</table>
<p>&nbsp;</p>
<p><br>
</p>
<p>
<label> </label>
</p>
</form>
<%
call redirectMe()
%>
</body>
</html>
<%
CboFiltro2.Close()
Set CboFiltro2 = Nothing
%>


Saludos!!!! cualquier ayuda me servira gracias!!!!

"Manuel Vera" escribió en el mensaje
news:
> Por lo que comentas, creo que estas trabajando con 2 ASP:
> a.- donde esta el <FORM>
> b.- procesas y redireccionas
> c.- recibes
>
> Si este es el caso no te sirve usar Response.Redirect pues los datos se
> quedan en (b).
> Creo que puedes probar con:
> Server.Execute(url)
> Ejecuta la url y permanece en (b)
> o
> Server.Transfer(url)
> Es similar a Redirect pero mantiene el POST del <FORM> de (a)
>
> Chequea la sintaxis de esos dos metodos pues no estoy seguro si reciben
otro
> parametro.
>
> Salu2
> MV
>
> "Alex" wrote in message
> news:%
> > Que tal buenas tardes a todos, quisiera ver si alguien me hecha un


hilo
> con
> > este codigo ya que por mas que he buscado no hago que funcione
> >
> > Tengo 2 Radio/Button(1 y 2) llamado rg1 y un List/Menu llamado sel,
ahora
> si
> > oprimen el boton 2 seleccionan una opcion de list/menu todo esto no


hay
> > problema, el problema lo tengo cuando tengo que pasar los valor a la
otra
> > pagina, puse el siguiente codigo para que dependiendo de la opcion me
> diriga
> > a una pagina a otra
> > <%
> > Sub redirectMe()
> > Dim strChoice
> > strChoice = Request.Form("rg1")
> > if strChoice <> "" then
> > select case strChoice
> > Case 1
> > response.Redirect "Todo.asp"
> > Case 2
> > response.Redirect "Ejecutivo.asp"
> > end select
> > end if
> > End Sub
> > %>
> > y me funciona bien, pero no me pasa los valores a la otra pagina ni de
los
> > radio/button ni el del list/menu, creo que en algun momento se pierden
los
> > valores pero no se ni donde ni que onda.
> > Alguien me puede ayudar por favor ya no se que hacer!!!! Saludos!!!
> >
> >
>
>


Respuesta Responder a este mensaje
#4 Alex
09/12/2004 - 00:16 | Informe spam
ok!! muchas gracias ahorita hago el cambio, pero y como paso el valor del
cambo a la pagina???
Saludos!!!

"Manuel Vera" escribió en el mensaje
news:#$
Yo cambiaria algo como.

Dentro del <HEAD> colocas

<HEAD>
<script language=javascript>
function salida(oF){
var u;
u = (oF.elements['rg1'].checked) ? 'todo.asp' : 'ejecutivo.asp';
oF.action=u;
return true;
}
</script>
</HEAD>

Y luego en tu <FORM> esto otro

<form name="form1" method="post" ONSUBMIT="return salida(this)">

Saludos
MV


"Alex" wrote in message
news:%
> Gracias Manuel por la ayuda, tratare de explicar un poco mejor lo que
estoy
> haciendo, a ver que me aconsejan
> Tengo una pagina llamada filtro.asp donde coloco un form con 2
> radio/botton con valor 1 y 2 respectivamente, y un combobox
> ahora si selecciona el radio/botton 1 se dirige a una pagina llamada
> todo.asp y si escogen el radiobotton 2 se activa el combobox y escogen


un
> producto
> que va a la pagina ejecutivo.asp, es decir tengo 3 asp la primer de
> filtro (filtro.asp)
>
> la segunda todo.asp y la tercera ejecutivo.asp
> pero cuando puse la funcion que anote anteriormente para ver a que


pagina
se
> dirigia dependiendo la opcion que escogieron, no me pasa nada de los
valores
> entonces no se que pasa, ayuda porfa!!!!
> Ahora pongo aqui todo el codigo de la pagina no lo hice en el primer
mensaje
> porque creo esta algo largo pero lo pongo
>
> <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
> <!--#include file="../../Connections/base.asp" -->
> <%
> Dim CboFiltro2
> Dim CboFiltro2_numRows
>
> Set CboFiltro2 = Server.CreateObject("ADODB.Recordset")
> CboFiltro2.ActiveConnection = MM_base_STRING
> CboFiltro2.Source = "SELECT DISTINCT ClvEjecutivo, Ejecutivo FROM
Categoria
> ORDER BY Ejecutivo ASC"
> CboFiltro2.CursorType = 0
> CboFiltro2.CursorLocation = 2
> CboFiltro2.LockType = 1
> CboFiltro2.Open()
>
> CboFiltro2_numRows = 0
> %>
> <%
> Sub redirectMe()
> Dim strChoice
> strChoice = Request.Form("rg1")
> if strChoice <> "" then
> select case strChoice
> Case 1
> response.Redirect "Todo.asp"
> Case 2
> response.Redirect "Ejecutivo.asp"
> end select
> end if
> End Sub
> %>
> <html>
> <head>
> <title>Untitled Document</title>
> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
> <SCRIPT LANGUAGE="JavaScript">
>
> function Disab (val) {
> if(val=="0") then
> {
> form1.sel1.disabled=true
> }
> if(val=="1") then
> {
> form1.sel1.disabled=false
> }
> }
> </SCRIPT>
>
> </head>
>
> <body>
> <form name="form1" method="post">
> <p>
> <label> </label>
> </p>
> <table width="48%" border="0" align="center" cellpadding="0"
> cellspacing="0">
> <tr>
> <td width="21%"><input name="rg1" type="radio" onClick="Disab
> (1)" value="1" checked></td>
> <td width="45%">Todo</td>
> <td width="34%">&nbsp;</td>
> </tr>
> <tr>
> <td><input type="radio" name="rg1" onClick="Disab
> (2)" value="2"></td>
> <td>Por Ejecutivo</td>
> <td><select name="sel1" id="sel1" disabled>
> <%
> While (NOT CboFiltro2.EOF)
> %>
> <option
>



value="<%=(CboFiltro2.Fields.Item("ClvEjecutivo").Value)%>"><%=(CboFiltro2.F
> ields.Item("Ejecutivo").Value)%></option>
> <%
> CboFiltro2.MoveNext()
> Wend
> If (CboFiltro2.CursorType > 0) Then
> CboFiltro2.MoveFirst
> Else
> CboFiltro2.Requery
> End If
> %>
> </select></td>
> </tr>
> <tr>
> <td>&nbsp;</td>
> <td>&nbsp;</td>
> <td>&nbsp;</td>
> </tr>
> <tr>
> <td>&nbsp;</td>
> <td><input type="submit" name="Submit" value="Submit"></td>
> <td>&nbsp;</td>
> </tr>
> </table>
> <p>&nbsp;</p>
> <p><br>
> </p>
> <p>
> <label> </label>
> </p>
> </form>
> <%
> call redirectMe()
> %>
> </body>
> </html>
> <%
> CboFiltro2.Close()
> Set CboFiltro2 = Nothing
> %>
>
>
> Saludos!!!! cualquier ayuda me servira gracias!!!!
>
> "Manuel Vera" escribió en el mensaje
> news:
> > Por lo que comentas, creo que estas trabajando con 2 ASP:
> > a.- donde esta el <FORM>
> > b.- procesas y redireccionas
> > c.- recibes
> >
> > Si este es el caso no te sirve usar Response.Redirect pues los datos


se
> > quedan en (b).
> > Creo que puedes probar con:
> > Server.Execute(url)
> > Ejecuta la url y permanece en (b)
> > o
> > Server.Transfer(url)
> > Es similar a Redirect pero mantiene el POST del <FORM> de (a)
> >
> > Chequea la sintaxis de esos dos metodos pues no estoy seguro si


reciben
> otro
> > parametro.
> >
> > Salu2
> > MV
> >
> > "Alex" wrote in message
> > news:%
> > > Que tal buenas tardes a todos, quisiera ver si alguien me hecha un
hilo
> > con
> > > este codigo ya que por mas que he buscado no hago que funcione
> > >
> > > Tengo 2 Radio/Button(1 y 2) llamado rg1 y un List/Menu llamado sel,
> ahora
> > si
> > > oprimen el boton 2 seleccionan una opcion de list/menu todo esto no
hay
> > > problema, el problema lo tengo cuando tengo que pasar los valor a la
> otra
> > > pagina, puse el siguiente codigo para que dependiendo de la opcion


me
> > diriga
> > > a una pagina a otra
> > > <%
> > > Sub redirectMe()
> > > Dim strChoice
> > > strChoice = Request.Form("rg1")
> > > if strChoice <> "" then
> > > select case strChoice
> > > Case 1
> > > response.Redirect "Todo.asp"
> > > Case 2
> > > response.Redirect "Ejecutivo.asp"
> > > end select
> > > end if
> > > End Sub
> > > %>
> > > y me funciona bien, pero no me pasa los valores a la otra pagina ni


de
> los
> > > radio/button ni el del list/menu, creo que en algun momento se


pierden
> los
> > > valores pero no se ni donde ni que onda.
> > > Alguien me puede ayudar por favor ya no se que hacer!!!! Saludos!!!
> > >
> > >
> >
> >
>
>


Respuesta Responder a este mensaje
#5 Alex
09/12/2004 - 00:51 | Informe spam
Gracias manuel por el codigo solo una cosa cuando ahorita que lo probe
siempre me lleva a la misma pagina, necesito algo mas???


"Manuel Vera" escribió en el mensaje
news:#$
Yo cambiaria algo como.

Dentro del <HEAD> colocas

<HEAD>
<script language=javascript>
function salida(oF){
var u;
u = (oF.elements['rg1'].checked) ? 'todo.asp' : 'ejecutivo.asp';
oF.action=u;
return true;
}
</script>
</HEAD>

Y luego en tu <FORM> esto otro

<form name="form1" method="post" ONSUBMIT="return salida(this)">

Saludos
MV


"Alex" wrote in message
news:%
> Gracias Manuel por la ayuda, tratare de explicar un poco mejor lo que
estoy
> haciendo, a ver que me aconsejan
> Tengo una pagina llamada filtro.asp donde coloco un form con 2
> radio/botton con valor 1 y 2 respectivamente, y un combobox
> ahora si selecciona el radio/botton 1 se dirige a una pagina llamada
> todo.asp y si escogen el radiobotton 2 se activa el combobox y escogen


un
> producto
> que va a la pagina ejecutivo.asp, es decir tengo 3 asp la primer de
> filtro (filtro.asp)
>
> la segunda todo.asp y la tercera ejecutivo.asp
> pero cuando puse la funcion que anote anteriormente para ver a que


pagina
se
> dirigia dependiendo la opcion que escogieron, no me pasa nada de los
valores
> entonces no se que pasa, ayuda porfa!!!!
> Ahora pongo aqui todo el codigo de la pagina no lo hice en el primer
mensaje
> porque creo esta algo largo pero lo pongo
>
> <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
> <!--#include file="../../Connections/base.asp" -->
> <%
> Dim CboFiltro2
> Dim CboFiltro2_numRows
>
> Set CboFiltro2 = Server.CreateObject("ADODB.Recordset")
> CboFiltro2.ActiveConnection = MM_base_STRING
> CboFiltro2.Source = "SELECT DISTINCT ClvEjecutivo, Ejecutivo FROM
Categoria
> ORDER BY Ejecutivo ASC"
> CboFiltro2.CursorType = 0
> CboFiltro2.CursorLocation = 2
> CboFiltro2.LockType = 1
> CboFiltro2.Open()
>
> CboFiltro2_numRows = 0
> %>
> <%
> Sub redirectMe()
> Dim strChoice
> strChoice = Request.Form("rg1")
> if strChoice <> "" then
> select case strChoice
> Case 1
> response.Redirect "Todo.asp"
> Case 2
> response.Redirect "Ejecutivo.asp"
> end select
> end if
> End Sub
> %>
> <html>
> <head>
> <title>Untitled Document</title>
> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
> <SCRIPT LANGUAGE="JavaScript">
>
> function Disab (val) {
> if(val=="0") then
> {
> form1.sel1.disabled=true
> }
> if(val=="1") then
> {
> form1.sel1.disabled=false
> }
> }
> </SCRIPT>
>
> </head>
>
> <body>
> <form name="form1" method="post">
> <p>
> <label> </label>
> </p>
> <table width="48%" border="0" align="center" cellpadding="0"
> cellspacing="0">
> <tr>
> <td width="21%"><input name="rg1" type="radio" onClick="Disab
> (1)" value="1" checked></td>
> <td width="45%">Todo</td>
> <td width="34%">&nbsp;</td>
> </tr>
> <tr>
> <td><input type="radio" name="rg1" onClick="Disab
> (2)" value="2"></td>
> <td>Por Ejecutivo</td>
> <td><select name="sel1" id="sel1" disabled>
> <%
> While (NOT CboFiltro2.EOF)
> %>
> <option
>



value="<%=(CboFiltro2.Fields.Item("ClvEjecutivo").Value)%>"><%=(CboFiltro2.F
> ields.Item("Ejecutivo").Value)%></option>
> <%
> CboFiltro2.MoveNext()
> Wend
> If (CboFiltro2.CursorType > 0) Then
> CboFiltro2.MoveFirst
> Else
> CboFiltro2.Requery
> End If
> %>
> </select></td>
> </tr>
> <tr>
> <td>&nbsp;</td>
> <td>&nbsp;</td>
> <td>&nbsp;</td>
> </tr>
> <tr>
> <td>&nbsp;</td>
> <td><input type="submit" name="Submit" value="Submit"></td>
> <td>&nbsp;</td>
> </tr>
> </table>
> <p>&nbsp;</p>
> <p><br>
> </p>
> <p>
> <label> </label>
> </p>
> </form>
> <%
> call redirectMe()
> %>
> </body>
> </html>
> <%
> CboFiltro2.Close()
> Set CboFiltro2 = Nothing
> %>
>
>
> Saludos!!!! cualquier ayuda me servira gracias!!!!
>
> "Manuel Vera" escribió en el mensaje
> news:
> > Por lo que comentas, creo que estas trabajando con 2 ASP:
> > a.- donde esta el <FORM>
> > b.- procesas y redireccionas
> > c.- recibes
> >
> > Si este es el caso no te sirve usar Response.Redirect pues los datos


se
> > quedan en (b).
> > Creo que puedes probar con:
> > Server.Execute(url)
> > Ejecuta la url y permanece en (b)
> > o
> > Server.Transfer(url)
> > Es similar a Redirect pero mantiene el POST del <FORM> de (a)
> >
> > Chequea la sintaxis de esos dos metodos pues no estoy seguro si


reciben
> otro
> > parametro.
> >
> > Salu2
> > MV
> >
> > "Alex" wrote in message
> > news:%
> > > Que tal buenas tardes a todos, quisiera ver si alguien me hecha un
hilo
> > con
> > > este codigo ya que por mas que he buscado no hago que funcione
> > >
> > > Tengo 2 Radio/Button(1 y 2) llamado rg1 y un List/Menu llamado sel,
> ahora
> > si
> > > oprimen el boton 2 seleccionan una opcion de list/menu todo esto no
hay
> > > problema, el problema lo tengo cuando tengo que pasar los valor a la
> otra
> > > pagina, puse el siguiente codigo para que dependiendo de la opcion


me
> > diriga
> > > a una pagina a otra
> > > <%
> > > Sub redirectMe()
> > > Dim strChoice
> > > strChoice = Request.Form("rg1")
> > > if strChoice <> "" then
> > > select case strChoice
> > > Case 1
> > > response.Redirect "Todo.asp"
> > > Case 2
> > > response.Redirect "Ejecutivo.asp"
> > > end select
> > > end if
> > > End Sub
> > > %>
> > > y me funciona bien, pero no me pasa los valores a la otra pagina ni


de
> los
> > > radio/button ni el del list/menu, creo que en algun momento se


pierden
> los
> > > valores pero no se ni donde ni que onda.
> > > Alguien me puede ayudar por favor ya no se que hacer!!!! Saludos!!!
> > >
> > >
> >
> >
>
>


Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida