Foros Néfele 4 Harbour › Foros › Dudas › Duda con la carga de ventanas modal
Etiquetado: Modal Nefele
- Este debate tiene 4 respuestas, 2 mensajes y ha sido actualizado por última vez el 8 meses por juan. This post has been viewed 190 timesnovedades. This post has been viewed 190 times
-
AutorEntradas
-
-
09-02-2024 a las 17:54 #2193juan.novedadesParticipante
Buenos días grupo, hace un tiempo hicimos una serie de opciones que usan las ventanas modal, probadas en su momento y todo bien pero resulta que no se desde que momento (pueden ser meses) marcan error, viendo en el inspector marca un fallo 500 y ya mas a detalle del error menciona: "Política de referenciastrict-origin-when-cross-origin" supongo que se activo algun nuevo nivel de seguridad o algo asi, le paso a alguien ? hay manera de evitar el fallo ? Saludos !
-
09-02-2024 a las 18:03 #2194juan.novedadesParticipante
Probe con este ejemplo basado en uno de Xevi aparte de mi codigo y lo mismo:
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140/** Proyecto: Ejemplo1* Fichero: MainPage.prg* Descripción: Aplicación CGI de Ejemplo1* Autor: usuario1* Fecha: 10/10/2023*/#include "Xailer.ch"#include "Nefele.ch"//------------------------------------------------------------------------------//Función principal de la app WebPROCEDURE MainPage()// Comenzamos instanciando la Página Web que queremos crearWITH OBJECT TWebPage():New():lAlerts := .T. // Como vamos a usar alerts desde ajax, tenemos que indicarlo a webpageCrearModal( :WO ) // Creamos la ventana modalWITH OBJECT WBevel():New( :WO ):cId := "myBevel"WITH object WEdit():New( :WO ):cId := "myEdit1":cTitle := "Mi Edit1":Create()END WITHWITH object WButton():New(:WO):cText := "Prueba abrir ventana Modal":aParams := { { "myEdit1", "#myEdit1"} }:cOnClick := "AbrirModal":cAjaxBevel := "nflcargo":Create()END:Create()ENDoCgi:SendPage(:Create())END WITHRETURN//----------------------------------------------// creamos la ventana modalFUNCTION CrearModal ( o )LOCAL oBevel, oFormWITH OBJECT oBevel := WBevel():New( o ):cId := "modal1":nStyle := xc_Modal:lTrueModal := .f.:aWidth[ xc_S ] := 10:aWidth[ xc_M ] := 8WITH OBJECT WPanel():New( :WO ):cTitle := "Edición de datos":aWidth[ xc_S ] := 12WITH OBJECT oForm := WForm():New( :WO ):cId := "frmModal1":cFunction := "UpdateModal"WITH OBJECT WEdit():New( :WO ):cId := "MyEditModal1":cTitle := "MyEditModal1":Create()END WITHWITH OBJECT WButton():New( :WO ):cId := "submit":cText := "Aceptar":cOnClick := oBevel:Submit( oForm ):Create()END WITH:Create()END WITH //form:Create()END WITH //Panel:Create()END WITH //BevelRETURN NIL//----------------------------------------------FUNCTION AbrirModal()Local cHtml := ""Local cTextEdit1 := oCGI:GetCGIValue( "myEdit1" ) //Capturamos els valor introducido en el Edit1 de la ventana Inicial//En Ajax, los nombres de los Id/Controles, en minúsculascHtml := "" // SetValueById( "myeditmodal1", cTextEdit1 )SendAjaxScript( cHtml, "modal1", "myeditmodal1" ) //Texto, id de la ventana modal a abrir, id del control que tomarᡥl foco )RETURN NIL//----------------------------------------------PROCEDURE UpdateModalLocal cHtml := ""Local cTextEdit1 := oCGI:GetCgiValue( "myEditModal1", "" ) //Capturamos els valor introducido en el Edit1 de la ventana Modal//En Ajax, los nombres de los Id/Controles, en minúsculascHtml := "" // SetValueById( "myedit1", cTextEdit1 )SendAjaxScript( cHtml, "mybevel", .F. ) //Texto, id de la ventana modal a abrir, id del control que tomarᡥl foco )RETURNFUNCTION SendAjaxScript( cText, cModal, cFocus )IF !Empty( cModal )cText += cOpenModal( cModal )ENDIFIF !Empty( cFocus )cText += SetFocus( cFocus )ENDIFoCGI:Send( "" )oCGI:send( IF(At("<SCRIPT>",Upper(cText))=0,"<script>","") + crlf + cText + crlf + "</script>" )RETURN NIL//----------------------------------------------FUNCTION cOpenModal( cName )RETURN '$("#' + cName + '").modal("open");' + crlf//----------------------------------------------FUNCTION SetFocus( cName )RETURN 'document.querySelector("#' + cName + '").focus();' + crlf -
09-02-2024 a las 18:07 #2195juan.novedadesParticipante
curioso, si en console del inspector pongo : $("#modal_usua").modal("open"); si se muestra la ventana modal !
-
10-02-2024 a las 14:49 #2196Pedro AmaroSuperadministrador
Compila en modo Debug a ver exactamente a que error corresponde ese error 500 que te da, creo que no tiene nada que ver con el mensaje que te esta dando la consola.
En la próxima versión del samples tenemos un ejemplo con ventanas modal y no da ese error.
Prueba y nos cuentas
-
10-02-2024 a las 19:03 #2201juan.novedadesParticipante
Gracias Pedro, seguimos checando. Saludos.
-
-
AutorEntradas
- Debes estar registrado para responder a este debate.