Главная страницаОбратная связьКарта сайта

Определить дату изменения web-страницы



'Зазместите на форме компонент Inet и элемент CommandButton.

Public Function PageLastModified(URL As String) As String
Dim strHeader As String
On Error Resume Next

Inet1.Protocol = icHTTP
Inet1.OpenURL (URL)
If Err.Number > 0 Then Exit Function
strHeader = Inet1.GetHeader("Last-modified")
PageLastModified = strHeader
End Function

Private Sub Command1_Click()
MsgBox PageLastModified("http://sharig.webzone.ru/IndexMainTopic.htm")
End Sub

Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация программирование на Visual Basic - "Определить дату изменения web-страницы", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2024 Дискета.info