Vbscript 从经典ASP调用条带API时出现403 http错误

Vbscript 从经典ASP调用条带API时出现403 http错误,vbscript,asp-classic,stripe-payments,Vbscript,Asp Classic,Stripe Payments,我正在向我的朋友网站添加条带集成。很久以前,我用经典asp编写了这个网站。下面的代码以403结尾。在通过授权之前,我一直在领取401 我对可发布密钥进行了base64编码。我知道我正在拿回代币 Dim http: Set http = Server.CreateObject("WinHttp.WinHttpRequest.5.1") With http Call .Open("POST", "https://api.stripe.com/v1/charges", False) Call

我正在向我的朋友网站添加条带集成。很久以前,我用经典asp编写了这个网站。下面的代码以403结尾。在通过授权之前,我一直在领取401

我对可发布密钥进行了base64编码。我知道我正在拿回代币

Dim http: Set http = Server.CreateObject("WinHttp.WinHttpRequest.5.1")
With http
  Call .Open("POST", "https://api.stripe.com/v1/charges", False)
  Call .SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
  Call .SetRequestHeader("Authorization", "Basic MyBase64EncodedStripeTestPublishableKey")
  Call .Send("amount=0001&currency=usd&description=Example&source=" & Request.Form("stripeToken"))
End With

有什么想法吗?

事实证明,这段代码运行良好。我遇到的问题是,我没有正确使用公钥和私钥。创建签出令牌时,在客户端代码中使用公钥,然后在基本身份验证中在服务器端使用私钥来完成收费

这条线应该是

Call .SetRequestHeader("Authorization", "Basic MyBase64EncodedStripeTestSecretKey")

您是否有完整的工作脚本来使用经典asp处理条带支付?如果是的话,你能分享一下吗?