Показать сообщение отдельно
Старый 15.09.2004, 18:01   #2  
demID is offline
demID
Участник
 
61 / 12 (1) ++
Регистрация: 16.08.2004
Адрес: Москва
Вот реально работающий код на Visual Basic for Applications.
Попробуйте переписать это в Аксапте.
Переменная objxHttp будет иметь тип COM.

ПРИМЕЧАНИЕ: на клиентском компьютере должна быть установлена MS XML 2.0 (msxml.dll)

Данный пример загружает содержимое веб страницы http://www.microsoft.com/BusinessSol...demos/UIc.html и сохраняет его в файл C:\\1.html
Работает в том числе с двоичными файлами.

PHP код:

Public Sub GetFileFromServer()
    
Dim b() As Byte
    Dim objXHTTP 
As Object
    
    Set objXHTTP 
CreateObject("MSXML2.XMLHTTP")
    
    
objXHTTP.Open "GET""http://www.microsoft.com/BusinessSolutions/content/demos/Retaildemos/UIc.html"False
    
    objXHTTP
.send
    
    b 
objXHTTP.responseBody
    
    Open 
"C:\\1.html" For Binary Access Write As #1
        
Put #1, , b
   
    
Close #1
    
    
MsgBox "Ok"
    
End Sub 
__________________
Когда гестапо перекрыло все выходы, Штирлиц вышел через вход!