Zoom Meeting API - msxml6.dll error '80070005' Access is denied

342 views Asked by At

I am trying to update data in a Zoom meeting via the API with the following Classic ASP code:

'Get access token
access_token = getJWTToken()

strState = "nsw"

varStart = dateFormat(strStart,"yyyy-mm-dd") & "T" & dateFormat(strStart,"HH:MM:SS")
varDuration = dateDiff("n", strStart, strEnd)
varTimeZone = getTimeZone(strState)

postURL = zoom_url & "//webinars//" & webinarId
parmToSend = "{""topic"":""" & strTitle & """," & _
    """type"":""5""," & _
    """start_time"":""" & varStart & """," & _
    """duration"":""" & varDuration & """," & _
    """timezone"":""" & varTimeZone & """," & _
    """agenda"":""" & strDescription & """," & _
    """settings"":{" & _
    "   ""host_video"":""false""," & _
    "   ""panelists_video"":""false""," & _
    "   ""practice_session"":""true""," & _
    "   ""hd_video"":""false""," & _
    "   ""approval_type"":""0""," & _
    "   ""close_registration"":""false""," & _
    "   ""show_share_button"":""false""," & _
    "   ""allow_multiple_devices"":""true""," & _
    "   ""registrants_confirmation_email"":""true""," & _
    "   ""registrants_restrict_number"":""" & strSeats & """," & _
    "   ""notify_registrants"":""false""" & _
    "   }" & _
    "}"

Set ServerXmlHttp = Server.CreateObject("MSXML2.XMLHTTP.6.0")
ServerXmlHttp.open "PATCH", postURL
ServerXmlHttp.setRequestHeader "Accept", "application/json"
ServerXmlHttp.setRequestHeader "Content-Type", "application/json"
ServerXmlHttp.setRequestHeader "Authorization", "Bearer " & access_token
ServerXmlHttp.send parmToSend

jsonResponse = ServerXmlHttp.responseText

It works intermittently but atm it keeps coming back with the same error:

msxml6.dll error '80070005'

Access is denied.

It fails on the following line:

ServerXmlHttp.send parmToSend

Can anyone help me with why this is happening?

Thanks

0

There are 0 answers