PDA

View Full Version : ورود به سایت با استفاده از Username و Password در کامپوننت HTML



FiACKER
یک شنبه 15 آذر 1388, 13:37 عصر
سلام
من باید به یه سایت با کاربری و رمز به سايتي مثله ياهو وارد بشم.
ممنون می شم کمک کنید.

Felony
یک شنبه 15 آذر 1388, 14:52 عصر
چندین بار در سایت بحث شده ، در قسمت کامپوننت های دلفی به دنبال همین موضوع بگردید .

Felony
یک شنبه 15 آذر 1388, 15:25 عصر
کامپوننتی دقیقا برای این کار وجود نداره ، ولی تو اون بخش چندین بار همچین سوالاتی مطرح شده بود و آقای کشاورز و دوستان دیگه راهنمایی هایی در مورد نحوه ی ورود به یک سایت و ... کرده بودند .

Felony
سه شنبه 17 آذر 1388, 06:46 صبح
private
procedure WMActivate(var Msg: TWMActivate); message WM_ACTIVATE;

procedure TForm1.WMActivate(var Msg: TWMActivate);
var
S: String;
wnd: HWND;
I: Integer;
begin
If Msg.Active=0 then
begin
wnd := Msg.ActiveWindow;
I := GetWindowTextLength(wnd);
SetLength(S, I + 1);
GetWindowText(Wnd, PChar(S), I + 1);
If S='Internet Explorer Script Error' then SendMessage(wnd,WM_CLOSE,0,0);
end;
end;

Felony
سه شنبه 17 آذر 1388, 18:42 عصر
خوب ببینید مشکل از کجای ارسال پارامتر ها هستش .


با غیر فعال کردن جاوا اسکریپت شاید خطا از بین بره.
بله از بین میره ، من گفتم شاید نخواین جاوااسکریپت سیستم کاربر رو غیر فعال کنید .

FiACKER
پنج شنبه 19 آذر 1388, 22:14 عصر
در سایت delphi.about هم چيزي نبود

Felony
پنج شنبه 19 آذر 1388, 22:29 عصر
لینک (http://www.google.com/search?hl=fa&lr=&ei=XEshS6W9MoGD4Qbf1pneCQ&sa=X&oi=spell&resnum=0&ct=result&cd=1&ved=0CAQQBSgA&q=disable+internet+explorer+script+error+by+delphi&spell=1) دوم که مربوط به سایت Expert Exchange هست رو ببین .