Vbscript 如何使用经典ASP和严格的OAuth 2.0获取GoTowBinar的访问令牌

我们目前正在使用GoTowBinars API通过传统的OAuth方法创建网络研讨会和注册者

我们转换到严格的OAuth2.0的时间已经晚了，需要一些关于如何快速转换到新方法的指导

我们有一个用经典ASP编写的web应用程序，它请求访问令牌，然后创建网络研讨会和注册者

您能否提供一些代码示例，说明如何使用严格的OAuth 2.0

下面是使用旧方法创建令牌的当前ASP代码示例：

 Function getAccessToken()
   postURL = "https://api.getgo.com/oauth/access_token?grant_type=password&user_id={userId}&password={password}&client_id=" & client_id

   Set ServerXmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP.6.0")
   ServerXmlHttp.open "POST", postURL
   ServerXmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
   ServerXmlHttp.setRequestHeader "Content-Length", Len(PostData)
   ServerXmlHttp.send PostData

   jsonResponse = ServerXmlHttp.responseText

   'Get Access Token
   set myJson = JSON.parse(jsonResponse)
   access_token = myJson.access_token

   getAccessToken = access_token

   Set ServerXmlHttp = Nothing
End Function

---

我对严格的OAuth 2.0知之甚少，无法通过编程方式创建访问令牌。

使用以下ASP经典代码，它与OAuth 2.0一起工作

<script language="javascript" runat="server" src="/global/json2.min.asp"></script>

Function getCitrixAccessToken()

postURL = "https://api.getgo.com/oauth/v2/token"
postData = "grant_type=password&username={username}&password={password}"

Set ServerXmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP.6.0")
ServerXmlHttp.open "POST", postURL
ServerXmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
ServerXmlHttp.setRequestHeader "Authorization", "Basic " & encodedAuthHeader
ServerXmlHttp.setRequestHeader "Content-Length", Len(PostData)
ServerXmlHttp.send PostData

jsonResponse = ServerXmlHttp.responseText

'Get Access Token
set myJson = JSON.parse(jsonResponse)
access_token = myJson.access_token

getCitrixAccessToken = access_token

Set ServerXmlHttp = Nothing

End Function

函数getCitrix AccessToken（）
姿势=”https://api.getgo.com/oauth/v2/token"
postData=“grant_type=password&username={username}&password={password}”
设置ServerXmlHttp=Server.CreateObject（“MSXML2.ServerXmlHttp.6.0”）
ServerXmlHttp.open“POST”，postrl
ServerXmlHttp.setRequestHeader“内容类型”、“应用程序/x-www-form-urlencoded”
ServerXmlHttp.setRequestHeader“授权”、“基本”和EncodeAuthHeader
ServerXmlHttp.setRequestHeader“内容长度”，Len（PostData）
ServerXmlHttp.send PostData
jsonResponse=ServerXmlHttp.responseText
'获取访问令牌
设置myJson=JSON.parse（jsonResponse）
access\u token=myJson.access\u token
GetCitrix访问令牌=访问令牌
设置ServerXmlHttp=Nothing
端函数

---

希望这能帮助其他人解决同样的问题。

您退房了吗？我曾经尝试过让oAuth2单独使用经典ASP，但从未有过任何运气…谢谢Ralpharama。我现在已经解决了这个问题，将发布工作代码。您有json2.min.asp的副本吗？我一直在努力实现你所做的，但在互联网上找不到该文件。如果你能分享到它的链接或者你从哪里得到它，那就太棒了。非常感谢。