| Вопрос: Есть ли в vb аналог getTime() ??? | Добавлено: 05.12.06 15:56 |
Автор вопроса:  Albert | ICQ: 334-970-670 |
| есть ли в vb6 аналог java'вской функции getTime()? (Типа время прошедшее с Эпохи Юникс) Если нет то как можно это реализовать на vb6??? |
| Ответы | Всего ответов: 8 |
|
Номер ответа: 1 Автор ответа:  Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #1 | Добавлено: 05.12.06 17:50 |
|
Dim d As Date
d = #1/1/1970 3:00:00 AM# MsgBox DateDiff("s", d, Now()) 3:00 потому что у меня часовой пояс GMT+3 |
||
|
Номер ответа: 2 Автор ответа: Albert ICQ: 334-970-670 Вопросов: 14 Ответов: 20 |
Профиль | | #2 | Добавлено: 05.12.06 18:02 |
|
Да это почти то, но:
GetTime(); 1165330704968 Твой код: 1165330704 Куда то теряется еще три знака Что может быть? Может это в секундах а надо в милисикундах? какой тогда аргумент будет вместо "s"?? (ms - не подходит, ругается  ) )
|
||
|
Номер ответа: 3 Автор ответа:  JMP Вопросов: 6 Ответов: 171 |
Профиль | | #3 | Добавлено: 05.12.06 19:40 |
|
DECLARE FUNCTION time2 LIB "MSVCRT.dll" ALIAS "time" (BYVAL lSecondsSince1970 AS LONG ) AS DWORD DECLARE FUNCTION ctime LIB "MSVCRT.dll" ALIAS "ctime" ( BYVAL seconds AS DWORD) AS DWORD ' FUNCTION PBMAIN () AS LONG LOCAL ts AS LONG LOCAL sz AS ASCIIZ PTR time2(BYVAL VARPTR(ts)) ' sz=ctime(BYVAL VARPTR(ts)) MSGBOX "seconds since 1970:"+FORMAT$(ts,"###,###,###,###"  ,,@sz
' END FUNCTION |
||
|
Номер ответа: 4 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #4 | Добавлено: 05.12.06 20:11 |
| Ну значит твой геттайм возвращает время в миллисекундах. Возьми любую функцию, которая вернет тебе время с миллисекундами. | ||
|
Номер ответа: 5 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #5 | Добавлено: 06.12.06 12:19 |
|
1. timeGetTime
2. TickCount обе в миллисекундах, первая работает точнее, но не всегда
|
||
|
Номер ответа: 6 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #6 | Добавлено: 06.12.06 13:43 |
|
Да, но брать от нее следует ТОЛЬКО миллисекунды
|
||
|
Номер ответа: 7 Автор ответа: JMPВопросов: 6 Ответов: 171 |
Профиль | | #7 | Добавлено: 06.12.06 19:17 |
|
Я чёт не доганю, запрос:
(Типа время прошедшее с Эпохи Юникс)
причем здесь милисекунды? функция time из MSVCRT.DLL возвращает количество секунд прошедших с 1 янв 1970. функция ctime из той же библы конвертирует эти секунды в текущее время. Как в той рекламе...("вот и я думаю...причем здесь пальцы )
|
||
|
Номер ответа: 8 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #8 | Добавлено: 06.12.06 20:38 |
| Ну видимо человеку нужен юникс-тайм с миллисекундами | ||
Страница: 1 |