Как передать API URI как переменную в VBS скрипт? - PullRequest
0 голосов
/ 11 июля 2019

У меня есть Vb скрипт для запуска запроса Put.У меня есть URL.этот URL-адрес сохраняется в Excel, и я сохраняю этот URL-адрес как переменную и передаю этот URL-адрес для ввода команды.

Пример vURL: https://example.com/api/

Я уже пробовал разные аргументы и цитатыпометить, но это не работает.

Dim args, vURL
Set args = WScript.Arguments

'vURL = WScript.Arguments.Item(0)
'MSXML2.ServerXMLHTTP
'WinHttp.WinHttpRequest.5.1
'MSXML2.ServerXMLHTTP60

vURL = args(0)
MsgBox vURL
Dim http: Set http = CreateObject("WinHttp.WinHttpRequest.5.1")
Dim url: url = vURL

With http
  Call .Open("PUT", url, False)
  Call .SetRequestHeader("Accept", "application/json")
  Call .SetRequestHeader("XAPI-KEY", "")
  Call .Send("")
End With

If Left(http.Status, 1) = 2 Then

  response = http.responseText
  MsgBox response
Else

  response = http.responseText
  MsgBox response
End If

Если я поставлю vURL без кавычек.Ответ получается пустым, но должен иметь какой-то ответ.

Если я добавлю vURL в кавычки, ответ вернется, поскольку не авторизовать протокол.

Код работает нормально, когда я пишу жесткий кодURL в.

1 Ответ

0 голосов
/ 11 июля 2019

Спасибо @omegastripes за помощь. Мне удалось решить проблему, сравнив длину жестко закодированного URL и vURL. Длина не соответствует.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...