| Вопрос: Чтение сайта | Добавлено: 13.06.08 20:54 |
Автор вопроса:  Bonapart | Web-сайт: team16.tut.su | ICQ: 175256 |
|
хотелось бы мини программу чтобы читать случайную цитату с баша
вот что есть "http://bash.org.ru/quote/"+trim(str(int(rnd*10000))) это случайная цитата в коде страницы начинается с <div class="q"> <div class="vote"> заканчивается на </div> </div> вот как скачать, выделить данный кусок и удалить все тэги в этом куске? |
| Ответы | Всего ответов: 6 |
|
Номер ответа: 1 Автор ответа:  Winand Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #1 | Добавлено: 13.06.08 21:23 |
|
ты коечто забыл
http://bash.org.ru/quote/9934 <--такой цитаты нет Считаются все добавляемые, но аппрувятся не все (исключительно несмешные и одна моя 
|
||
|
Номер ответа: 2 Автор ответа:  Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #2 | Добавлено: 13.06.08 22:57 |
| отсюда, думаю, принцип ты поймешь: | ||
|
Номер ответа: 3 Автор ответа: Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #3 | Добавлено: 13.06.08 22:57 |
|
сорри...
GetFileFromInet proc lpUrl: LPSTR, lpLocal: LPSTR
local hInternet : dword local hInetFile : dword local hLocalFile : dword local dwReaded : dword local hMemory : dword local dwFileSize : dword jmp GetFileFromInet_code szAgent db "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.4) Gecko/20070515 Firefox/2.0.0.4",0 GetFileFromInet_code: invoke InternetOpen, addr szAgent, INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, NULL mov hInternet, eax invoke InternetOpenUrl, hInternet, lpUrl, NULL, NULL, NULL, NULL or eax, eax je @22 mov hInetFile, eax invoke CreateFile, lpLocal, GENERIC_WRITE, FILE_SHARE_WRITE, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL mov hLocalFile, eax or dwReaded, eax invoke VirtualAlloc, 0, 1024, MEM_COMMIT, PAGE_READWRITE mov hMemory, eax .while dwReaded != 0 invoke InternetReadFile, hInetFile, hMemory, 1024, addr dwReaded mov eax, dwReaded invoke WriteFile, hLocalFile, hMemory, dwReaded, addr dwReaded, NULL add dwFileSize, eax .endw invoke InternetCloseHandle, hInetFile invoke InternetCloseHandle, hInternet invoke CloseHandle, hLocalFile mov eax, dwFileSize jmp @33 @22: xor eax, eax @33: ret GetFileFromInet endp |
||
|
Номер ответа: 4 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #4 | Добавлено: 13.06.08 23:15 |
|
Я на ПХП писал парсер башорга. 250 страниц парсил. Сделал ява-книгу. Читал хз сколько по времени, но все прочитал
Если надо - могу выслать. Ну там все достаточно просто парсится регэкспами. Вот кусок кода: preg_match_all('/(<div class="q">.+?\n\t<\/div>  /ims', $a, $m);
Парсит строку $a в массив $m по регэкспу Потом еще рекламу вырезать надо и т.п.... |
||
|
Номер ответа: 5 Автор ответа: Bonapart ICQ: 175256 Вопросов: 32 Ответов: 108 |
Web-сайт: Профиль | | #5 | Добавлено: 14.06.08 12:48 |
|
ZagZag пиши в ICQ 175256
заранее спасибо |
||
|
Номер ответа: 6 Автор ответа: D o c a l ICQ: 408802757 Вопросов: 76 Ответов: 985 |
Web-сайт: Профиль | | #6 | Добавлено: 14.06.08 13:54 |
| trim(str())-можна заменить на cstr() | ||
Страница: 1 |