Что нового

[RegExp] Выборка из текста

frz

[FRZ]
Сообщения
9
Репутация
0
Всем привет!
Ребята, я только начинаю учить AutoIt и по этому прошу помощи у знатоков и сильно не пинать)
А проблема собственно в том что не получается у меня сделать выборку с файлика.

Вот файлик:

{'friends':[[14306271,"Александр Лях","http:\/\/cs9647.vkontakte.ru\/u14306271\/c_8b448525.jpg",543,''],[7347033,"Александра Трифонова","http:\/\/cs9771.vkontakte.ru\/u7347033\/c_fbcfd245.jpg",31,''],[22601425,"Алексей Хоменко","http:\/\/cs9517.vkontakte.ru\/u22601425\/c_f2f29c68.jpg",543,''],[32883417,"Алена Байрамова","http:\/\/cs9213.vkontakte.ru\/u32883417\/c_3da35932.jpg",31,''],[25883929,"Алеся Лень","http:\/\/cs9845.vkontakte.ru\/u25883929\/c_ef688df3.jpg",95,''],[16339800,"Алина Мерефа","http:\/\/cs9719.vkontakte.ru\/u16339800\/c_3ca5f29d.jpg",31,''],[6405526,"Алиса Мартенс","http:\/\/cs9827.vkontakte.ru\/u6405526\/c_d3b2a18d.jpg",31,''],[6767353,"Андрей Вархол","http:\/\/cs9716.vkontakte.ru\/u6767353\/c_96ad16d3.jpg",63,''],[58730195,"Андрей Манжос","http:\/\/cs9646.vkontakte.ru\/u58730195\/c_8a2f48e5.jpg",31,''],[9106979,"Андрей Сенкевич","http:\/\/cs1478.vkontakte.ru\/u9106979\/c_8018ef4d.jpg",31,''],[47932403,"Анелия Швыдка","http:\/\/cs9642.vkontakte.ru\/u47932403\/c_ea570c11.jpg",31,''],[7317863,"Анна Басистая","http:\/\/cs137.vkontakte.ru\/u7317863\/c_63151d1b.jpg",31,''],[10852401,"Антон Черкасский","http:\/\/cs532.vkontakte.ru\/u10852401\/c_7df1c92b.jpg",31,''],[16608109,"Антон Харюзов","http:\/\/cs9724.vkontakte.ru\/u16608109\/c_3ab7ce71.jpg",31,''],[17866967,"Антон Рожков","http:\/\/cs9777.vkontakte.ru\/u17866967\/c_cfd33304.jpg",31,''],[17615230,"Аня Гирявец","http:\/\/cs10140.vkontakte.ru\/u17615230\/c_675098f3.jpg",31,''],[12013322,"Аня Политучая","http:\/\/cs9911.vkontakte.ru\/u12013322\/c_fa7091b4.jpg",31,''],[57027551,"Аня Ёлкина","http:\/\/cs9813.vkontakte.ru\/u57027551\/c_d907953b.jpg",31,''],[6528936,"Артем Бердник","http:\/\/cs313.vkontakte.ru\/u6528936\/c_31643422.jpg",31,''],[9649567,"Артем Морозов","http:\/\/cs9871.vkontakte.ru\/u9649567\/c_fbd3f1ca.jpg",31,''],[12090103,"Артурчик Арчи","http:\/\/cs9971.vkontakte.ru\/u12090103\/c_5abec866.jpg",31,''],[8961093,"Василий Шилин","http:\/\/cs534.vkontakte.ru\/u8961093\/c_d218d1d7.jpg",31,''],[9325451,"Вика Ковалева","http:\/\/cs4473.vkontakte.ru\/u9325451\/c_a4814502.jpg",31,''],[62222191,"Викторика Крыжановская","http:\/\/cs4583.vkontakte.ru\/u62222191\/c_1420f822.jpg",95,''],[23088432,"Виктория Поправка","http:\/\/cs4136.vkontakte.ru\/u23088432\/c_f151b0a8.jpg",31,''],[30176249,"Вита Хоменко","http:\/\/cs9333.vkontakte.ru\/u30176249\/c_4e050627.jpg",31,''],[16794330,"Виталий Францев","http:\/\/cs761.vkontakte.ru\/u16794330\/c_b7c05053.jpg",31,''],[49428423,"Гриша Коваленко","http:\/\/cs9676.vkontakte.ru\/u49428423\/c_ec7ce2a3.jpg",31,''],[14844665,"Дарынка Радевич","http:\/\/cs10127.vkontakte.ru\/u14844665\/c_3df7d545.jpg",31,''],[22091554,"Дашка Тьотка","http:\/\/cs4561.vkontakte.ru\/u22091554\/c_6327a513.jpg",31,''],[65220580,"Денис Фигурнов","http:\/\/cs9826.vkontakte.ru\/u65220580\/c_15b2d5aa.jpg",63,''],[12470712,"Денис Чумак","http:\/\/cs348.vkontakte.ru\/u12470712\/c_8aa1e756.jpg",31,''],[10446267,"Денис Галес","http:\/\/cs1669.vkontakte.ru\/u10446267\/c_ebb672e5.jpg",31,''],[24143967,"Денис Папирник","http:\/\/cs9592.vkontakte.ru\/u24143967\/c_5b14c124.jpg",31,''],[13798710,"Денисенко Викторович","http:\/\/cs9219.vkontakte.ru\/u13798710\/c_e1b9e702.jpg",63,''],[11251360,"Дмитрий Гревцев","http:\/\/cs4232.vkontakte.ru\/u11251360\/c_5ea96244.jpg",31,''],[19049758,"Женя Пустовойтенко","http:\/\/cs498.vkontakte.ru\/u19049758\/c_5daf3c60.jpg",31,''],[8693255,"Женя Пономарев","http:\/\/cs9331.vkontakte.ru\/u8693255\/c_7cdd66b9.jpg",31,''],[45366775,"Игорь Гурошев","http:\/\/cs4128.vkontakte.ru\/u45366775\/c_036400dc.jpg",31,''],[29923648,"Игорь Викторович","http:\/\/cs9470.vkontakte.ru\/u29923648\/c_b50f3dc4.jpg",127,''],[18497884,"Катя Осауленко","http:\/\/cs4572.vkontakte.ru\/u18497884\/c_d084ed6e.jpg",31,''],[19423743,"Катя Стоян","http:\/\/cs9470.vkontakte.ru\/u19423743\/c_2a4da6fb.jpg",31,''],[4842873,"Костя Приходько","http:\/\/cs833.vkontakte.ru\/u4842873\/c_9b32a1cb.jpg",31,''],[36508934,"Ксюша Любич-Терещенко","http:\/\/cs9280.vkontakte.ru\/u36508934\/c_ebaadad6.jpg",95,''],[6083099,"Лена Олефиренко","http:\/\/cs535.vkontakte.ru\/u6083099\/c_5ff80f91.jpg",31,''],[15665365,"Леонид Фалеев","http:\/\/cs9664.vkontakte.ru\/u15665365\/c_2df73e3b.jpg",31,''],[12953309,"Леся Политучая","http:\/\/cs10325.vkontakte.ru\/u12953309\/c_9f0dced4.jpg",31,''],[60699034,"Лидуська Ежакова","http:\/\/cs4563.vkontakte.ru\/u60699034\/c_10c204d0.jpg",63,''],[19717003,"Лизко Незвичайна","http:\/\/cs9689.vkontakte.ru\/u19717003\/c_338a6ca5.jpg",31,''],[34038306,"Лия Слобоженюк","http:\/\/cs9313.vkontakte.ru\/u34038306\/c_b8f27493.jpg",31,''],[18643704,"Максим Постольник","http:\/\/cs958.vkontakte.ru\/u18643704\/c_7a5b85d7.jpg",31,''],[56175947,"Малена Малена","http:\/\/cs4457.vkontakte.ru\/u56175947\/c_36781cce.jpg",95,''],[15045024,"Мальцева Танюффка","http:\/\/cs10149.vkontakte.ru\/u15045024\/c_d521c1ba.jpg",31,''],[8101278,"Марина Чорноморченко","http:\/\/cs10035.vkontakte.ru\/u8101278\/c_d6d1c46e.jpg",31,''],[13824195,"Марина Киргетова","http:\/\/cs9625.vkontakte.ru\/u13824195\/c_9f39b1b2.jpg",31,''],[32643526,"Маринка Рижка","http:\/\/cs10055.vkontakte.ru\/u32643526\/c_9a8ad4b4.jpg",31,''],[37895501,"Мариша Живчик","http:\/\/cs4150.vkontakte.ru\/u37895501\/c_b4820f5f.jpg",31,''],[5409171,"Настя Ульшина","http:\/\/cs674.vkontakte.ru\/u5409171\/c_9ccfa5e1.jpg",95,''],[6944676,"Ната Гурник","http:\/\/cs10249.vkontakte.ru\/u6944676\/c_0cdb79e2.jpg",31,''],[10196254,"Натали Кривко","http:\/\/cs9843.vkontakte.ru\/u10196254\/c_d0483d2f.jpg",31,''],[50706749,"Наталия Шут","http:\/\/cs4145.vkontakte.ru\/u50706749\/c_26421894.jpg",31,''],[42704759,"Наталья Дудка","http:\/\/cs9391.vkontakte.ru\/u42704759\/c_0446ee16.jpg",31,''],[3684242,"Никита Легостев","http:\/\/cs4461.vkontakte.ru\/u3684242\/c_4fb66797.jpg",95,''],[56160724,"Оксана Кольц","http:\/\/cs9677.vkontakte.ru\/u56160724\/c_55a4fe2e.jpg",31,''],[5706653,"Оксана Чорноморченко","http:\/\/cs9441.vkontakte.ru\/u5706653\/c_23ac7e91.jpg",31,''],[6476490,"Олег Киргетов","http:\/\/cs9782.vkontakte.ru\/u6476490\/c_0c526f8b.jpg",191,''],[28441527,"Роман Высочин","http:\/\/cs705.vkontakte.ru\/u28441527\/c_b0731430.jpg",31,''],[21369208,"Роман Клименко","http:\/\/cs965.vkontakte.ru\/u21369208\/c_736c4ca7.jpg",31,''],[12673227,"Руслан Бенден","http:\/\/cs825.vkontakte.ru\/u12673227\/c_ff0a8815.jpg",31,''],[58229137,"Сабина Пашаева","http:\/\/cs4394.vkontakte.ru\/u58229137\/c_1bf06296.jpg",31,''],[17407598,"Санька Осин","http:\/\/cs444.vkontakte.ru\/u17407598\/c_3075dcd6.jpg",31,''],[11640779,"Саша Подолян","http:\/\/cs9922.vkontakte.ru\/u11640779\/c_126b4a01.jpg",31,''],[9175531,"Сашенька Хоменко","http:\/\/cs4449.vkontakte.ru\/u9175531\/c_5dadf4fd.jpg",31,''],[25364126,"Светлана Клименко","http:\/\/cs315.vkontakte.ru\/u25364126\/c_8125bf89.jpg",31,''],[11261066,"Сержик Белый","http:\/\/cs9759.vkontakte.ru\/u11261066\/c_476fd1b8.jpg",31,''],[13230875,"Скромняга Юрчик","http:\/\/cs9904.vkontakte.ru\/u13230875\/c_ddc4b90c.jpg",31,''],[17952857,"Соня Байбачка","http:\/\/cs988.vkontakte.ru\/u17952857\/c_c1886b0d.jpg",159,''],[52612123,"Стас Осин","http:\/\/cs4562.vkontakte.ru\/u52612123\/c_e7c73568.jpg",31,''],[6946307,"Танюсик Михайлусенко","http:\/\/cs9597.vkontakte.ru\/u6946307\/c_1a6ac8ab.jpg",63,''],[45198461,"Танюшечка Северин","http:\/\/cs4473.vkontakte.ru\/u45198461\/c_81947b25.jpg",31,''],[48195476,"Татьяна Талашова","http:\/\/cs932.vkontakte.ru\/u48195476\/c_92d84e78.jpg",31,''],[12741699,"Штильсон Карабинкович","http:\/\/cs9542.vkontakte.ru\/u12741699\/c_3081bee1.jpg",31,''],[57271694,"Юличка Мишуринская","http:\/\/cs9606.vkontakte.ru\/u57271694\/c_31717da9.jpg",95,''],[10756914,"Юлия Чепелёва","http:\/\/cs9844.vkontakte.ru\/u10756914\/c_f4a8e5d7.jpg",31,''],[12888083,"Юлия Головко","http:\/\/cs9796.vkontakte.ru\/u12888083\/c_8dbbd65c.jpg",31,''],[6446808,"Юлия Якушева","http:\/\/cs9279.vkontakte.ru\/u6446808\/c_478a8de1.jpg",31,''],[15430780,"Юрий Швидь","http:\/\/cs9602.vkontakte.ru\/u15430780\/c_fb0b81b4.jpg",31,''],[21196915,"Alena Brijan","http:\/\/cs434.vkontakte.ru\/u21196915\/c_b014234f.jpg",31,''],[13910057,"By Качка","http:\/\/cs9758.vkontakte.ru\/u13910057\/c_763e4c7b.jpg",31,''],[16117352,"Funny Boy","http:\/\/cs9559.vkontakte.ru\/u16117352\/c_8e5d21a8.jpg",31,''],[10280614,"Mar Rina","http:\/\/cs9704.vkontakte.ru\/u10280614\/c_410872bd.jpg",31,''],[32785206,"Massimo Рыбалко","http:\/\/cs9480.vkontakte.ru\/u32785206\/c_eadf74cd.jpg",31,''],[15259025,"Max Osaulenko","http:\/\/cs9360.vkontakte.ru\/u15259025\/c_afa866eb.jpg",31,''],[12912285,"Pavel Taran","http:\/\/cs9334.vkontakte.ru\/u12912285\/c_1b753e37.jpg",31,''],[12354519,"Yanochka Hooliganochka","http:\/\/cs10335.vkontakte.ru\/u12354519\/c_0c544f08.jpg",31,'']],'filter':'short','hash':'1263461846_76995e5aa2877b3ef1'}

А вот скрипт:
Код:
#include <EditConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>


$nOffset = 1
$nflag = 3
$file = FileOpen("frd.ls",1)
$find = '(?i)/u(.*?)\\(?i)'

Switch $nflag
Case 0
$rfind = StringRegExp($file, $find, $nflag, $nOffset)
If @error = 0 Then
$nOffset = @extended
EndIf
if $rfind=1 then
MsgBox(0, "", "Есть совпадение")
else
MsgBox(0, "", "Совпадений нету")
endif
Case 1
Local $ar[100],$i=0
While 1
$rfind = StringRegExp($file, $find, $nflag, $nOffset)
If @error = 0 Then
$nOffset = @extended
Else
ExitLoop
EndIf
$ar[$i]=$rfind[0]
$i=$i+1
WEnd
$sAr_to_string=_ArrayToString(, @CRLF, 0, $i-1)
FileWriteLine("id.txt", $sAr_to_string)
Case 3
$rfind = StringRegExp($file, $find, $nflag, $nOffset)
If @error = 0 Then
$nOffset = @extended
EndIf
$sAr_to_string=_ArrayToString($rfind, @CRLF, 0, UBound($rfind) - 1)
FileWriteLine("id.txt", $sAr_to_string)
Case 4
Local $ar[100],$k=0
$rfind = StringRegExp($file, $find, $nflag, $nOffset)
If @error = 0 Then
$nOffset = @extended
EndIf
for $i = 0 to UBound($rfind) - 1
$match = $rfind[$i]
for $j = 0 to UBound($match) - 1
$ar[$k]=$match[$j]
$k=$k+1
Next
Next
$sAr_to_string=_ArrayToString($ar, @CRLF, 0, $k-1)
FileWriteLine("id.txt", $sAr_to_string)
EndSwitch


Помогите... Очень нужно... Цель такова: выбираем id и складываем в новый файлик по строчкам...
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Мне непонятно что такое id. Можно пример того, что нужно.
 
Автор
F

frz

[FRZ]
Сообщения
9
Репутация
0
madmasles сказал(а):
Мне непонятно что такое id. Можно пример того, что нужно.

[14306271,"Александр Лях","http:\/\/cs9647.vkontakte.ru\/u14306271\/c_8b448525.jpg",543,'']

ID выделил жирным, должно получатся вот так:

14306271
7347033
22601425
32883417
25883929
16339800
6405526
6767353
58730195
9106979
47932403
7317863
10852401
16608109
17866967
17615230
12013322
57027551
6528936
9649567
12090103
8961093
9325451
62222191
23088432
30176249
16794330
49428423
14844665
22091554
65220580
12470712
10446267
24143967
13798710
11251360
19049758
8693255
45366775
29923648
18497884
19423743
4842873
36508934
6083099
15665365
12953309
60699034
19717003
34038306
18643704
56175947
15045024
8101278
13824195
32643526
37895501
5409171
6944676
10196254
50706749
42704759
3684242
56160724
5706653
6476490
28441527
21369208
12673227
58229137
17407598
11640779
9175531
25364126
11261066
13230875
17952857
52612123
6946307
45198461
48195476
12741699
57271694
10756914
12888083
6446808
15430780
21196915
13910057
16117352
10280614
32785206
15259025
12912285
12354519
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
У меня вот так получилось:
Код:
$sTest = FileRead("frd.ls")
$sLeft = "vkontakte.ru\/u"
$i = 0
While 1
	$i += 1
	$result = StringInStr($sTest, $sLeft, 0, $i)
	If $result = 0 Then ExitLoop
	$id = StringTrimLeft($sTest, $result + 14)
	$id = StringLeft($id, 10)
	$id = StringRegExpReplace($id, "[^0-9]", "")
	FileWrite("id.txt", $id & @CRLF)
WEnd


Но, как я понял, еще нужно организовать проверку на наличие этого id в файле id.txt, или не нужно?

Вот этот код:
Код:
$sTest = FileRead("frd.ls")
$sTestOld = FileRead("id.txt")
$sLeft = "vkontakte.ru\/u"
$i = 0
$n = 0
While 1
	$i += 1
	$result = StringInStr($sTest, $sLeft, 0, $i)
	If $result = 0 Then ExitLoop
	$id = StringTrimLeft($sTest, $result + 14)
	$id = StringLeft($id, 10)
	$id = StringRegExpReplace($id, "[^0-9]", "")
	$result = StringInStr($sTestOld, $id)
	If $result = 0 Then
		FileWrite("id.txt", $id & @CRLF)
		$n += 1
	EndIf
WEnd

If $n = 0 Then
	MsgBox(0, "", "Новых id нет.")
Else
	MsgBox(0, "", "Новых id - " & $n & ".")
EndIf

проверяет, добавились новые id или нет и, если добавились, то считает их и добавляет в конец списка.
 
Автор
F

frz

[FRZ]
Сообщения
9
Репутация
0
madmasles, спасибо огромное за помощь!!!

Еще одна просьба, в html-коде есть подобные строки:

<span id="title69874658">Мама мне говорит</SPAN><A href="javascript: postAudioOnWall('bd11226867bb221f94364b0e0c82729f', '96495679152', 'audio11016911_69874658')">(отправить)</A>
<span id="title69874231">Я не люблю вас</SPAN> <A href="javascript: postAudioOnWall('bd11226867bb221f94364b0e0c82729f', '96495679152', 'audio11016911_69874231')">(отправить)</A>

Подскажите, как организовать поиск и переход по ссылке.
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Выбрать из теста
Мама мне говорит
и т.д. у меня так получилось:
Код:
$sTest = FileRead("1.txt")
$sTest = StringReplace(StringRegExpReplace($sTest, "<.*?>", ""), "(отправить)[/url]", "")
FileWrite("2.txt", $sTest)

А по поводу перехода по ссылке, мне кажется, что есть два варианта:
1. Через _IECreate("http://........) и далее FileReadLine("2.txt", ...) и _IELinkClickByText().
2. По идее, в коде страницы должна быть ссылка на страницу со скриптами и там надо искать прямые ссылки, но для этого надо ковырять весь код начальной страницы.
 
Автор
F

frz

[FRZ]
Сообщения
9
Репутация
0
madmasles, спасибо что помогаешь)
Но скрипт, не так как-то работает...(

Нужно что бы при поиске Мама мне говорит, получать <A href="javascript: postAudioOnWall('bd11226867bb221f94364b0e0c82729f', '96495679152', 'audio11016911_69874658')">


Вот фрагмент страницы в которой нужно искать:

<div id="audioBar" class="clearFix">
<div class="column mainPanel">
<script>
pagination.init({"id":"11016911","to_id":10446267,"act":"getpages"}, 0, 'audiosWrap', 'audio.php');
function getPageContent(offset, inTop, afterFunc, obj) {
pagination.getPageContent(offset, inTop, afterFunc, obj);
}
</script>
<div id="audiosWrap">
<div id="audios" style="padding: 5px 30px">

<div class="audioRow" id="audio69874658">
<a name='69874658'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69874658,'http://cs4244.vkontakte.ru/u2967645/audio/4102e8ce35ed.mp3',191);" id="imgbutton69874658" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69874658"><a href='gsearch.php?section=audio&c[q]=Диоды'>Диоды</a></b><span> - </span><span id="title69874658">Мама мне говорит </span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69874658')"> (отправить)</a></div>
<div class="duration">3:11</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69874658" class="playline"></div>
<div id="toddler69874658" class="toddler">
</div>
<div id="player69874658" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69874658"></div>
</div>

<div class="audioRow" id="audio69874231">
<a name='69874231'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69874231,'http://cs1794.vkontakte.ru/u18044081/audio/737739cb24ef.mp3',213);" id="imgbutton69874231" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69874231"><a href='gsearch.php?section=audio&c[q]=Авраам Руссо'>Авраам Руссо</a></b><span> - </span><span id="title69874231">Я не люблю вас и люблю (Романс из &quot;Идиота&quot;)</span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69874231')"> (отправить)</a></div>
<div class="duration">3:33</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69874231" class="playline"></div>
<div id="toddler69874231" class="toddler">
</div>
<div id="player69874231" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69874231"></div>
</div>

<div class="audioRow" id="audio69873195">
<a name='69873195'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69873195,'http://cs549.vkontakte.ru/u15720926/audio/88531ba8fb84.mp3',252);" id="imgbutton69873195" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69873195"><a href='gsearch.php?section=audio&c[q]=Kosheen'>Kosheen</a></b><span> - </span><span id="title69873195">Empty skies</span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69873195')"> (отправить)</a></div>
<div class="duration">4:12</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69873195" class="playline"></div>
<div id="toddler69873195" class="toddler">
</div>
<div id="player69873195" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69873195"></div>
</div>

<div class="audioRow" id="audio69747763">
<a name='69747763'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69747763,'http://cs4428.vkontakte.ru/u56003045/audio/faa90f4b7b4e.mp3',230);" id="imgbutton69747763" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69747763"><a href='gsearch.php?section=audio&c[q]=DJ Smash'>DJ Smash</a></b><span> - </span><span id="title69747763"><a href='javascript: showLyrics(69747763,3092451);'>Лучшие песни</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69747763')"> (отправить)</a></div>
<div class="duration">3:50</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69747763" class="playline"></div>
<div id="toddler69747763" class="toddler">
</div>
<div id="player69747763" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69747763"></div>
</div>

<div class="audioRow" id="audio69656404">
<a name='69656404'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69656404,'http://cs1701.vkontakte.ru/u15060990/audio/bb9b643f2885.mp3',190);" id="imgbutton69656404" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69656404"><a href='gsearch.php?section=audio&c[q]=Баста'>Баста</a></b><span> - </span><span id="title69656404"><a href='javascript: showLyrics(69656404,3029674);'>Дворняга</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69656404')"> (отправить)</a></div>
<div class="duration">3:10</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69656404" class="playline"></div>
<div id="toddler69656404" class="toddler">
</div>
<div id="player69656404" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69656404"></div>
</div>

<div class="audioRow" id="audio69656388">
<a name='69656388'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69656388,'http://cs1753.vkontakte.ru/u265727/audio/de0c847319fb.mp3',194);" id="imgbutton69656388" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69656388"><a href='gsearch.php?section=audio&c[q]=Баста'>Баста</a></b><span> - </span><span id="title69656388"><a href='javascript: showLyrics(69656388,799986);'>Жизнь прошла</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69656388')"> (отправить)</a></div>
<div class="duration">3:14</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69656388" class="playline"></div>
<div id="toddler69656388" class="toddler">
</div>
<div id="player69656388" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69656388"></div>
</div>

<div class="audioRow" id="audio69656348">
<a name='69656348'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69656348,'http://cs1331.vkontakte.ru/u3433580/audio/dc6ce38f415c.mp3',249);" id="imgbutton69656348" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69656348"><a href='gsearch.php?section=audio&c[q]=Баста'>Баста</a></b><span> - </span><span id="title69656348"><a href='javascript: showLyrics(69656348,1598329);'>Миллионами огней пылает небо</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69656348')"> (отправить)</a></div>
<div class="duration">4:09</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69656348" class="playline"></div>
<div id="toddler69656348" class="toddler">
</div>
<div id="player69656348" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69656348"></div>
</div>

<div class="audioRow" id="audio69656332">
<a name='69656332'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69656332,'http://cs4402.vkontakte.ru/u431958/audio/bac70c1a7475.mp3',173);" id="imgbutton69656332" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69656332"><a href='gsearch.php?section=audio&c[q]=Баста'>Баста</a></b><span> - </span><span id="title69656332"><a href='javascript: showLyrics(69656332,2993571);'>Скажи, к чему слова?</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69656332')"> (отправить)</a></div>
<div class="duration">2:53</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69656332" class="playline"></div>
<div id="toddler69656332" class="toddler">
</div>
<div id="player69656332" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69656332"></div>
</div>

<div class="audioRow" id="audio69611712">
<a name='69611712'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69611712,'http://cs4656.vkontakte.ru/u41630226/audio/d2b7d4ac17a1.mp3',220);" id="imgbutton69611712" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69611712"><a href='gsearch.php?section=audio&c[q]=White Style'>White Style</a></b><span> - </span><span id="title69611712">Звезда</span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69611712')"> (отправить)</a></div>
<div class="duration">3:40</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69611712" class="playline"></div>
<div id="toddler69611712" class="toddler">
</div>
<div id="player69611712" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics69611712"></div>
</div>

<div class="audioRow" id="audio68061835">
<a name='68061835'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(68061835,'http://cs4490.vkontakte.ru/u31507583/audio/b57a8925d545.mp3',242);" id="imgbutton68061835" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer68061835"><a href='gsearch.php?section=audio&c[q]=Пернатый.Zмей'>Пернатый.Zмей</a></b><span> - </span><span id="title68061835">Вызов</span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68061835')"> (отправить)</a></div>
<div class="duration">4:02</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line68061835" class="playline"></div>
<div id="toddler68061835" class="toddler">
</div>
<div id="player68061835" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics68061835"></div>
</div>

<div class="audioRow" id="audio68061834">
<a name='68061834'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(68061834,'http://cs4291.vkontakte.ru/u12429946/audio/84da1d98e904.mp3',186);" id="imgbutton68061834" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer68061834"><a href='gsearch.php?section=audio&c[q]=Пернатый Zмей'>Пернатый Zмей</a></b><span> - </span><span id="title68061834"><a href='javascript: showLyrics(68061834,2447272);'>Помолчи (Акустика)</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68061834')"> (отправить)</a></div>
<div class="duration">3:06</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line68061834" class="playline"></div>
<div id="toddler68061834" class="toddler">
</div>
<div id="player68061834" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics68061834"></div>
</div>

<div class="audioRow" id="audio68061837">
<a name='68061837'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(68061837,'http://cs4534.vkontakte.ru/u4218475/audio/78b73d27efb0.mp3',214);" id="imgbutton68061837" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer68061837"><a href='gsearch.php?section=audio&c[q]=Пернатый Zмей'>Пернатый Zмей</a></b><span> - </span><span id="title68061837">Жаль</span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68061837')"> (отправить)</a></div>
<div class="duration">3:34</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line68061837" class="playline"></div>
<div id="toddler68061837" class="toddler">
</div>
<div id="player68061837" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics68061837"></div>
</div>

<div class="audioRow" id="audio67982613">
<a name='67982613'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(67982613,'http://cs4263.vkontakte.ru/u5821065/audio/a49d29020de0.mp3',230);" id="imgbutton67982613" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer67982613"><a href='gsearch.php?section=audio&c[q]=Женя Мильковский '>Женя Мильковский </a></b><span> - </span><span id="title67982613"><a href='javascript: showLyrics(67982613,2474579);'>Станция &quot;Туман&quot;</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_67982613')"> (отправить)</a></div>
<div class="duration">3:50</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line67982613" class="playline"></div>
<div id="toddler67982613" class="toddler">
</div>
<div id="player67982613" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics67982613"></div>
</div>

<div class="audioRow" id="audio68693381">
<a name='68693381'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(68693381,'http://cs4375.vkontakte.ru/u15419906/audio/893414e3142c.mp3',263);" id="imgbutton68693381" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer68693381"><a href='gsearch.php?section=audio&c[q]=Коля Серьга'>Коля Серьга</a></b><span> - </span><span id="title68693381"><a href='javascript: showLyrics(68693381,3046704);'>Мы не такие, как вчера</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68693381')"> (отправить)</a></div>
<div class="duration">4:23</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line68693381" class="playline"></div>
<div id="toddler68693381" class="toddler">
</div>
<div id="player68693381" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics68693381"></div>
</div>

<div class="audioRow" id="audio68207321">
<a name='68207321'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(68207321,'http://cs4498.vkontakte.ru/u47819108/audio/a94f442bbfe5.mp3',215);" id="imgbutton68207321" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer68207321"><a href='gsearch.php?section=audio&c[q]=Коля Серьга и Ирина Кристинина '>Коля Серьга и Ирина Кристинина </a></b><span> - </span><span id="title68207321"><a href='javascript: showLyrics(68207321,2999218);'>Опять метель</a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68207321')"> (отправить)</a></div>
<div class="duration">3:35</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line68207321" class="playline"></div>
<div id="toddler68207321" class="toddler">
</div>
<div id="player68207321" style="display: none;" class="playerClass">
</div>
</div>

<div id="lyrics68207321"></div>
</div>

<div class="audioRow" id="audio69101115">
<a name='69101115'></a>
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(69101115,'http://cs4236.vkontakte.ru/u19801116/audio/295ebd79fb36.mp3',227);" id="imgbutton69101115" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer69101115"><a href='gsearch.php?section=audio&c[q]=КРП a.k.a. Купэ и Guf'>КРП a.k.a. Купэ и Guf</a></b><span> - </span><span id="title69101115"><a href='javascript: showLyrics(69101115,3062586);'>Орел или решка </a></span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_69101115')"> (отправить)</a></div>
<div class="duration">3:47</div>
</td>
</tr>
</tbody></table>

<div style="height:14px;margin-left:28px;">
<div id="line69101115" class="playline"></div>
<div id="toddler69101115" class="toddler">
</div>
<div id="player69101115" style="display: none;" class="playerClass">
</div>
</div>
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Код:
#include <IE.au3> 
$IE = _IECreate( "http://" )
	_IELoadWait ($IE)
	_IELinkClickByText ($IE, "Мама мне говорит")
 
Автор
F

frz

[FRZ]
Сообщения
9
Репутация
0
Garrett сказал(а):
Код:
#include <IE.au3> 
$IE = _IECreate( "http://" )
	_IELoadWait ($IE)
	_IELinkClickByText ($IE, "Мама мне говорит")

Ссылка находиться не под "Мама мне говорит", а под "(отправить)"
А этих "(отправить)" на странице много...

На странице выглядит вот так:
Диоды - Мама мне говорит (отправить) 3:11
Kosheen - Empty skies (отправить)4:12
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
frz сказал(а):
Ссылка находиться не под "Мама мне говорит", а под "(отправить)"
А этих "(отправить)" на странице много...

На странице выглядит вот так:
Диоды - Мама мне говорит (отправить) 3:11
Kosheen - Empty skies (отправить)4:12
Тогда такой вариант:
Код:
#include <IE.au3>

Dim $sKeyword = "Мама мне говорит"

$oIE = _IECreate( "http://" )
$oTegs = _IETagNameGetCollection ($oIE, "span")

Dim $i = 0
For $oTeg In $oTegs
	If $sKeyword  = $oTeg.innerText Then
		MsgBox(0, "Вот искомая ссылка!", $oTeg.innerText)
		_IELinkClickByIndex ($oIE, $i) 
	EndIf
    $i += 1
Next
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
frz,
Я правильно понял, что Вам из текста
<div class="audioRow" id="audio68207321">
<a name='68207321'>[/url]
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(68207321,'http://cs4498.vkontakte.ru/u47819108/audio/a94f442bbfe5.mp3',215);" id="imgbutton68207321" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer68207321"><a href='gsearch.php?section=audio&c[q]=Коля Серьга и Ирина Кристинина '>Коля Серьга и Ирина Кристинина [/url]<span> - </span><span id="title68207321"><a href='javascript: showLyrics(68207321,2999218);'>Опять метель[/url]</span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68207321')"> (отправить)[/url]</div>
<div class="duration">3:35</div>
</td>
</tr>
</tbody></table>
Нужно получить строку вида"Коля Серьга и Ирина Кристинина - http://cs4498.vkontakte.ru/u47819108/audio/a94f442bbfe5.mp3"?
 
Автор
F

frz

[FRZ]
Сообщения
9
Репутация
0
madmasles сказал(а):
frz,
Я правильно понял, что Вам из текста
<div class="audioRow" id="audio68207321">
<a name='68207321'>[/url]
<table width="100%"><tbody>
<tr><td style="width: 20px; vertical-align:top">
<img class="playimg" onclick="return operate(68207321,'http://cs4498.vkontakte.ru/u47819108/audio/a94f442bbfe5.mp3',215);" id="imgbutton68207321" nosorthandle="true" src="images/play.gif"/>
</td>
<td style="width: 360px;"><div class="audioTitle">
<b id="performer68207321"><a href='gsearch.php?section=audio&c[q]=Коля Серьга и Ирина Кристинина '>Коля Серьга и Ирина Кристинина [/url]<span> - </span><span id="title68207321"><a href='javascript: showLyrics(68207321,2999218);'>Опять метель[/url]</span> <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68207321')"> (отправить)</div>
<div class="duration">3:35</div>
</td>
</tr>
</tbody></table>
Нужно получить строку вида"Коля Серьга и Ирина Кристинина - http://cs4498.vkontakte.ru/u47819108/audio/a94f442bbfe5.mp3"?

Нужна именно ссылка на java-скрипт: <a href="javascript: postAudioOnWall('ba8073ef26ff1f2816e85f3a5e94ebd8', '104462670677', 'audio11016911_68207321')">
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
frz
Ссылки вытащить из Вашего текста у меня вот так получилось:
Код:
#include <file.au3>

$fileOld = "1.txt"
$fileNew = "2.txt"
$sLeft = 'href="javascript: postAudioOnWall'
$sNext = '"> (отправить)'
$n = 0
FileOpen($fileOld, 0)
FileOpen($fileNew, 2)
$CountLines = _FileCountLines($fileOld)
For $i = 1 To $CountLines
	$sTest = FileReadLine($fileOld, $i)
	$pos1 = StringInStr($sTest, $sLeft)
	If $pos1 > 0 Then
		$n += 1
		$href = StringTrimLeft($sTest, $pos1 - 4)
		$pos2 = StringInStr($href, $sNext)
		$href = StringLeft($href, $pos2 + 1)
		FileWrite($fileNew, $n & ". " & $href & @CRLF)
	EndIf
Next
FileClose($fileOld)
FileClose($fileNew)
If $n > 0 Then
	MsgBox(0, "", "Записано "  & $n & " ссылок.")
Else
	MsgBox(0, "", "В файле нет ссылок.")
EndIf
 
Автор
F

frz

[FRZ]
Сообщения
9
Репутация
0
Спасибо, но печему-то файлик получаеться пустой(

И собирает же все ссылки, а как же выбрать только ту которая нужна?

Как заменить $sLeft = 'href="javascript: postAudioOnWall'
на $sLeft = 'Про котёнка</span> <a href="javascript: postAudioOnWall'
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
frz,
Конкретную ссылку вытащить из Вашего текста у меня вот так получилось:

Код:
#include <file.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>

$sTest = FileRead("1.txt")
$fileOld = "2.txt"
$fileNew = "названия.txt"
$fileNew1 = "ссылки.txt"
$sLeft = '[/url] - '
$sNext = '[/url]'
$sLeft1 = 'href="javascript: postAudioOnWall'
$sNext1 = '"> (отправить)'
$asTable = ""
$sTest = StringReplace(StringRegExpReplace($sTest, "<.*?>", ""), "(отправить)[/url]", "")
FileWrite($fileOld, $sTest)

$CountLines = _FileCountLines($fileOld)
For $i = 1 To $CountLines
	$sTest = FileReadLine($fileOld, $i)
	$pos1 = StringInStr($sTest, $sLeft)
	If $pos1 > 0 Then
		$href = StringTrimLeft($sTest, $pos1 - 18)
		$pos2 = StringInStr($href, $sNext)
		$href = StringLeft($href, $pos2 - 1)
		FileWrite($fileNew, $href & " - ")
	EndIf
		If $pos1 > 0 Then
		$href = StringTrimLeft($sTest, $pos1 + 18)
		$href = StringLeft($href, StringLen($href) - 2)
		$href= StringReplace($href, "&quot;", "")
		$href= StringReplace($href, "[/url]", "")
		FileWrite($fileNew, $href & @CRLF)
	EndIf
	$sTest = FileReadLine("1.txt", $i)
    $pos1 = StringInStr($sTest, $sLeft1)
	If $pos1 > 0 Then
        $href = StringTrimLeft($sTest, $pos1 - 4)
        $pos2 = StringInStr($href, $sNext1)
        $href = StringLeft($href, $pos2 + 1)
        FileWrite($fileNew1, $href & @CRLF)
    EndIf
Next
FileDelete($fileOld)

_FileReadToArray($fileNew, $asTable)

GuiCreate("Ссылки", 250, 100)
$ggg = GuiCtrlCreateList("",5, 5, 240, 90)
For $m = 1 To $asTable[0]
	GuiCtrlSetData(-1, $asTable[$m])
Next

GuiSetState()

GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
While 1
    $msg = GuiGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then Exit
WEnd


Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
    #forceref $hWnd, $iMsg
    Local $hWndFrom,  $iCode, $hWndListBox

    If Not IsHWnd($ggg) Then $hWndListBox = GUICtrlGetHandle($ggg)

    $hWndFrom = $ilParam
    $iCode = BitShift($iwParam, 16)

    Switch $hWndFrom
        Case $hWndListBox
            Switch $iCode
                Case $LBN_DBLCLK
					$num = GUICtrlRead($ggg)
					$CountLines = _FileCountLines($fileNew)
					For $i = 1 To $CountLines
						$sTest = FileReadLine($fileNew, $i)
						$pos1 = StringInStr($sTest, $num)
						If $pos1 > 0 Then
							$sTes = FileReadLine($fileNew1, $i)
							FileWrite("Ссылка_" & $num & ".txt", $sTes)
							FileDelete($fileNew)
							FileDelete($fileNew1)
							Exit
						EndIf
					Next
              EndSwitch
    EndSwitch
       Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_COMMAND


В появившемся окне надо дважды кликнуть по нужной строке.
Наверное, это можно сделать изящнее.
 
Автор
F

frz

[FRZ]
Сообщения
9
Репутация
0
Привет!
Получилось сделать вот так:

Код:
Func make_scr()
	FileDelete('name.txt')
	$fnu = GUICtrlRead($name_au) ;; Название трека
	$fnu1 = FileWrite('name.txt', $fnu)
	$fnu2 = FileRead('name.txt',9)
	$link_au = GUICtrlRead($link_txt)
	InetGet($link_au,"audio.ls")
	$fileOld = "audio.ls"
	$fileNew = "2.txt"
	$sLeft = $fnu & '</span> <a href="javascript: postAudioOnWall'
	$sNext = '"> (отправить)'
	$n = 0
	FileOpen($fileOld, 0)
	FileOpen($fileNew, 9)
	$CountLines = _FileCountLines($fileOld)
For $i = 1 To $CountLines
	$sTest = FileReadLine($fileOld, $i)
	$pos1 = StringInStr($sTest, $sLeft)
If $pos1 > 0 Then
	$n += 1
	$lens = StringLen($fnu2)
	;~ MsgBox(0, "String length is:", $lens)
	$href = StringTrimLeft($sTest, $pos1 +$lens +16) ;;Обрезаем название трека и </span> <a href="
	$pos2 = StringInStr($href, $sNext)
	$href = StringLeft($href, $pos2 -1)
	FileWrite($fileNew, $n & ". " & $href & @CRLF)
EndIf
Next
	GUICtrlSetData($jscr, $href)
	;~ MsgBox(0,'Ссылка',$href)
	FileClose($fileOld)
	FileClose($fileNew)
EndFunc


Понимаю что сделано как-то "криво", но работает...

А как сделать проверку, если $fnu = "" (пустое) видать сообщение и остановить выполнение функции...?
 

sforce5

Олл фо ЛулзЪ
Сообщения
160
Репутация
41
Код:
Func make_scr()
    FileDelete('name.txt')
    $fnu = GUICtrlRead($name_au) ;; Название трека
    If $fnu <> "" Then
		$fnu1 = FileWrite('name.txt', $fnu)
		$fnu2 = FileRead('name.txt',9)
		$link_au = GUICtrlRead($link_txt)
		InetGet($link_au,"audio.ls")
		$fileOld = "audio.ls"
		$fileNew = "2.txt"
		$sLeft = $fnu & '</span> <a href="javascript: postAudioOnWall'
		$sNext = '"> (отправить)'
		$n = 0
		FileOpen($fileOld, 0)
		FileOpen($fileNew, 9)
		$CountLines = _FileCountLines($fileOld)
	For $i = 1 To $CountLines
		$sTest = FileReadLine($fileOld, $i)
		$pos1 = StringInStr($sTest, $sLeft)
	If $pos1 > 0 Then
		$n += 1
		$lens = StringLen($fnu2)
		;~ MsgBox(0, "String length is:", $lens)
		$href = StringTrimLeft($sTest, $pos1 +$lens +16) ;;Обрезаем название трека и </span> <a href="
		$pos2 = StringInStr($href, $sNext)
		$href = StringLeft($href, $pos2 -1)
		FileWrite($fileNew, $n & ". " & $href & @CRLF)
	EndIf
	Next
		GUICtrlSetData($jscr, $href)
		;~ MsgBox(0,'Ссылка',$href)
		FileClose($fileOld)
		FileClose($fileNew)
	Else
		MsgBox(64, "", "твоё сообщение об ошибке") ; Message
	EndIf
EndFunc
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
frz [?]
сделано как-то "криво", но работает
Не только криво, а ещё и неправильно, FileOpen (не)используется не по назначению.
 
Верх