Ayuda por favor, gran problema!!

08/12/2004 - 22:14 por Alex | Informe spam
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!!!

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:%
Mostrar la cita
con
Mostrar la cita
si
Mostrar la cita
diriga
Mostrar la cita
#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:
Mostrar la cita
otro
Mostrar la cita
ahora
Mostrar la cita
otra
Mostrar la cita
los
Mostrar la cita
los
Mostrar la cita
#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:%
Mostrar la cita
estoy
Mostrar la cita
se
Mostrar la cita
valores
Mostrar la cita
mensaje
Mostrar la cita
Categoria
Mostrar la cita
value="<%=(CboFiltro2.Fields.Item("ClvEjecutivo").Value)%>"><%=(CboFiltro2.F
Mostrar la cita
hilo
Mostrar la cita
hay
Mostrar la cita
#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:#$
Mostrar la cita
un
Mostrar la cita
pagina
Mostrar la cita
value="<%=(CboFiltro2.Fields.Item("ClvEjecutivo").Value)%>"><%=(CboFiltro2.F
Mostrar la cita
se
Mostrar la cita
reciben
Mostrar la cita
me
Mostrar la cita
de
Mostrar la cita
pierden
Mostrar la cita
#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:#$
Mostrar la cita
un
Mostrar la cita
pagina
Mostrar la cita
value="<%=(CboFiltro2.Fields.Item("ClvEjecutivo").Value)%>"><%=(CboFiltro2.F
Mostrar la cita
se
Mostrar la cita
reciben
Mostrar la cita
me
Mostrar la cita
de
Mostrar la cita
pierden
Mostrar la cita
Ads by Google
Search Busqueda sugerida