Investujte s rozumom

Užívateľ

Ako to dosiahnut? A nie iba tak hociako exec iexplorer+path ale potrebujem odoslat aj referer. (idHTTP ? )

Skúsený užívateľ

Takto?

kód:

ShellExecute(Self.WindowHandle,'open','www.pcforum.sk',nil,nil, SW_SHOWNORMAL);

Užívateľ

no predpokladajme ze nemam spusteny ie, potom by to asi uz neslo

.
Pre ilustraciu o co ide. Mame hlasovaciu sutaz v ktorej vyhrava ten kto ma najviac hlasovani. Pricom v ankete je povolene z tej istej ip hlasovat viackrat (oto vlastne ide) ale iba raz za hodinu. Spustenie samotneho linku nefunguje. preto treba ref. A rad by som to mal s ie alebo programovo, potom si to dam napr na HIDE a neotravuje ma to jak si to klika.

Užívateľ

To by chcelo normalny request, nie riesit to takto pomocou "simulacie kliku", ale aj tak je najjednoduchsia cesta jednoducho na ten link kliknut pomocou autoklikeru, toto bol povodne autoklicker na facebook (bola aplikacia, ktora merala pocet klikov za 30s

)

kód:

#include <windows.h>
#include <stdio.h>

HWND hWnd;

int main(int argc, char* argv[]) {
int coord=0x013B0209;
getchar();
__asm {
mov dword ptr ds:[hWnd],0x3020E
}
while(1) {
SendMessageW(hWnd,WM_LBUTTONDOWN,0,coord);
SendMessageW(hWnd,WM_LBUTTONUP,0,coord);
}
return 0;
}

Je to sice C, ale volania su rovnake, staci trochu zmenit kod. do coord treba dat do horneho a dolneho slova suradnice, kam klikne (treba to nejako odmerat na obrazovkeň v pixeloch, neviem teraz ktora je X a Y, treba skusit. Do hWnd treba priradit handle aktualne okna, v ktorom je ten link, ktoru ziskats napr pomocou spy++, a potom staci nastavit nejaky cas, na ktory sa sleepne, v povolenom intervale hlasovacom.

Užívateľ

no, ja som si spravil kliker. To nie je problem. Nastavim si tam x suradnic a bude mi to klikat dokola ale preto to chcem jak som pisal v poslednom poste lebo si predstav ze mi to bude bezat 24/7 . a ja teraz nemozem pracovat lebo mi beha kurzor furt?

neprakticke

Užívateľ

pri tomto nebeha, tam nepracujes s misou, len posles spravu

Užívateľ

no prepac, ale nepozdava sa mi taketo jednorazove riesenie.

Užívateľ

vies, ani mne, ale nakolko nemam delphi, nemam windows a taketo veci som s delphi robil naposledy 2 roky dozadu, tak som nemal ako otestovat to co sa da vygooglit, tak som to sem radsej nedaval

. Ale ty mozes skusit google, vrati to mrte vela prispevkov.

Užívateľ

Ano, ale na moj problem mi google nepomohol. Otvorit link, nato je milion prispevkov ale ja potrebujem otvorit link a zaroven poslat neaky referer. Ak takychto rieseni najdes mrte tak ich ukaz, alebo cez postu nech nespamujeme.

Užívateľ

no neako neviem ani toto rozbehat, hadze to error

kód:

var
MemoryStream:TMemoryStream;
begin
MemoryStream:=TMemoryStream.Create;
IdHTTP1.get('service.easycall.pl/user.ipl
'&pass='+pass.text,memorystream);
MemoryStream.Position:=0;
Memorystream.SaveToFile('zzz.txt');
Memo1.Lines.LoadFromStream(MemoryStream);
MemoryStream.Free;
Memo1.Lines.LoadFromFile('zzz.txt');
end;

Užívateľ

netreba dat do uses potrebne kniznice? skus hodit ten error sem.

Užívateľ

HTTP/1.0 501 Not implemented
-skor nieco nastavit

Užívateľ

inak toto by malo fungovat, neviem preco nie

kód:

procedure TForm1.Button1Click(Sender: TObject);
var
Flags, Headers, TargetFrameName, PostData: OleVariant;
Url, Ref: string;
begin
flags := '1';
targetframename := '';
postdata := '';
url := 'http://www.stranka.sk/x.html';
ref := 'http://www.stranka.sk';
headers := 'Referer: ' + ref + '#10' + '#13';
webbrowser1.Navigate(url, flags, targetframename, postdata, headers);
end;

Skúsený užívateľ

Tak mne to funguje, stránku mi riadne načíta (mohol si aspoň napísať, kde to háďže chybu, čo vypísalo alebo niečo, čoho sa dá chytiť).

Užívateľ

no ja skusam otvorit link, lenze aj ked ho otvaram takto tak nedostanem vyslednu stranku ale stranku s textom "No referer!"

edit: chyba bude inde, nie v kode

Investujte s rozumom

Nový detský krém

Kurzy pre správcov sietí

Potrebujete hotovosť ?

Hry - obchod ProGamingShop.sk

[Delphi] Simulacia "klik na link"