'Зазместите на форме компонент 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-страницы", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу: Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!