Проверка даты на сервере!!!

← →
Kukulkan (2010-05-11 21:11) [0]

Передо мной стоит такая задача - нужно ограничвать срок работы программы!!! Скажем примерно на месяць!!! А потом понадобности продливать!!! Мне посоветовали что надёжнее всего сверяться с датой на какамто сервере(сайте)!!! У меня есть сайт он зарегистрирован в системе Ucoz!!! подскажите пожалуйста как это можно сделать!!!???

Знаю можно компонетом IdDayTime но не получаеться что-то! Вот пробывал так но явно чего то нехватает тока непойму чего именно!

Код:

procedure TMenu.Button2Click(Sender: TObject);
begin
IdDayTime1.Host := Edit1.Text;
IdDayTime1.Port := StrToInt(Edit2.Text);
Label2.Caption := IdDayTime1.DayTimeStr;
end;

Заранее огромное спасибо!!!

← →
Сергей М. © (2010-05-11 21:24) [1]

> явно чего то нехватает

Не хватает самую малость - собственно NTP-сервера

← →
Kukulkan (2010-05-11 21:31) [2]

А можете навести пример работы с IdDayTime а ещё лучше с IdDayTimeServer???

← →
Сергей М. © (2010-05-11 21:35) [3]

А смысл ?

← →
Kukulkan (2010-05-11 21:38) [4]

У меня просто нету опыта работы в делфи связоной с инетом вот и прошу навести пример как проверять дату на сервере!!! С любым компонетом!!! Те 2 я просто для прмера взял!!! Если можете любой пример пожалуйста!!! Ну вот мой начальный код - как его доработать?!

← →
Сергей М. © (2010-05-11 21:46) [5]

Его не надо дорабатывать - он вполне работоспособен при достаточных сетевых условиях.

← →
Kukulkan (2010-05-11 21:51) [6]

Так вы же написали:

Не хватает самую малость - собственно NTP-сервера

Что это?

← →
Сергей М. © (2010-05-11 21:55) [7]

Ну как что ?
Ты чего в свойствах Host и Port указываешь ?
Координаты того самого NTP-сервера.
А он, сервер этот, есть на самом деле по указанным тобой координатам ?

← →
Kukulkan (2010-05-11 22:13) [8]

Вот ****! Работает точно! Тока что поменял хост на другой сайт и заработало!!! А стем что мне надо и не работает!!!((

← →
Сергей М. © (2010-05-11 22:16) [9]

> стем что мне надо и не работает

Это с каким же, если не секрет ?

← →
Kukulkan (2010-05-11 22:27) [10]

Вот сайт зарегистрирован в системе Ucoz

http://www.baza-lider.at.ua/

← →
Сергей М. © (2010-05-11 22:31) [11]

И с какого же перепугу хост по адресу www.baza-lider.at.ua обязан предоставлять NTP-сервис ?

← →
Kukulkan (2010-05-11 22:34) [12]

А почему бы и нет?! Почему же http://www.programmersforum.ru дал мне дату?! Объесните пожалуйста!!!??? Буду очень признателен!!!

← →
Сергей М. © (2010-05-11 22:48) [13]

Будет ли хост предоставлять NTP-сервис, если он не заявлен публично - это зависит как минимум от каприза администратора этого хоста.

← →
Kukulkan (2010-05-11 22:57) [14]

Тоесть вы хотите сказать что мне не удастся получить дату с сайта потому что подобная возможность блокируеться самой системой Ucoz???

← →
Сергей М. © (2010-05-11 23:05) [15]

Я хочу сказать, что сайт тут вообще ни причем.
Ты же не к сайту обращаешься по HTTP, а к некоему хосту по NTP

← →
Kukulkan (2010-05-11 23:13) [16]

Короче говоря он мне ничего не даст!?

← →
Сергей М. © (2010-05-11 23:18) [17]

Почему не даст ?
Это же ТВОЙ сайт ? Если твой, то ничто не мешает дополнить его функциональнось скриптом, который при запуске возвращает некое время.
А скрипт запускать соответствующим HTTP-запросом.

← →
Kukulkan (2010-05-11 23:22) [18]

Так как сайт зарегестрирован в системе Ucoz то я этого сделать не смогу потому что это запрещено!
Да и дата же на сайте есть?!

← →
Сергей М. © (2010-05-11 23:32) [19]

> сайт зарегестрирован в системе Ucoz то я этого сделать не
> смогу потому что это запрещено

Что за бред ?)
Никто не вправе запретить разработчику сайта изменять его "потроха", если он это свое право никому не передал безвозвратно на каких-то условиях.

> дата же на сайте есть?

Вот тебе дался это сайт)
Какая разница, на какой сервер ходить за тек.временем ?
Чем время, скажем, на публичном time.nist.gov по-твоему хуже какой-то там "даты" на каком-то там "сайте" ?)

← →
Kukulkan (2010-05-11 23:47) [20]

Там сайт создаёться ввиде конструктора!! Тоесть он фактичеськи их властность и они регулируют там то как єто правильно всё! Ну да ладно!

Та мне то всё равно на каком сервере! но тот что вы дали он ведь зарубежный а мне нужен свой Украинський дабы получать коректную дату! А этот хоть и руський но всьо таки!

> он ведь зарубежный а мне нужен свой Украинський дабы получать коректную дату

http://planetolog.ru/timezone-country.php?country=UA

← →
Kukulkan (2010-05-12 00:45) [22]

Спасибо!

Возник другой вопрос!
А вы можете помочь мне с парсингом страницы?!
Для решения нужной мне задачи - я вот что решил сделать - человек перед запуском программы вводит логин после чего программа парсить текст
на этой странице
http://www.baza-lider.at.ua/index/

Здесь она должна определить к какой группе относиться данный логин!!!
Но проблема в том что у мене не получаеться получить нужные мне данные!!

Вот мой код

var s:TStringStream;e:string;i:integer; begin s:=TStringStream.Create(""); IdHTTP1.ProxyParams.ProxyPort:=8080; IdHTTP1.Get("http://flsoft.ru/index/8-31",s); e:=s.DataString; i:=pos("<div id="block2" class="udtb"><div class="udtlb">Группа:</div> Пользователи</div>",e); delete(e,1,i); i:=pos(">",e); delete(e,1,i); i:=pos("</div>",e); delete(e,i,length(e)-i); caption:=e; memo1.Text := e; s.Free;

побывал и этот и том сайте что я выше указал получаю огрмною стрчку кода!!! я просто откуда нужно начинать парсить!! и что делают функции pos і caption?!

Заранее спасибо?!

> тот что вы дали он ведь зарубежный а мне нужен свой Украинський
> дабы получать коректную дату

Чем зарубежный UTC отличается от Украинского UTC, или у вас опять национальные заморочки, опять вы первые и лучшие в мире?
UTC от и в Африке UTC, а части Дата особенно.

← →
Kukulkan (2010-05-12 10:21) [24]

Да не в национальности дело! Да и вообщето мне уже отпала надобность в этом вопросе!

> Да и вообщето мне уже отпала надобность в этом вопросе!

Власть сменилась ? :)

> Kukulkan (12.05.10 00:45) [22]
>
> Спасибо!
>
> Возник другой вопрос!
> А вы можете помочь мне с парсингом страницы?!

TWebBrowser предоставляет широкии возможности для парсинга html-текста.

> Kukulkan (12.05.2010 10:21:24) [24]

Даты кончились?

Проверка даты на сервере!!! Найти похожие ветки