Вверх ↑
Этот топик читают: Гость
Ответов: 118
Рейтинг: 0
#1: 2017-09-14 18:13:37 ЛС | профиль | цитата
Собственно вопрос возможно как то взять время с сервера и передать его в программу. К примеру сервера можно взять от сюда https://www.ntp-servers.net/servers.html
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 758
Рейтинг: 112
#2: 2017-09-15 08:54:52 ЛС | профиль | цитата
Если кто-то сможет адаптировать под hiasm, будет. А так, сейчас нет
ExternalTimeRelatedLinks
sntpclient
карма: 1

0
Ответов: 1376
Рейтинг: 197
#3: 2017-09-15 10:29:44 ЛС | профиль | цитата
Так?


Add(Service,2953706,112,182)
{
Icon=[ZIPBE10000078DAEDD43D4B42511C06F0137D80C421717314572775A8C9CDC16FE09004E527101721D0089CA5314A7AAF3B4644128EE5161622BE44D810252149AFA7EB03CF7024DF70F018FDE507F79E7BFECFB329C494F9733884390EB16D1162D67C72E24D8879D3149E04BEFDCF7063B158C0ED76433018847038ACE039EF716F52FB9D4E272C86176067631D8AF92CC8A79282E7BCC73DE64C4ABFCBE582C44A1C0A97E7209FCB43E11E7398AB6BBFD56A85C8F212DC5C5D806CD446C21CE6B247B77EAFD70BC7BB5B205FEE15C6DE26749E0F8AB9ECD1AD3F140A41A59007D97CF895B19F816EDFBB612E7B74EB8FC562205F1F07D2F9FFDBC938D886CE3DF6E8D61F8FC741B61A03595B4D2806DD638F6EFD914804EECA45906FCD9E8CC37D45BFFBCC658F6EFD7EBF1FCE4E4F407EB47A328E0E14FDEE33973DBAF5DB6C3648261350AD94407EBDFFEAB670ADE8768F39CC658F6EFD1C8FC703994C066AD50AC8EFAFA1708F39CCED37E3EEE7F87C3E48A55290CBE5A05EAF839452C173DEE31E73869D71F773EC763B0402018846A3904EA7153CE73DEE8D3AE3EEFFEB2339ED47D3A710736D0D2166DAB2424C8F8239CC650FE707EA58FA81]
Wait=0
link(onStart,14328466:doEvent1,[])
}
Add(MultiStrData,5795351,462,175)
{
Char=" "
From=5
Count=1
link(onPart1,1110889:doSplit,[])
}
Add(Time,7275601,511,273)
{
Format="h:m:s"
link(newHours,12316797:Var1,[])
link(newMinute,1110889:Part2,[])
link(newSecond,1110889:Part3,[])
}
Add(MultiStrPart,1110889,511,175)
{
Char=":"
Count=3
link(onSplit,7275601:doTimeDate,[(550,181)(550,314)(501,314)(501,279)])
}
Add(MultiElement,12316797,511,224)
{
@Hint=#9:коррекция|
link(Data1,1110889:Part1,[])
}
BEGIN_SDK
Add(EditMulti,5205159,200,200)
{
DataCount=1
VarCount=1
Height=74
link(Var1,5161232:GetData,[(206,265)(223,265)])
}
Add(EventFromData,5161232,217,224)
{
link(onEvent,11483292:doRead,[])
}
Add(Math,3774180,350,224)
{
OpType=1
ResultType=0
link(onResult,3498698:doOperation,[])
link(Op1,5205159:Data1,[(356,209)(206,209)])
}
Add(Math,3498698,399,224)
{
OpType=8
Op2=24
ResultType=0
link(onResult,3726955:doOperation,[])
}
Add(Registry,11483292,259,224)
{
HKey=2
Key="SYSTEM\CurrentControlSet\Control\TimeZoneInformation"
Value="Bias"
DataType=0
link(onRead,4132177:doOperation,[])
AddHint(-122,-87,275,26,Key)
AddHint(165,-75,35,13,Value)
}
Add(Math,4132177,308,224)
{
OpType=7
Op2=60
ResultType=0
link(onResult,3774180:doOperation,[])
}
Add(Math,3726955,448,224)
{
OpType=33
ResultType=0
link(onResult,5161232:doData,[(494,230)(494,216)(207,216)(207,230)])
}
Add(Math,8154752,385,329)
{
Op2=2
ResultType=0
}
Add(InfoTip,5311881,322,301)
{
Info=#77:HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\DateTime\Servers|
Width=470
Height=18
}
END_SDK
Add(Beep,6568723,462,224)
{
}
Add(HTTP_PostBuilder,12803099,196,189)
{
URL="/"
Point(Cookies)
link(onBuild,9571967:doSend,[])
link(Host,5874183:Text,[])
}
Add(TCP_Client,9571967,350,175)
{
Port=80
link(onRead,15787584:doSearch,[])
link(onDisconnect,2953706:doStop,[(389,195)(389,230)(102,230)(102,188)])
}
Add(BlockFind,15787584,406,175)
{
IncludeBlock=1
StartBlock="Date:"
EndBlock="GMT"
link(onSearch,5795351:doSplit,[])
link(onEndSearch,6568723:doBeep,[(445,188)(445,230)])
}
Add(InfoTip,8553121,399,126)
{
Info=#12:Формат даты:|27: Sat, 22 Dec 2012 14:50:33 |
Width=176
}
Add(Hub,14328466,161,182)
{
link(onEvent1,5874183:doText,[(186,188)(186,160)])
link(onEvent2,12803099:doBuild,[])
}
Add(Ping,14728230,301,154)
{
Name=""
link(onFind,9571967:doOpen,[(340,160)(340,181)])
}
Add(VisualStrings,5874183,210,154)
{
Lines=#16:ntp2.stratum2.ru|
Width=81
Point(doText)
Point(onText)
link(onText,14728230:doPing,[])
}

карма: 1

0
Ответов: 4621
Рейтинг: 746
#4: 2017-09-15 11:24:28 ЛС | профиль | цитата
А что, компонент TimeOnHost не подходит?
карма: 26

0
Ответов: 233
Рейтинг: 12
#5: 2017-09-15 15:00:51 ЛС | профиль | цитата
Netspirit писал(а):
А что, компонент TimeOnHost не подходит?


У меня этот компонент ничего не выдает... пробую и адрес и ип ставить
карма: 2

0
Ответов: 537
Рейтинг: 14
#6: 2017-09-17 09:41:00 ЛС | профиль | цитата
foksov писал(а):

Так?


Сам не проверял но схема толковая себе сохранил на всякий
карма: 4

0
Ответов: 66
Рейтинг: 1
#7: 2019-02-03 19:41:08 ЛС | профиль | цитата
Netspirit писал(а):
А что, компонент TimeOnHost не подходит?

Работает только на localhost
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#8: 2019-02-04 00:04:49 ЛС | профиль | цитата
Spectr20, используй сценарий с https://www.ntp-servers.net/setup.html
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
8
Сообщение
...
Прикрепленные файлы
(файлы не залиты)