FoxClub Forums > Visual Foxpro, Foxpro for DOS

• Войти

Страницы: 1 2 3

Re: Vipnet
of63 Сообщений: 25244 Откуда: Н.Новгород Дата регистрации: 13.02.2008	of63 03.03.19 20:55:29 Так получится, это дело несложное. "Но будет ли от этого польза", и какая? Просто статистика писем? Но сами письма как прочитать? Если их человек мышкой не нажимал, не читал, например... Как убрать человека рядом с машиной/точкой випнетовской?

of63

Сообщений: 25244
Откуда: Н.Новгород
Дата регистрации: 13.02.2008

of63

03.03.19 20:55:29

Так получится, это дело несложное. "Но будет ли от этого польза", и какая? Просто статистика писем? Но сами письма как прочитать? Если их человек мышкой не нажимал, не читал, например... Как убрать человека рядом с машиной/точкой випнетовской?

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 04.03.19 00:25:51 of63 Так получится, это дело несложное. ? Что-то не коннектится... Driver=SQLite ODBC Driver;Database=full-path-to-db;... CSQLSTRINGCONN="DRIVER=SQLite ODBC Driver;SERVER=SQLite;DB=с:\!vipnet\ms4.db;" UID="";PASSWORD="";CHARSET="";PORT=3306; n_con = SQLSTRINGCONNECT(CSQLSTRINGCONN) IF n_con = -1 DIMENSION err_(1) AERROR(err_) =messagebox(err_(2),64) = MESSAGEBOX("Неверно введено имя пользователя или пароль",0+16+0,"Ошибка соединения") ELSE =MESSAGEBOX("Соединение установлено",0+16+0,"Соединение установлено") ENDIF sqlcomm="select FILE_NAME, RECEIVER_RECIPIENT,datetime(Creation_Time,'unixepoch') as CreateDate from document D, attachment A, Folder F where A.PARENT_ID = D.ID and FILE_NAME <> 'blank.txt' and file_name not like '%.p7s' and F.ID = D.parent_id and F.Name ='Исходящие' order by Creation_Time desc " OPEN DATABASE ms4.db shared Исправлено 1 раз(а). Последнее : tata, 04.03.19 00:27

Re: Vipnet

tata
Автор

Сообщений: 3459
Откуда: Казань
Дата регистрации: 23.10.2005

tata

04.03.19 00:25:51

of63
Так получится, это дело несложное. ?

Что-то не коннектится...


*Driver=SQLite ODBC Driver;Database=full-path-to-db;...
CSQLSTRINGCONN="DRIVER=SQLite ODBC Driver;SERVER=SQLite;DB=с:\!vipnet\ms4.db;"
*UID="";PASSWORD="";CHARSET="";PORT=3306;

n_con = SQLSTRINGCONNECT(CSQLSTRINGCONN)
IF n_con = -1
    DIMENSION err_(1)
    AERROR(err_)
    =messagebox(err_(2),64)
        = MESSAGEBOX("Неверно введено имя пользователя или пароль",0+16+0,"Ошибка соединения") 
ELSE
        =MESSAGEBOX("Соединение установлено",0+16+0,"Соединение установлено")
ENDIF

sqlcomm="select FILE_NAME, RECEIVER_RECIPIENT,datetime(Creation_Time,'unixepoch') as CreateDate from document D, attachment A, Folder F where A.PARENT_ID = D.ID and FILE_NAME <> 'blank.txt' and file_name not like '%.p7s' and F.ID =  D.parent_id and F.Name ='Исходящие' order by Creation_Time desc "

OPEN DATABASE ms4.db shared

Исправлено 1 раз(а). Последнее : tata, 04.03.19 00:27

Re: Vipnet
of63 Сообщений: 25244 Откуда: Н.Новгород Дата регистрации: 13.02.2008	of63 04.03.19 00:31:10 "не коннектится" - давай файл, если не секретный... (дети и гос. секрет выложат, мтк, если им дать интернет ) ) Исправлено 2 раз(а). Последнее : of63, 04.03.19 00:31

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 04.03.19 00:37:19 of63 "не коннектится" - давай файл, если не секретный... (дети и гос. секрет выложат, мтк, если им дать интернет ) ) Возьми от скайпа, он такой же.

Re: Vipnet
of63 Сообщений: 25244 Откуда: Н.Новгород Дата регистрации: 13.02.2008	of63 04.03.19 00:42:22 Извини. Буду искать... Лучше пошли еще раз... Так вернее дойдет

Re: Vipnet
Igor Korolyov Сообщений: 34580 Дата регистрации: 28.05.2002	Igor Korolyov 04.03.19 00:43:23 tata Что-то не коннектится... CSQLSTRINGCONN="DRIVER=SQLite ODBC Driver;SERVER=SQLite;DB=с:\!vipnet\ms4.db;" В документации нет ни слова про параметры строки подключения Server и DB. И с чего бы ему соединяться то с неправильной строкой подключения А вот про Database=full-path-to-db; есть... tata UID="";PASSWORD="";CHARSET="";PORT=3306; Ни одного из этих параметров в документации не описано. tata* OPEN DATABASE ms4.db shared Это ещё зачем? ------------------ WBR, Igor

Re: Vipnet

Igor Korolyov

Сообщений: 34580
Дата регистрации: 28.05.2002

Igor Korolyov

04.03.19 00:43:23

tata
Что-то не коннектится...
CSQLSTRINGCONN="DRIVER=SQLite ODBC Driver;SERVER=SQLite;DB=с:\!vipnet\ms4.db;"

В документации нет ни слова про параметры строки подключения Server и DB. И с чего бы ему соединяться то с неправильной строкой подключения

А вот про Database=full-path-to-db; есть...

tata
*UID="";PASSWORD="";CHARSET="";PORT=3306;

Ни одного из этих параметров в документации не описано.

tata
OPEN DATABASE ms4.db shared

Это ещё зачем?

------------------
WBR, Igor

Re: Vipnet
vk65 Сообщений: 402 Дата регистрации: 08.04.2008	vk65 04.03.19 00:54:27 tata Что-то не коннектится... я к SQLite3 подключаюсь так: Procedure db_connect Lparameters tcDatabase Local lnHandle, lcString lcString = "DRIVER=SQLite3 ODBC Driver;Database=" + tcDatabase ; + ";LongNames=0;OEMCP=1;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0;" lnHandle = Sqlstringconnect(lcString) Return lnHandle

Re: Vipnet

vk65

Сообщений: 402
Дата регистрации: 08.04.2008

vk65

04.03.19 00:54:27

tata
Что-то не коннектится...

я к SQLite3 подключаюсь так:


Procedure db_connect
Lparameters tcDatabase
Local lnHandle, lcString
lcString = "DRIVER=SQLite3 ODBC Driver;Database=" + tcDatabase ;
 + ";LongNames=0;OEMCP=1;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0;"
lnHandle = Sqlstringconnect(lcString)
Return lnHandle

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 04.03.19 06:19:44 vk65 tata Что-то не коннектится... я к SQLite3 подключаюсь так: Procedure db_connect Lparameters tcDatabase Local lnHandle, lcString lcString = "DRIVER=SQLite3 ODBC Driver;Database=" + tcDatabase ; + ";LongNames=0;OEMCP=1;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0;" lnHandle = Sqlstringconnect(lcString) Return lnHandle Вот спасибо Вам огромное, теперь "Соединение установлено". В запрос где-то вкралась ошибка, буду искать. Но самая главная проблема решена.

Re: Vipnet

tata
Автор

Сообщений: 3459
Откуда: Казань
Дата регистрации: 23.10.2005

tata

04.03.19 06:19:44

vk65

tata
Что-то не коннектится...

я к SQLite3 подключаюсь так:


Procedure db_connect
Lparameters tcDatabase
Local lnHandle, lcString
lcString = "DRIVER=SQLite3 ODBC Driver;Database=" + tcDatabase ;
 + ";LongNames=0;OEMCP=1;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0;"
lnHandle = Sqlstringconnect(lcString)
Return lnHandle

Вот спасибо Вам огромное, теперь "Соединение установлено".
В запрос где-то вкралась ошибка, буду искать. Но самая главная проблема решена.

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 04.03.19 15:51:52 А теперь проблема в преобразовании даты. Дата внутри таблицы хранится в формате 1533127711. Что это такое, пока не понимаю. Параметр 'unixepoch' напрочь не понимает фокс, ругается на unrecognized key/phrase. Если тащить данные без unixepoch, получаем .Null. во всех записях.

Re: Vipnet

tata
Автор

Сообщений: 3459
Откуда: Казань
Дата регистрации: 23.10.2005

tata

04.03.19 15:51:52

А теперь проблема в преобразовании даты. Дата внутри таблицы хранится в формате 1533127711.
Что это такое, пока не понимаю. Параметр 'unixepoch' напрочь не понимает фокс, ругается на unrecognized key/phrase.
Если тащить данные без unixepoch, получаем .Null. во всех записях.

Re: Vipnet
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 04.03.19 16:03:36 Определяется как количество секунд, прошедших с полуночи (00:00:00 UTC) 1 января 1970 года. {^1970-1-1, 00}+1533127711 = 01.08.2018 12:48:31 Исправлено 1 раз(а). Последнее : Taran, 04.03.19 16:04

Re: Vipnet
PaulWist Сообщений: 14618 Дата регистрации: 01.04.2004	PaulWist 04.03.19 16:08:12 Нет такого типа данных, а есть: Цитата: TEXT В текстовом виде формат времени должен быть представлен как строка формата ISO8601: «YYYY-MM-DD HH:MM:SS.SSS». REAL В вещественном формате дата и время должны быть записаны, как число дней с момента отсчета юлианского календаря, то есть число дней с полудня 24 ноября, 4714 г. до нашей эры. Считайте дни и записывайте число. INTEGER Чтобы указать дату и время в классе INTEGER, нужно использовать UNIX время, в данной случае дата и время будут записаны как число секунд 1970 г. 1 января полночи. Можно выбрать любой из форматов хранения даты и времени в базе данных SQLite3, а при помощи встроенных функций отдавать клиенту дату и время в том формате, в котором ему будет удобно. www.sqlite.org ------------------ Есть многое на свете, друг Горацио... Что и не снилось нашим мудрецам. (В.Шекспир Гамлет) Исправлено 3 раз(а). Последнее : PaulWist, 04.03.19 16:10

Re: Vipnet

PaulWist

Сообщений: 14618
Дата регистрации: 01.04.2004

PaulWist

04.03.19 16:08:12

Нет такого типа данных, а есть:

Цитата:
TEXT В текстовом виде формат времени должен быть представлен как строка формата ISO8601: «YYYY-MM-DD HH:MM:SS.SSS».

REAL В вещественном формате дата и время должны быть записаны, как число дней с момента отсчета юлианского календаря, то есть число дней с полудня 24 ноября, 4714 г. до нашей эры. Считайте дни и записывайте число.

INTEGER Чтобы указать дату и время в классе INTEGER, нужно использовать UNIX время, в данной случае дата и время будут записаны как число секунд 1970 г. 1 января полночи.

Можно выбрать любой из форматов хранения даты и времени в базе данных SQLite3, а при помощи встроенных функций отдавать клиенту дату и время в том формате, в котором ему будет удобно.

www.sqlite.org

------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)

Исправлено 3 раз(а). Последнее : PaulWist, 04.03.19 16:10

Re: Vipnet
vk65 Сообщений: 402 Дата регистрации: 08.04.2008	vk65 04.03.19 16:51:21 я запрашиваю так: datetime(firstUsed/1000000, 'unixepoch', 'localtime') as fu_dt и для 1551657247524000 получаю 2019-03-04 02:54:07

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 05.03.19 22:34:54 vk65 я запрашиваю так: datetime(firstUsed/1000000, 'unixepoch', 'localtime') as fu_dt и для 1551657247524000 получаю 2019-03-04 02:54:07 Включение в запрос этой функции дало Мемо-поле со странной датой. 1 9 7 0 - 0 1 - 0 1 0 3 : 2 5 : 1 7 Именно так, с пробелами. А вот если ни на что не делить, то похоже на правду: DateTime(Creation_Time, 'unixepoch', 'localtime') as fu_dt получаю 2018-02-05 16:16:28, что похоже на реальную дату, поскольку отправлен файл %BD(пересмотр размера ФБР)_02.02.2018_07-51-47_3_1_39_39.pdf. (видимо, отправили файл, созданный 02.02.2018, 5 февраля).

Re: Vipnet

tata
Автор

Сообщений: 3459
Откуда: Казань
Дата регистрации: 23.10.2005

tata

05.03.19 22:34:54

vk65
я запрашиваю так:
datetime(firstUsed/1000000, 'unixepoch', 'localtime') as fu_dt
и для 1551657247524000 получаю 2019-03-04 02:54:07

Включение в запрос этой функции дало Мемо-поле со странной датой. 1 9 7 0 - 0 1 - 0 1 0 3 : 2 5 : 1 7
Именно так, с пробелами.
А вот если ни на что не делить, то похоже на правду:
DateTime(Creation_Time, 'unixepoch', 'localtime') as fu_dt
получаю
2018-02-05 16:16:28, что похоже на реальную дату, поскольку отправлен файл %BD(пересмотр размера ФБР)_02.02.2018_07-51-47_3_1_39_39.pdf.
(видимо, отправили файл, созданный 02.02.2018, 5 февраля).

Re: Vipnet
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 05.03.19 22:38:59 Так в конкретно в Вашем случае и не надо делить. У Вас и порядок числа совсем другой.

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 05.03.19 23:01:01 Taran Так в конкретно в Вашем случае и не надо делить. У Вас и порядок числа совсем другой. А как разобраться, когда надо делить, а когда нет? От этого совсем разные даты получаются.

Re: Vipnet
Igor Korolyov Сообщений: 34580 Дата регистрации: 28.05.2002	Igor Korolyov 05.03.19 23:15:23 tata Включение в запрос этой функции дало Мемо-поле со странной датой. 1 9 7 0 - 0 1 - 0 1 0 3 : 2 5 : 1 7 Именно так, с пробелами. Скорее всего это не пробелы, а символ chr(0) - а сама дата предсталвена в виде строки в unicode кодировке. tata А вот если ни на что не делить, то похоже на правду Ну так и не надо делить ------------------ WBR, Igor

Re: Vipnet

Igor Korolyov

Сообщений: 34580
Дата регистрации: 28.05.2002

Igor Korolyov

05.03.19 23:15:23

tata
Включение в запрос этой функции дало Мемо-поле со странной датой. 1 9 7 0 - 0 1 - 0 1 0 3 : 2 5 : 1 7
Именно так, с пробелами.

Скорее всего это не пробелы, а символ chr(0) - а сама дата предсталвена в виде строки в unicode кодировке.

tata
А вот если ни на что не делить, то похоже на правду

Ну так и не надо делить

------------------
WBR, Igor

Re: Vipnet
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 05.03.19 23:17:31 Я выше писал, что это смещение в секундах от 1 января 1970 года. Т.е. ежели оно как у vk65 1551657247524000, то делить, Ежели на как Вас 1533127711 то не надо.

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 05.03.19 23:43:13 Мыкаюсь еще, как определить поле "Тема письма". Очень надо.

Re: Vipnet
vk65 Сообщений: 402 Дата регистрации: 08.04.2008	vk65 05.03.19 23:46:41 tata А вот если ни на что не делить, то похоже на правду: В моем случае значения хранятся с точностью до миллисекунд, поэтому я и делю, обрезая до целых секунд. Если исходное значение изначально с точностью до секунд, то, конечно, делить не нужно. То есть, делить/не делить определяется разрядностью исходного числа.

Re: Vipnet

vk65

Сообщений: 402
Дата регистрации: 08.04.2008

vk65

05.03.19 23:46:41

tata
А вот если ни на что не делить, то похоже на правду:

В моем случае значения хранятся с точностью до миллисекунд, поэтому я и делю, обрезая до целых секунд.
Если исходное значение изначально с точностью до секунд, то, конечно, делить не нужно.
То есть, делить/не делить определяется разрядностью исходного числа.

Re: Vipnet
tata Автор Сообщений: 3459 Откуда: Казань Дата регистрации: 23.10.2005	tata 09.04.19 15:46:16 tata Мыкаюсь еще, как определить поле "Тема письма". Очень надо. Нашла. Пишу сюда на всякий случай - вдруг еще кому понадобится. Тема письма - document.name

Страницы: 1 2 3

:: Список Форумов•Список тем•Поиск•Войти

Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 23 (Гостей: 23)