如何使用返回json的存储过程调用web服务，并使用sql server将数据存储到表中？

CREATE PROCEDURE dbo.InsertDataFromWebService
AS
BEGIN
    DECLARE @json NVARCHAR(MAX);
    DECLARE @url NVARCHAR(200) = 'http://example.com/api/data'; -- Web服务的URL

    -- 调用Web服务获取JSON数据
    EXEC sp_OACreate 'MSXML2.ServerXMLHTTP', @obj OUT;
    EXEC sp_OAMethod @obj, 'open', NULL, 'GET', @url, false;
    EXEC sp_OAMethod @obj, 'send';
    EXEC sp_OAMethod @obj, 'responseText', @json OUTPUT;
    EXEC sp_OADestroy @obj;

    -- 解析JSON数据并存储到表中
    INSERT INTO YourTable (Column1, Column2, Column3)
    SELECT JSON_VALUE(jsonData, '$.field1') AS Column1,
           JSON_VALUE(jsonData, '$.field2') AS Column2,
           JSON_VALUE(jsonData, '$.field3') AS Column3
    FROM OPENJSON(@json) WITH (jsonData NVARCHAR(MAX) '$.data');

END