У меня есть 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 в.