У меня есть отчет в доступе, который получает изображение с URL-адреса при оплате, для этого я использую MSXML2.ServerXMLHTTP
, чтобы получить URL-адрес.
Вот код, используемый:
Dim sURL As String
Dim v As Variant
v = Split(sURL, "/")(UBound(Split(sURL, "/")))
Dim obj As Object
Dim fl() As Byte
Set obj = CreateObject("MSXML2.ServerXMLHTTP")
With obj
.Open "GET", sURL, False
.Send
fl = .Responsebody
End With
Проблема, с которой я сталкиваюсь, заключается в том, что при выполнении прибывает на .send
, он выходит из метода, несмотря на то, что у него больше кода, и я не вижу ошибок, но также не отображаю изображение в отчете.
Делать Вы знаете, в чем может быть причина?
Заранее спасибо.