Logowanie na www

0

A więc tak... Chciałem zrobić program, który z poziomu delphi będzie się logować do gry. Wiem, że ten temat był już dużo razy, ale w żadnym z nich nie znalazłem odpowiedzi, a jak znalazłem to nie działała. Więc bardzo proszę mnie nie odsyłać do szukaczki. Nie mam też IdHTTP (chyba że da się to jakoś dograć do personala?) A przechodząc do konkretów. Potrzeba wypełnić formularz email+hasło. Próbowałem tak:

-http://www.adres.pl/index.php?email=coś@op.pl&pass=mojehaslo
-http://www.adres.pl/index.php?email=coś%40op.pl&pass=mojehaslo
-http://coś@op.pl:hasł[email protected] (zapamietane w przeglądarce)

I zawsze przenosi mnie do strony głównej. Wysyłanie jest metodą post. Tutaj kawałek źródła

<form method="post" action="updates.php">
        <table cellpadding="0" cellspacing="0" width="90%" align="center">
        <tr>

        <td width="20%">Email:</td><td><input type="text" name="email" /></td>
        </tr>
        <tr>
        <td width="20%">Hasło:</td><td><input type="password" name="pass" /></td>
        </tr>
        <tr>
        <td colspan="2"><input type="submit" value="Zaloguj" /></td>

Bede bardzo wdzięczny za wszelką pomoc, bo męcze się już z tym i niemoge sobie poradzić :(

0

ja kiedys sobie poradzilem tak:

sciagasz program HTTPLook ze stronki
http://www.httpsniffer.com/download.htm
wlaczasz go
uruchamiasz podsluch
wlaczasz przegladarke www
wchodzisz na strone logowania
logujesz sie
wylaczasz podsluchiwanie w HTTPLook
szukasz w HTTPLook linijki odpowiadajacej momentowi logowania do gry
{mozliwe ze jest to kilka linijek}
kopiujesz ja i wysylasz ja za pomoca swojego programu
jestes zalogowany!

mam nadzieje ze o to chodzilo
pzdr

0

Gdy włączam podsłuch to wtedy żadna strona sie nie wyświetla :/

0

ja uzywalem tego programu
jakies 5 lat temu:P
moze cos sie zmienilo... musisz poczytac
ale mi sie udalo zrobic logowanie w ten sposob...
patrzylem co wysyla przegladarka i potem sam to wysylalem

POWODZENIA

0

Więc jest jeszcze jeden sposob:
Uzywasz WebBrowser1(mozesz dac Visible na false, to bedzie on nie widzoczny dla uzytkownika).

var
klik: IHTMLElement;
doc: IHTMLdocument2;

begin
webbrowser1.OleObject.document.forms.item(0{ewentualny inny nr formy}).elements.item(0).value:='username';
webbrowser1.OleObject.document.forms.item(0{ewentualny inny nr formy}).elements.item(1).value:='password';
doc := webbrowser1.Documnt as IHTMLDocument2;
klik:= doc.all.item('Submit',0) as IHTMLElemnent;
klik.click;
end;

A najlepiej to googluj.
Jest kilka opisow tego necie.

pozdrawiam

0

A jeszcze dwa pytania do tego sposobu.

  1. Czy mam coś dodać do usues, bo mi wywala -[Error] Unit1.pas(36): Undeclared identifier: 'IHTMLElemnent'.
  2. I ja to mam wrzucić w onCreat formy?
0

oczywiscie, dodaj do uses,
a ta procedure dodaj sobie naprzyklad do klicka buttona albo jak chcesz!!
pamietaj ze w przegladarce musisz otworzyc strone na ktorej jest ten formularz.
Pobaw sie to jest bardzo latwe tylko trzeba chwile sobie to wszytsko poogladac.

pozdrawiam

0

Tylko pytanie co mam dodać do uses? :D

0

MSHTML

0

Tylko u mnie tego NIE MA. :/ [Fatal Error] Unit1.pas(7): File not found: 'MSHTML.dcu'
Da się to jakoś ściągnąć? Albo może mógłbyś mi podesłać na maila?

0

Sevin: spróbuj MSHTML_Tlb albo poszukaj w katalogu Delphi pliku co zawiera w nazwie "MSHTML"

0

Nie mam nic takiego :/

0

kur*** no dajcie ten plik !!! ja nie wytrzymam ! CAŁY INTERNET "przetrzepałem" i NIC ! daj go ktoś <beczy> <huasau> <beee>

0

Note: To use, import the "Microsoft HTML Object Library" (MSHTML.TLB) and include MSHTML_TLB in the unit's uses clause.

c:\Program Files\Borland\BDS\4.0\lib\MSHTML.dcu
c:\Program Files\Borland\BDS\4.0\lib\debug\MSHTML.dcu

0

oh w pore mitring :) już sie domyśliłem :P

ale i tak dzieki za pomoc :D

1 użytkowników online, w tym zalogowanych: 0, gości: 1