Серый форум — AHK: Деление значения на "строки", аля Fetch

Re: AHK: Деление значения на "строки", аля Fetch

2015-10-12T07:56:59Z

adddays := 3
indate := "*** Did your best friend try the Kleptomania? *** 08.10.2015 *** Did your best friend try the Kleptomania? ***"

If !RegExMatch(indate, "(?P\d{2}\.\d{2}\.\d{4})", ti) {
    MsgBox В переменной "indate" не содержится подстрока со временем вида dd.MM.yyyy
    Return
}
; MsgBox % time
outdate := (_:=StrSplit(time,"."))[3] _[2] _[1]
outdate += adddays, days
FormatTime, DayOfWeek, %outdate%, ddd
MsgBox % DayOfWeek
outdate += DayOfWeek="Вс", days
FormatTime, outdate, %outdate%, dd.MM.yyyy
MsgBox % outdate

Скорее всего, отображение дня недели (Вс, Пн и т.д.) зависит от установленного языка системы, то есть в общем случае нужно еще добавить проверки.

Re: AHK: Деление значения на "строки", аля Fetch

2015-10-12T07:05:13Z

А подскажите еще один маленький нюанс, каким образом сделать проверку outdate - если попадает на воскресенье то + 1 день?

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T15:50:12Z

serzh82saratov пишет:

Вот сейчас очень сильно удивили, а предложенный мною код не катит?

Спасибо, катит Просто пока разбирался с синтаксисом... Не успел попробовать Еще раз спасибо!

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T15:44:53Z

Вот сейчас очень сильно удивили, а предложенный мною код не катит?

adddays := 3
indate := "*** Did your best friend try the Kleptomania? *** 21.07.2014 *** Did your best friend try the Kleptomania? ***"

If !RegExMatch(indate, "(?P\d{2}\.\d{2}\.\d{4})", ti) {
    MsgBox В переменной "indate" не содержится подстрока со временем вида dd.MM.yyyy
    Return
}
MsgBox % time
outdate := (_:=StrSplit(time,"."))[3] _[2] _[1] 
outdate += adddays, days
FormatTime, outdate, %outdate%, dd.MM.yyyy
MsgBox % outdate

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T15:42:51Z

А можно ли удалить из буфера ВСЕ, кроме \d{2}\.\d{2}\.\d{4} ??

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T15:40:42Z

serzh82saratov пишет:

Да какие тут гарантии, если речь про распознаватель текста, мало ли что он ещё по краям понавесит.

Иногда "вешает" Enter

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T15:39:57Z

Да какие тут гарантии, если речь про распознаватель текста, мало ли что он ещё по краям понавесит.

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T15:34:52Z

Думаю, если хочется удостовериться в 100% правильности даты, то надо еще условий добавить:

adddays := 3
indate := "*** Did your best friend try the Kleptomania? *** 121.25.2014e *** Did your best friend try the Kleptomania? ***"

If !RegExMatch(indate, "(?P\d{2}\.\d{2}\.\d{4})", ti) {
    MsgBox В переменной "indate" не содержится подстрока со временем вида dd.MM.yyyy
    Return
}
outdate := (_:=StrSplit(time,"."))[3] _[2] _[1] 
outdate += adddays, days
FormatTime, outdate, %outdate%, dd.MM.yyyy
MsgBox % outdate

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T15:27:25Z

Так время не проверить:

var := "2й1.0ё7.20ы14 *** Did your best friend try the Kleptomania? ***" 
msgbox % """" RegexReplace(var," ?\*\*\*.+?\*\*\* ?") """"

Может как то так:

adddays := 3
indate := "*** Did your best friend try the Kleptomania? *** 21.07.2014 *** Did your best friend try the Kleptomania? ***"

If !RegExMatch(indate, "(?P\d{2}\.\d{2}\.\d{4})", ti) {
    MsgBox В переменной "indate" не содержится подстрока со временем вида dd.MM.yyyy
    Return
}
outdate := (_:=StrSplit(time,"."))[3] _[2] _[1] 
outdate += adddays, days
FormatTime, outdate, %outdate%, dd.MM.yyyy
MsgBox % outdate

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T14:36:27Z

var := "21.07.2014"
;var := "21.07.2014 *** Did your best friend try the Kleptomania? ***"
;var := "*** Did your best friend try the Kleptomania? *** 21.07.2014"
msgbox % """" RegexReplace(var," ?\*\*\*.+?\*\*\* ?") """"

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T13:44:08Z

Drugoy пишет:

Да, используя IfInString/RegExMatch/RegExReplace.

Спасибо, а на примере покажете? А то я "чайник"
*** Did your best friend try the Kleptomania? *** 21.07.2014
или
21.07.2014 *** Did your best friend try the Kleptomania? ***

Заранее спасибо.

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T12:24:34Z

Да, используя IfInString/RegExMatch/RegExReplace.

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-09T10:48:34Z

Есть еще один небольшой вопрос: Программа Kleptomania после нескольких распознаваний текста загоняет в буфер всякую рекламу типа - *** Did your best friend try the Kleptomania? *** или *** Kleptomania FAQ is at http://www.structurise.com/kleptomania/faq.htm *** (методом научного тыка выяснил, что реклама добавляется или ДО или ПОСЛЕ данных, скопированных в буфер обмена)
Можно ли как нибудь делать проверку на наличие ненужных символов (допустим ***) в буфере обмена и при наличии их обрезал содержимое буфера до даты, которая мне собственно и нужна?

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-07T17:58:31Z

Спасибо всем, разобрался.

Re: AHK: Деление значения на "строки", аля Fetch

2015-09-07T17:58:03Z

\d{2}\.

Цифры только две, дальше точка. \ экранирует спец символы. RegEx он и в AutoHotkey RegEx.