Ver Mensaje Individual
  #8 (permalink)  
Antiguo 03/05/2010, 09:33
jochesfor
 
Fecha de Ingreso: octubre-2009
Mensajes: 80
Antigüedad: 14 años, 7 meses
Puntos: 2
Respuesta: Extraño problema con el Ajax y el IE

Adler, aparentemente hay un problema entre el IE y el select, le hice un cambio a la prueba de listas y funciona perfectamente con el IE las mismas funciones de ajax.

Si puedes mirala y me comentas tus opiniones.

a la pagina ListaProc.asp le agregue:

<%
BdPrueba = "../Private/Prueba.mdb"

'Ejemplo para las listas desplegables'
if request.querystring("IdCat") <> "" then
str = "select Id_Tipo, Nombre FROM Tipos where IdCat = " & int(request.querystring("IdCat"))
Filas=GetFilas(BdPrueba, str)
if(isarray(Filas)) then
for j = 0 to UBound(Filas,2)
response.write("<option value=""" & Filas(0,j) & """>" & Filas(1,j) & "</option>")
next
end if
end if
''''''''''''''''''''''''''''''''''''''''''''''''''
Function GetFilas(BdActual, SQL)
Set oConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.Recordset")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(BdActual))
Set objRS = oConn.Execute(SQL)
if not (objRS.EOF and objRS.BOF) then
GetFilas = objRS.GetRows()
end if
oConn.Close
set objRS = nothing
set oConn = nothing
end function
''''''''''''''''''''''''''''''''''''''''''''''''''
'Lo mas extraño' '<--- Esto
if request.querystring("Ver") <> "" then
response.write("estas viendo el mensaje de prueba")
end if
%>

Mira el codigo del enlace "Mostrar"

Gracias

Última edición por jochesfor; 03/05/2010 a las 10:20