<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Серый форум &mdash; AHK: извлечение данных из текстового файла]]></title>
	<link rel="self" href="http://forum.script-coding.com/extern.php?action=feed&amp;tid=7002&amp;type=atom" />
	<updated>2012-03-28T22:01:26Z</updated>
	<generator>PunBB</generator>
	<id>http://forum.script-coding.com/viewtopic.php?id=7002</id>
		<entry>
			<title type="html"><![CDATA[Re: AHK: извлечение данных из текстового файла]]></title>
			<link rel="alternate" href="http://forum.script-coding.com/viewtopic.php?pid=58526#p58526" />
			<content type="html"><![CDATA[<p>Спасибо, буду разбираться.</p>]]></content>
			<author>
				<name><![CDATA[shveicar]]></name>
				<uri>http://forum.script-coding.com/profile.php?id=27736</uri>
			</author>
			<updated>2012-03-28T22:01:26Z</updated>
			<id>http://forum.script-coding.com/viewtopic.php?pid=58526#p58526</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: AHK: извлечение данных из текстового файла]]></title>
			<link rel="alternate" href="http://forum.script-coding.com/viewtopic.php?pid=58492#p58492" />
			<content type="html"><![CDATA[<div class="codebox"><pre><code>Array:=[], Pattern:=&quot;([\.\/\-\d\w]+).html?&quot;
ReadingFile:=FileOpen(A_ScriptDir &quot;\From.txt&quot;, &quot;r&quot;, &quot;UTF-8&quot;)
WritingFile:=FileOpen(A_ScriptDir &quot;\Into.txt&quot;, &quot;w&quot;, &quot;UTF-8&quot;)
Content:=ReadingFile.Read()
ReadingFile.Close()

StringSplit, FirstSplit, Content, `:
StringSplit, SecondSplit, FirstSplit2, % &quot;`n&quot;A_Space
Loop, % SecondSplit0
   If RegExMatch(SecondSplit%A_Index%, Pattern, Match)
   {
      For Key, Value In Array
         If % Match1=Value
            Array.Remove(Key)
      Array.Insert(Match1)
   }
For Key, Value In Array
   WritingFile.Write(Value &quot;`r`n&quot;)
WritingFile.Close()</code></pre></div>]]></content>
			<author>
				<name><![CDATA[Grey]]></name>
				<uri>http://forum.script-coding.com/profile.php?id=25792</uri>
			</author>
			<updated>2012-03-28T04:38:32Z</updated>
			<id>http://forum.script-coding.com/viewtopic.php?pid=58492#p58492</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: AHK: извлечение данных из текстового файла]]></title>
			<link rel="alternate" href="http://forum.script-coding.com/viewtopic.php?pid=58490#p58490" />
			<content type="html"><![CDATA[<div class="codebox"><pre><code>Array:=[], Pattern:=&quot;([\.\/\-\d\w]+).html?&quot;
Content=
(
Неработающие ссылки:

index_splash.htm    ../silginc.com/index.htm
members/220_2.htm   images/newmenu__hover_01.jpg
members/6145_221.htm   images/newmenu__hover_01.jpg
members/6145_221.htm   6145_2f-6142-01-sm.jpg
members/6145_221.htm   6145_2f-6142-01-lg.jpg

Внешние ссылки:

2257.htm   mailto:info@sexentertain.co
index_splash.htm   http://www.google.com/


Потерянные файлы:

images/235.jpg
)

StringSplit, FirstSplit, Content, `:
StringSplit, SecondSplit, FirstSplit2, % &quot;`n&quot;A_Space
Loop, % SecondSplit0
   If RegExMatch(SecondSplit%A_Index%, Pattern, Match)
   {
      For Key, Value In Array
         If % Match1=Value
            Array.Remove(Key)
      Array.Insert(Match1)
   }
For Key, Value In Array
   Result.=Value &quot;`n&quot;
Loop, % SecondSplit0
   If RegExMatch(SecondSplit%A_Index%, Pattern, Match)
      ResultList.=Match &quot;`n&quot;
MsgBox, 262144, % &quot; &quot;, % &quot;after sampling:`n`n&quot;Result
                     . &quot;`nfrom list:`n`n&quot;ResultList</code></pre></div>]]></content>
			<author>
				<name><![CDATA[Grey]]></name>
				<uri>http://forum.script-coding.com/profile.php?id=25792</uri>
			</author>
			<updated>2012-03-28T03:10:45Z</updated>
			<id>http://forum.script-coding.com/viewtopic.php?pid=58490#p58490</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[AHK: извлечение данных из текстового файла]]></title>
			<link rel="alternate" href="http://forum.script-coding.com/viewtopic.php?pid=58355#p58355" />
			<content type="html"><![CDATA[<p>Здравствуйте,&nbsp; <br />Программа adobe dreamweaver - проверяет сайт на наличие ссылок, результат можно увидеть в текстовом файле, вида<br /></p><div class="codebox"><pre><code>Неработающие ссылки:
 
index_splash.htm    ../silginc.com/index.htm
members/220_2.htm   images/newmenu__hover_01.jpg
members/6145_221.htm   images/newmenu__hover_01.jpg
members/6145_221.htm   6145_2f-6142-01-sm.jpg
members/6145_221.htm   6145_2f-6142-01-lg.jpg
 
Внешние ссылки:
 
2257.htm   mailto:info@sexentertain.co
index_splash.htm   http://www.google.com/
 
 
Потерянные файлы:
 
images/235.jpg</code></pre></div><p>каждый из списков,- может быть очень длинным, (привожу краткое содержание) но структура - всегда одинакова. Проблема заключается в дальнейшей обработки этого файла. Хочется&nbsp; ускорить процесс извлечения из файла полезной информации, а именно: фрагмента после надписи (Неработающие ссылки: ) причем только начальных строк до (.htm)или до (html) и всего блока до надписи (Внешние ссылки: )&nbsp; и если возможно, добавить ещё - опцию удаления одинаковых строк, (сохраняется только одно совпадение) в итоговом (отдельном) файле вывода. <br /> AHK может помочь в данном вопросе, или лучше обратиться к vbs? Работаю из под total commander. Надеюсь на помощь.<br />Спасибо.</p>]]></content>
			<author>
				<name><![CDATA[shveicar]]></name>
				<uri>http://forum.script-coding.com/profile.php?id=27736</uri>
			</author>
			<updated>2012-03-25T11:34:18Z</updated>
			<id>http://forum.script-coding.com/viewtopic.php?pid=58355#p58355</id>
		</entry>
</feed>
