Классическое обновление ASP по нажатию кнопки работает только в IE, а не в других браузерах - PullRequest
Новая
       44

Классическое обновление ASP по нажатию кнопки работает только в IE, а не в других браузерах

0 голосов
/ 12 апреля 2019

Я работаю над приложением Classic ASP, у меня html таблица заполнена из базы данных sql, html таблица имеет флажки в одной из ячеек, при установке флажка я открываю всплывающее окно, в котором я делаю некоторые обновления и после отправки окно закрывается автоматически, а предыдущая страница обновляется с обновленным значением (здесь флажок заменяется обновленным значением). Работает нормально с IE, но не обновляется с другими браузерами.

Для тестирования всплывающего окна я прокомментировал закрытие окна javascript и обнаружил, что для обновления данных IE в базе данных, но в других браузерах это ничего не делает. Может быть проблема с настройками ADODB. Данные, которые я обновляю, являются текущей датой, и как только они сохраняются в базе данных, предыдущая страница получает текущую дату вместо флажка.

Пожалуйста, помогите, я новичок в классической ASP. Обновление: Я напечатал запрос, в IE он печатает правильно, но в Chrome он печатает второй параметр с некоторым пробелом справа. Пример: в IE 'SHP', но в Chrome 'SHP' 

 <!-- language: lang-js -->

        function CloseWindow() 
        {
                var trackerreport = document.getElementById("trackerreport").innerText;
                var reporttype = document.getElementById("reporttype").innerText;
                var report = reporttype.trim();
                document.getElementById("Hidden1").value = trackerreport;
                document.getElementById("Hidden2").value = reporttype;      

             switch (report) 
             {
            case "SHP": 
                 document.frmDtls.hfrom.value = 'DelSHP' ;
                 break;
            case "WHS":
                document.frmDtls.hfrom.value = 'DelWHS' ;
                break;
            default:
                alert("None");
                break;
            }     
               document.frmDtls.method = "post" ;
               document.frmDtls.action = "PRDB_UPDATE_BATCH_ORDER_PROCESSING_TRACKER_REPORT_SEGMENT_TIMESTAMP.asp" ;
               document.frmDtls.submit();
               window.close();
               window.opener.location.reload();
        }



    <!-- language: lang-vb -->
        <div align="center">
        <p align="center">
        <input type="button" style="background:yellow;color:black;height:25px; width:100px" value="Confirm" onclick="javascript: return CloseWindow();"> 
        &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <!--<input type="submit" style="background:yellow;color:black;height:25px; width:100px" value="Confirm" >  -->
        <input type="button" style="background:yellow;color:black;height:25px; width:100px" value="Cancel" onclick="javascript: return CancelWindow();">
        </p>
        </div>



        <%

            Set objCommand = Server.CreateObject ("ADODB.Command")  
            Set objRec = Server.CreateObject ("ADODB.Recordset")
            objCommand.ActiveConnection = strConnect

            Dim sConn
            Dim tracker
            Dim reporttype
            Dim trackernew

         If Request("hfrom") = "DelSHP" Then

                Set sConn = Server.CreateObject ("ADODB.Connection")
                sConn.Open strConnect

                tracker = Trim(Request("Hidden1"))
                trackernew = CInt(tracker)
                reporttype = Trim(Request("Hidden2"))
                username = Trim(Request("Hidden3"))
                objCommand.CommandText = "EXEC usp_UPDATE_BATCH_ORDER_PROCESSING_TRACKER_REPORT_SEGMENT '"&trackernew&"','"&reporttype&"','"&username&"'; "
                Set objRecord = objCommand.Execute
                sConn.Close
                Set objRecord = Nothing
                Set sConn = Nothing

        End If

        If Request("hfrom") = "DelWHS" Then

                Set sConn = Server.CreateObject ("ADODB.Connection")
                sConn.Open strConnect

                tracker = Trim(Request("Hidden1"))
                trackernew = CInt(tracker)
                reporttype = Trim(Request("Hidden2"))
                username = Trim(Request("Hidden3"))
                objCommand.CommandText = "EXEC usp_UPDATE_BATCH_ORDER_PROCESSING_TRACKER_REPORT_SEGMENT '"&trackernew&"','"&reporttype&"','"&username&"'; "
                Set objRecord = objCommand.Execute
                sConn.Close
                Set objRecord = Nothing
                Set sConn = Nothing

        End If
        %>

    <!-- language: lang-html -->

        <div align="center"><center>
        <form id="frmDtls" name="frmDtls">
        <input type="hidden" name="hfrom" value = "">
        <input id="Hidden1" name="Hidden1" type="hidden" runat="server" />
        <input id="Hidden2" name="Hidden2" type="hidden" runat="server" />
        <input id="Hidden3" name="Hidden3" type="hidden" runat="server" value="<%= l_username%>" />

        <table border="2" width="50%">
         <tr>
            <td width="40%" align="center" bgcolor="#C0C0C0"><strong><font size="2">Tracker Report ID </font><small>:</small></strong></td>
            <td id="trackerreport" width="60%" align="center" bgcolor="#C0C0C0"><strong><%=L_trackerreportid %></strong>&nbsp;</td>
         </tr>
         <tr>
            <td width="40%" align="center" bgcolor="#C0C0C0"><strong><font size="2">Segment Status Event </font><small>:</small></strong></td>
            <td id="reporttype" width="60%" align="center" bgcolor="#C0C0C0"><strong><%=L_reporttype %></strong>&nbsp;</td>
         </tr>

        </table>
        </center></div>

1 Ответ

0 голосов
/ 16 апреля 2019

Я исправил проблему, по некоторым причинам javascript пропускал запрос на обновление и напрямую закрывал окно в Chrome. Теперь я вызываю метод закрытия javascript после завершения обновления. 

sConn.Close
    Set objRecord = Nothing
    Set sConn = Nothing
    Response.Write("<script language=javascript>CancelWindow();</script>") // added this line
...