Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Программирование, связанное с MS Office > Можно-ли на VBA послать URL запрос


Автор: slang 25.7.2005, 12:50
Можно-ли на VBA из Excel, например, послать URL запрос на удаленный сервер? При этом ответ, посланный сервером интересует мало, по крайней мере можно обойтись и без него.

Автор: likhobory 25.7.2005, 13:29
попробуй WinApi (InternetOpenUrl)

Автор: Naghual 25.7.2005, 13:34
Код

Private Declare Function ShellExecute _
    Lib "shell32.dll" Alias "ShellExecuteA" ( _
    ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) _
    As Long

Const SW_SHOWNORMAL = 1

Private Sub GoToURL(ByVal URL As String)
    ShellExecute 0, vbNullString, URL, vbNullString, "C:\", SW_SHOWNORMAL
End Sub


URL должен быть полным! т.е. начинатся на "http://", "ftp://" и т.д.

Автор: slang 25.7.2005, 16:38
А "убить" это окно потом можно?
Пожалуйста не говорите "используй API", я знаю, что через API это сделать можно, только-вот как - не знаю!!!
Сколько не пытался, ни как не получается удалить окно после загрузки страницы!

Автор: likhobory 25.7.2005, 17:14
а чем не устроил вариант с созданием объекта, ведь в том случае имеешь полный контроль ??

Автор: slang 25.7.2005, 18:20
При выполнении кода пишет:
Compile Error:
User-defined type not defined

Вроде все сделал правильно (на самом деле конечно нет), но все равно не получается smile

Автор: Guest 25.7.2005, 19:11
библиотеку подключи

Автор: likhobory 25.7.2005, 19:23
http://forum.vingrad.ru/index.php?showtopic=59074

посмотри последний пост

Автор: slang 26.7.2005, 05:33
Все разобрался, спасибо ОГРОМНОЕ!!!
Три дня бился-бился, вероятно я плохо объясняю, что мне нужно. smile

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)