如何获得 ASP Classic 对 jQuery 请求的响应

问题描述

我已经构建了以下 jQuery，以便在单击按钮时从运行数据库查询 (MS sql 2019) 的 ASP 经典页面获取响应。

我的目标是检查数据库中的某个字段是否发生了变化，如果 5 秒后没有再次询问，如果发生变化并且值为 1，我们就成功了，应该向运行该页面的页面返回一些额外的值jQuery，如果值为 0，则出现错误，我需要返回该信息，但在我在表中的字段中获得值之前，它应该暂停 5 秒并再次运行请求，直到我得到响应。

我已经尝试过原生 ASP Classic Response 和 JSON，但在这一点上，如果我在 setInterval(function(){ 之后放置警报，它会返回，但不会在 function RequestValueFromTable() 之后，所以我猜最后一个函数有一些错误，但我似乎无法弄清楚原因，因为我在控制台中没有收到错误。

所以我的问题是：

我在 function RequestValueFromTable() 及以下内容中做错了什么？
从 ASP 数据库查询将响应发送回 jQuery 的正确方法是什么？

我的 jQuery：

function RunTableEntryValidation()
{

   setInterval(function(){ 

   
    function RequestValueFromTable()
    {
    var url="check_usercreation_progress.asp?id=<%=objGetEmployeeName("ID")%>";
    $.get(url,{},verifyDb);
    }

    function verifyDb(response)
    {
        
        if (response==1)
        {
        clearInterval();
        alert("I have the value");
        //The value exists here I will run function
        }

        else if (response==0)
        {
        clearInterval();
        alert("I do not have the value");
        }
        
        else
        {
        };            

    };

},5000);

};

check_usercreation_progress.asp：

<%@ Language=VBScript %>
<%
option explicit
Response.Expires = -1
Server.ScriptTimeout = 600
Session.CodePage  = 65001
Response.CharSet = "UTF-8"

Dim CheckUserCreationStatus
Set CheckUserCreationStatus = Server.CreateObject("ADODB.Connection")
CheckUserCreationStatus.ConnectionString="Provider=sqlOLEDB; DATA SOURCE=<SERVER>;UID=SA;PWD=<PASSWORD>;DATABASE=<DATABASE>"
CheckUserCreationStatus.Open

Dim CheckUserCreationStatussql,CheckUserCreationStatusObj

CheckUserCreationStatussql = "SELECT * from EFP_EmploymentUser WHERE ID = " & Request.QueryString("id") & ";"

Set CheckUserCreationStatusObj = CheckUserCreationStatus.Execute(CheckUserCreationStatussql)


IF CheckUserCreationStatusObj("HasChachedAD") = 1 THEN 

Response.Write "1"

ELSEIF CheckUserCreationStatusObj("HasChachedAD") = 0 THEN 

Response.Write "0"

ELSE

END IF


CheckUserCreationStatus.Close
Set CheckUserCreationStatus = nothing


%>

更新了以下代码：

function RunTableEntryValidation()
{

setInterval(function(){ 

    console.log('setInterval was entered');


    function RequestValueFromTable()
    {
    var url="check_usercreation_progress.asp?id=<%=objGetEmployeeName("ID")%>";
    $.get(url,verifyDb);
    console.log('RequestValueFromTable was entered');
    }

    function verifyDb(response)
    {
        console.log('verifyDb was entered');
        
        if (response.result == 1)
        {
        console.log('Value 1 was returned');
        alert("I have the value");
        clearInterval();
        }

        else if (response.result == 0)
        {
        console.log('Value 0 was returned');
        alert("I do not have the value");
        clearInterval();
        }
        
        else
        console.log('No Value was returned');
        {
        };            

    };

},5000);

};

<%@ Language=VBScript %>
<%
option explicit
Response.Expires = -1
Server.ScriptTimeout = 600
Session.CodePage  = 65001
Response.CharSet = "UTF-8"

Dim CheckUserCreationStatus
Set CheckUserCreationStatus = Server.CreateObject("ADODB.Connection")
CheckUserCreationStatus.ConnectionString="Provider=sqlOLEDB; DATA SOURCE=<SERVER>;UID=SA;PWD=<PASSWORD>;DATABASE=<DATABASE>"
CheckUserCreationStatus.Open

Dim CheckUserCreationStatussql,CheckUserCreationStatusObj

CheckUserCreationStatussql = "SELECT * from EFP_EmploymentUser WHERE ID = " & Request.QueryString("ID") & ";"

Set CheckUserCreationStatusObj = CheckUserCreationStatus.Execute(CheckUserCreationStatussql)


IF CheckUserCreationStatusObj("ADCreationStatus") = 1 THEN 

Response.Write "{ ""result"": 1 }"

ELSEIF CheckUserCreationStatusObj("ADCreationStatus") = 0 THEN 

Response.Write "{ ""result"": 0 }"

ELSE

Response.Write "{ ""result"": ""empty"" }"

END IF


CheckUserCreationStatus.Close
Set CheckUserCreationStatus = nothing


%>

解决方法

该解决方案经过以下步骤：

ASP 页面中的 Response.Write 应该是一个 JSON 格式的响应： [fg]
Response.Write "{ ""result"": 1 }" 之后没有被调用 RequestValueFromTable()
setInterval(function(){ 需要在之后定义 var thejson = JSON.parse(response) 和 IF 句改为 function verifyDb(response)

工作代码：

if (thejson.result == 1)

function RunTableEntryValidation()
{
    
    setInterval(function(){ 

        console.log('setInterval was entered');

        RequestValueFromTable();

        function RequestValueFromTable()
        {
        var url="check_usercreation_progress.asp?id=<%=objGetEmployeeName("ID")%>";
        $.get(url,{},verifyDb);
        console.log('RequestValueFromTable was entered');
        }

        function verifyDb(response)
        {

            var thejson = JSON.parse(response)

            console.log('verifyDb was entered');
            console.log(response.result)
            
            if (thejson.result == 1)
            {
            clearInterval();
            console.log('Value 1 was returned');
            alert("I have the value");
            }

            else if (thejson.result == 0)
            {
            clearInterval();
            console.log('Value 0 was returned');
            alert("I do not have the value");
            }
            
            else
            console.log('No Value was returned');
            {
            };            

        };

    },5000);

};

asp-classic jquery