Разбор содержимого EML-файла

@demudrol · Регистрация: 02.10.2012

Author24 — интернет-сервис помощи студентам

Добрый день.
Смысл таков: Mozzila Thunderbird сохраняет письмо в определенную папку (поставил расширение txt, если cmd умеет просматривать по расширению eml, то было бы удобнее).
Хотелось чтобы скрипт мониторил папку и как только появляется файл просматривал его, находил то что написано после Computer name: и записывал в значение
Сейчас это письмо выглядит так:

</o:shapelayout></xml><![endif]--></head><body lang=3DRU link=3Dblue =
vlink=3Dpurple><div class=3DWordSection1>Computer name: GO1-0089<op></op><op> </op>=F3 =

@sov44 · 02.10.2012, 17:49

demudrol, пробуйте:

Bash

@echo off
setlocal EnableDelayedExpansion
:: ищем в файле 22.txt. (можно сохранять и в оригинальном расширении)
for %%f in (22.txt) do (
  For /F "tokens=1-2 delims=:<" %%A In ('findstr /C:"Computer name" %%f') do set LastRow=%%B
  echo Имя компутера - !LastRow!
)
pause

п.с. не стал заморачиваться и чуть-чуть поправил скрипт Dragokas Поиск строк (повторяющиеся строки)

@demudrol · 08.10.2012, 12:09 **[ТС]**

sov44, спасибо, работает!

Может кто подсказать как можно сделать мониториг папки?

Если брать выше представленный скрип, чтобы вместо 22.txt подставлялось значение появившегося файла.

Добавлено через 41 минуту
И еще вопрос, если файл все же находится как присвоить переменной его имя?

if exist IT-*.txt set TextName=IT-*.txt

При таком он просто вписывает IT-*.txt

@sov44 · 08.10.2012, 13:09

demudrol, пробуйте:

Bash

@echo off
setlocal EnableDelayedExpansion
for /f "delims=" %%a in ('dir /b/s "C:\Проба\*.txt"') do (
set file=%%a
set nam=%%~na
if defined file (
for %%b in (%%a) do (
for /f "tokens=1-2 delims=:<" %%c In ('findstr /C:"Computer name" %%b') do set LastRow=%%d
  echo Файл !nam! имя компутера - !LastRow!
)))
pause

@demudrol · 08.10.2012, 13:47 **[ТС]**

sov44, попробую если мой вариант не подойдет.

Bash

setlocal EnableDelayedExpansion
 
:start 
ping -n 5 -w 60 localhost>nul
if not exist IT-*.txt goto start
if exist IT-*.txt goto circle
 
:circle
for /r %%i in (*.txt) do set Textname=%%i
goto run
 
:run
for %%f in (%TextName%) do (
  For /F "tokens=1-2 delims=:<" %%A In ('findstr /C:"Computer name" %%f') do set LastRowCN=%%B
)
for %%f in (%TextName%) do (
  For /F "tokens=1-2 delims=:<" %%A In ('findstr /C:"Program:" %%f') do set LastRowP=%%B
)
if %LastRowP%==Firefox set ProgramInstall=msiexec /i \\Path\stuff\FirefoxESR-10.0.6-ru.msi /quiet
 
:install
Ping %LastRowCN%
if %errorlevel%==1 goto circle
if %errorlevel%==0 do D:\stuff\psexec.exe \\%LastRowCN% -u -p  -n 10 %ProgramInstall%

Скрипт определяет файлы и подпихивает в переменную первое значение.
Подскажите, как можно настроить чтобы если ping не доходит до компьютера то он переходил к другому файлу или же если psexec не отрабатывал то он тоже переходил бы к другому

@demudrol 0 / 0 / 0 Регистрация: 02.10.2012 Сообщений: 21
		1
	Разбор содержимого EML-файла 02.10.2012, 11:00. Показов 2209. Ответов 4 Метки нет (Все метки) Добрый день. Смысл таков: Mozzila Thunderbird сохраняет письмо в определенную папку (поставил расширение txt, если cmd умеет просматривать по расширению eml, то было бы удобнее). Хотелось чтобы скрипт мониторил папку и как только появляется файл просматривал его, находил то что написано после Computer name: и записывал в значение Сейчас это письмо выглядит так: </o:shapelayout></xml><![endif]--></head><body lang=3DRU link=3Dblue = vlink=3Dpurple><div class=3DWordSection1><p class=3DMsoNormal><span = lang=3DEN-US>Computer name: GO1-0089<op></op></span></p><p = class=3DMsoNormal><op> </op></p><p class=3DMsoNormal><span = style=3D'mso-fareast-language:RU'>=F3 = 0

@demudrol 0 / 0 / 0 Регистрация: 02.10.2012 Сообщений: 21
	08.10.2012, 12:09 [ТС]	3
	sov44, спасибо, работает! Может кто подсказать как можно сделать мониториг папки? Если брать выше представленный скрип, чтобы вместо 22.txt подставлялось значение появившегося файла. Добавлено через 41 минуту И еще вопрос, если файл все же находится как присвоить переменной его имя? if exist IT-.txt set TextName=IT-.txt При таком он просто вписывает IT-*.txt 0

	08.10.2012, 13:47