Обновление программы

[VERITAS]

Привет!!!

Скажите пожайлуста, как сделать функцию проверки новой версии программы на сайте.

Допустим сверять по названию архива на сайте???

[HotKitten]

поковыряй это:
------------------------------------------------------------

Private Sub Command1_Click()
a$ = Inet1.OpenURL("http://sharig.webzone.ru/version.txt", icString)
'поскольку мы точно знаем, сколько символов в новой дате, то...
a$ = Mid(a$, 1, 10)
If a$ = "" Then
MsgBox "Сервер недоступен, попробуйте загрузить попозже.", vbOKOnly, "Обновление программы"
Exit Sub
End If
'вы можете предусмотреть (самостоятельно) с чем сравнивать новую дату (a$) с предыдущей ("2001-12-14")
If a$ <> "2001-12-14" Then
y$ = "На сервере появилась новая версия программы. Хотите загрузить?"
b$ = MsgBox(y$, vbYesNo, "Обновление программы")
'запуск броузера к странице загрузки программы
If b$ = 6 Then Shell ("C:\Program Files\Internet Explorer\IExplore -nohome" + "http://sharig.webzone.ru/IndexAbout.htm"), vbMaximizedFocus
Else
MsgBox "На сервере старая версия"
End If
End Sub

----------------------------------------------------------
давно где-то скачал, но сам ещё не тестировал, протестишь - скажи

[VERITAS]

Спасибо, сегодня буду тестить, что получится скажу обязательно.