Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Загрузка изображения с сайта... Добавлено: 28.01.07 10:30  

Автор вопроса:  SS
Здравствуйте!
Помогите пожалуйтса! Нужно реализовать систему баннеров в программе, то есть проверить если инет активен загружать банер с например www.site1.ru/baner/ и потом при клике на него открывать данную ссылку в новом окне в explorer?! Банер формата желательно .html(т.е. таблица например такая которая здесь на форуме справа вверху) но можно и имидж еси с html никак....
Помогите пжлста очень срочно нужно!

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 SS



Вопросов: 2
Ответов: 4
 Профиль | | #1 Добавлено: 28.01.07 10:32
Да забыл.... Это по VB6

Ответить

Номер ответа: 2
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #2 Добавлено: 28.01.07 15:15
Что конкретно интересует? Загрузка? Клик по банеру? Что значит html формат ?

Ответить

Номер ответа: 3
Автор ответа:
 SS



Вопросов: 2
Ответов: 4
 Профиль | | #3 Добавлено: 28.01.07 15:24
Проверить есть ли соединение с интернетом, если true то внизу формы загружать страницу html. с адреса www.site.ru/baner.html

Ответить

Номер ответа: 4
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #4 Добавлено: 29.01.07 00:30
Webbrowser control

Ответить

Номер ответа: 5
Автор ответа:
 Серёга



ICQ: 262809473 

Вопросов: 17
Ответов: 561
 Web-сайт: houselab.narod.ru
 Профиль | | #5
Добавлено: 29.01.07 18:38
Проверить есть ли соединение с интернетом

Private Const FLAG_ICC_FORCE_CONNECTION = &H1
Private Declare Function InternetCheckConnection Lib "wininet.dll" Alias "InternetCheckConnectionA" (ByVal lpszUrl As String, ByVal dwFlags As Long, ByVal dwReserved As Long) As Long
Private Sub Form_Load()
    If InternetCheckConnection("http://ya.ru/", FLAG_ICC_FORCE_CONNECTION, 0&;) = 0 Then
        MsgBox "Connection to http://ya.ru/ failed!", vbInformation
    Else
        MsgBox "Connection to http://ya.ru/ succeeded!", vbInformation
    End If
End Sub

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам