Серый форум — АНК:регулярные выражения

Re: АНК:регулярные выражения

2018-10-10T16:49:37Z

ypppu

Loop, parse, clipboard, `n, `r 
{ MsgBox, 4, , Файл номер %A_Index%: %A_LoopField%.`n`nПродолжить? 
IfMsgBox, No, break
 }

Этот скрипт перебирает каждую строку.
Мне нужно что-бы он каждую строку загнал в переменную, а не перебирал.

MsgBox,
VarA= "первая строка"
VarB= "вторая строка"
VarС= "третья строка"

Так-же можно сделать ?

Re: АНК:регулярные выражения

2018-10-09T16:56:45Z

Непонятно, почему всё это обсуждается в теме под названием «Регулярные выражения».

Re: АНК:регулярные выражения

2018-10-09T15:35:11Z

С ComObj не сталкивался, не подскажу.
В программировании переменной присваивается значение (целое число, число с точкой, строка), а не наоборот.

Re: АНК:регулярные выражения

2018-10-08T19:52:34Z

a := "строка"
msgbox % a

Re: АНК:регулярные выражения

2018-10-08T17:38:45Z

Malcev
Непонятно как каждой строке присвоить переменную.

Re: АНК:регулярные выражения

2018-10-08T08:32:45Z

Нашла вот это. Но надо немного переделать. Подскажите как.
КОД: Копировать Выделить всё
Loop, parse, clipboard, `n, `r
{
MsgBox, 4, , Строка номер %A_Index%: %A_LoopField%.`n`nПродолжить?
IfMsgBox, No, break
}

А что именно вам в этом коде не понятно?

Re: АНК:регулярные выражения

2018-10-07T10:42:46Z

ypppu
1.Запускаем наш скрипт . Он смотрит что в буфере обмена.(там может быть и 7 небольших строк). Но если в первой строке не 14 знаков - завершаем скрипт.(Сообщение пользователю: "Содержимое буфера не отвечает заданному шаблону")
2.Та строка , (она первая)где 14 знаков разбиваем на отдельные символы от VarA1 до VarA14 , я их хочу вставить в exel

Xl := ComObjActive("Excel.Application")
Xl.Range("B11").Value := "%VarA1%" 
Xl.Range("B12").Value := "%VarA2%

итд
3.Вторую строку поместить в переменную VarB
Третью строку поместить в переменную VarС
Четвертую строку поместить в переменную VarD
Пятую строку поместить в переменную VarЕ
Эти строки тоже будут вставляться в Exel.
Будут ли переменные называться В,С,D или E неважно. Главное что-бы я их могла вставить в Exel.

Re: АНК:регулярные выражения

2018-10-07T10:26:41Z

Давайте пошагово.

1. Помещаем что-то в буфер, например

КЕ4978Р3658905
л547енва4645
17Ев567856рап556565

2. Запускаем наш скрипт. Он смотрит что есть в буфере. Если содержимое буфера отвечает шаблону
{цыфры или латински буквы 14 штук}{один перенос строки}{цыфры и русские буквы сколько угодно}{один перенос строки}{цыфры или латинские буквы сколько угодно}
то переходим к п. 3
иначе переходим к п. 4

3.
3.1 Разбить содержимое первого подшаблона на отдельные символы и поместить их в переменные VarA1 ... VarA14
3.2 Содержимое второго подшаблона поместить в переменную VarB
3.3 Содержимое третьего подшаблона поместить в переменную VarС

4. Сообщение пользователю: "Содержимое буфера не отвечает заданному шаблону"

Re: АНК:регулярные выражения

2018-10-07T08:39:03Z

sergeiplugatyr
Мне надо:Как только я поместила 3 строки в буфер и нажала к примеру F11
эти три строчки имели вид

MsgBox,VarA = КЕ4978Р3658905
VarB = л547енва4645    
VarC = 17Ев567856рап556565

Нашла вот это. Но надо немного переделать. Подскажите как.

Loop, parse, clipboard, `n, `r
{
    MsgBox, 4, , Строка номер %A_Index%: %A_LoopField%.`n`nПродолжить?
    IfMsgBox, No, break
}

Re: АНК:регулярные выражения

2018-10-06T06:38:35Z

Елена, для чего это делать? Если эти строки сразу на парсинг передаются в функцию.

/*
КЕ4978Р3658905
л547енва4645
17Ев567856рап556565
*/


MsgBox, % funcParseString()

funcParseString() {
	Clip := Clipboard
	Loop, parse, Clip, `n`r
	{
		if (StrLen(A_LoopField) == 14) {
			Loop, parse, A_LoopField
			{
				outVar .= "VarA" . A_Index . " = " A_LoopField "`n"
			} return outVar
		} else { 
		
		}
	}
}

Re: АНК:регулярные выражения

2018-10-06T05:09:29Z

sergeiplugatyr
Огромное спасибо.
Только как сделать, что-бы из буфера обмена эти 3 строки
КЕ4978Р3658905
л547енва4645
17Ев567856рап556565

имели вид:

VarA=КЕ4978Р3658905
VarB=л547енва4645
VarC=17Ев567856рап556565

Re: АНК:регулярные выражения

2018-10-06T04:29:17Z

VarA=КЕ4978Р3658905
VarB=л547енва4645
VarC=17Ев567856рап556565

MsgBox, % funcParseString(VarA)

funcParseString(v) {
	if (StrLen(v) == 14) {
		Loop, parse, v
		{
			outVar .= "VarA" . A_Index . " = " A_LoopField "`n"
		} return outVar
	} else {
		return
}
}

Re: АНК:регулярные выражения

2018-10-05T19:02:47Z

Елена пишет:

Времени совсем нет на изучение.

Тогда вам в этот раздел:
http://forum.script-coding.com/viewforum.php?id=28

Re: АНК:регулярные выражения

2018-10-05T18:59:37Z

Malcev
На форуме не первый день но не заходила сюда пару лет , так как не было надобности. Вот и прошу что-бы кто нибудь помог с написанием скрипта. Который сильно облегчит мою работу. Времени совсем нет на изучение.

Re: АНК:регулярные выражения

2018-10-05T18:56:51Z

YMP
Три строки как я написала.
Если не 14 знаков - Return