это и не пиар вовсе.. когда нашей конторе нужен будет пиар, будет такой пиар что вы просто ахуеете а Джон будет от зависти локти кусать :D
ахахах) класная темка) ща чела одного подъебнул)) ... насчет платных номеров нада будет подумать ;-)
рулит длинная морковка - с длиной цепи больше 3 и на большой базе разумеется :)
непонятно на основании чего такие выводы .. вроде бы в топике написано, что продается самописный парсер ... 🙄
Не верите что я написал ? Вот пожалуйста, смотрите исходник:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "SHDocVw_OCX.h"
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <OleCtrls.hpp>
#include <ToolWin.hpp>
#include <Buttons.hpp>
#include <atl\atlvcl.h>
#include "mshtml.h"
#include "mshtmcid.h"
#include "MSHTMHST.H"
#pragma package(smart_init)
#pragma link "SHDocVw_OCX"
#pragma link "CSPIN"
#pragma resource "*.dfm"
TForm1 *Form1;
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
void __fastcall TForm1::Button3Click(TObject *Sender)
if(CSpinEdit1->Value>CSpinEdit2->Value)
Close();
Memo3->Text="http://ebnvideo.com/set_id/" + IntToStr(CSpinEdit1->Value) + ".html";
CppWebBrowser1->Navigate(WideString(Memo3->Text));
CSpinEdit1->Value++;
void __fastcall TForm1::CppWebBrowser1DocumentComplete(TObject *Sender,
LPDISPATCH pDisp, Variant *URL)
if (CppWebBrowser1->Document == NULL) return;
CComQIPtr<IOleCommandTarget, &IID_IOleCommandTarget> m_spOleCmdTarg(CppWebBrowser1->ControlInterface);
m_spOleCmdTarg->Exec(&CGID_MSHTML, IDM_SELECTALL , Shdocvw_tlb::OLECMDEXECOPT_DONTPROMPTUSER, NULL, NULL);
CComPtr<IHTMLDocument2>spDoc;
CComPtr<IHTMLSelectionObject>spSelObj;
CComPtr<IHTMLTxtRange>spTxtRng;
CppWebBrowser1->Document->QueryInterface(IID_IHTMLDocument2, (LPVOID*)&spDoc);
spDoc->get_selection(&spSelObj);
spSelObj->createRange((IDispatch**)&spTxtRng);
BSTR html;
spTxtRng->get_htmlText(&html);
AnsiString a_html = html;
TStringList *lst = new TStringList;
Memo1->Text=a_html;
AnsiString title=a_html.SubString(a_html.AnsiPos("<H2>")+4,a_html.AnsiPos("</H2>")-a_html.AnsiPos("<H2>")-5);
a_html=a_html.SubString(a_html.AnsiPos("path_play=")+11,a_html.Length());
a_html=a_html.SubString(0,a_html.AnsiPos(";")-2);
Memo2->Lines->Add(IntToStr(CSpinEdit1->Value-1) + ". " + title + "<br>");
Memo2->Lines->Add("<a href=\"" + a_html + "\">" + title +"</a><br>");
Memo2->Lines->Add("<br>");
Memo2->Lines->SaveToFile(ExtractFilePath(Application->ExeName) + "links.htm");
Button3Click(Sender);
Как то не страдаю манией преследования. Есть вопросы ко мне звони, а лучше сразу на район приезжай и скажи мне все что хотел прямо в лицо.
откопали резюме какойто пятилетней давности и радуетесь ... у меня телефон уже смениться успел за это время ))
если уж на то пошло самым серьезным проектом была система учета трафика (билллинг) .. http://tnt-nets.ru/TNT-REZUME-07-07-2007.doc - вот резюме годичной давности, хоть убейте про гостевую там не нашел ни слова.
кабеля ложил целый месяц, было дело.
TNT добавил 05.10.2008 в 00:53
на форуме пиздеть все горазды, в реале почемуто предъявить слабо .. стесняются видимо :(
кстати, не задумывались о том что создание доров = виртуальное разбрасывание бумажек ? объясните тогда зачем выкладываете бесплатный дорген в своем блоге? :)
Или после генерации дора делается автосабмит в форму http://webmaster.yandex.ru/delspam.xml ?)
зыж: а вообще уже оффтоп пошел, тему закрывать можно 🙄
- shutdown.exe -s
не далее как в прошлое воскресенье я на 8 часов вывел из строя один из крупных русских закладочников, по моему ваш юмор тут немного неуместен :)
TNT добавил 03.10.2008 в 17:10
во первых не роликов а ссылок на них, во вторых .. объясните вам какое до этого дело? может быть вы скажете - я убиваю руадалт? а вы весь из себя такой супермен-добродетель спасаете его?
ну так вот: гораздо больший вред руадалту наносит двойная-тройная система отправки смс (вспомните Гайдамаковскую партнерку, да элементарно ту же Т9) - имхо от них вреда руадалту больше в разы! накатайте абузу на них :D ... прямым письмом Путину например :p
не, мне ближе скорее Gentoo :) или LFS (Linux from Scratch) - ща ваще юзаю сборный LFS-дистр своего знакомого ))
валить серваки надо с умом а не просто тупо пинговать :) один грамотно составленный запрос может повешать сервак намертво ☝
да я находил дыры в достаточно известных сервисах (не ютуб конечно но всже ;)) .. и что?))
вобщем я не один такой. в лучшие времена клан насчитывал 20 чел... один из тех людей к примеру
сейчас числится в Core группе OpenBSD.. другой пошел работать на систему ..понимаешь, они были у истоков FIDO в России, юзали инет по x.25 когда ты пешком под стол ходил. Я учился у них - пускай немногому, но научился ..
зыж: хотелось конечно ответить пожестче .. начинаю понимать Арбайтена ;)
а если говорить по русски - настучал ;)
ну ангел-освободитель всяко лучше стукача 🙄
TNT добавил 02.10.2008 в 22:36
работа идет, Витяй вон уже на 200гиг роликов описания сочинил, счаз ищем дизайнера. 🚬
все это от любви к искусству. не надо искать какую то цель :) и да: люди занимаются дзеном не для увеличения члена или средств на счету :)
TNT добавил 02.10.2008 в 19:32
не только попробуем, но и напишем, когда толкового дизайнера найдем :) работы на неделю от силы .. интерфейс у русбиллинга не такой уж и сложный, а с остальнам разобраца халявка для школьнека 😆
