View Full Version : سوال: بدست آوردن سورس صفحه html
sajioo
چهارشنبه 17 آبان 1391, 14:18 عصر
دوستان عزیزم سلام
یک سوال داشتم اینکه چطور میشه سورس یک صفحه ی html رو درآورد. دقیقا مثل مرورگر ها که میشه از گزینه source page استفاده کرد و تگ های اچ تی ام ال رو دید.
برای مثال من آدرس سایت مثلا برنامه نویس رو بدم و بتونم سورسش رو در یک memo مشاهده کنم
تشکر از لطف همتون:بوس:
Felony
چهارشنبه 17 آبان 1391, 14:41 عصر
اینو دوران جوونی نوشته بودم .
sajioo
پنج شنبه 18 آبان 1391, 14:07 عصر
آقا مجتبی تشکر اما برنامه جواب نمی ده .
برنامه رو من در دلفی 7 اجرا می کنم و به این کد گیر میده
ReplyData := TStringStream.Create('', CP_UTF8);
که من به صورت زیر تغییرش دادم
ReplyData := TStringStream.Create('');
که پس از اجرای برنامه و زدن کلید مورد نظر این ارور را داد
94653
که پس از کلیک بر روی ok به خط
S := ReplyData.DataString;
مشکل میده.
راه حل داره به نظرتون؟
dark-man
پنج شنبه 18 آبان 1391, 22:52 عصر
برای به دست آوردن Source یک صفحه از کد زیر هم می تونی استفاده کنی . قبل از استفاده باید MSHTML رو در بخش uses ها قرار بدی .
var
iall : IHTMLElement;
begin
if Assigned(WebBrowser1.Document) then
begin
iall := (WebBrowser1.Document AS IHTMLDocument2).body;
while iall.parentElement <> nil do
begin
iall := iall.parentElement;
end;
memo1.Text := iall.outerHTML;
end;
end;
BORHAN TEC
جمعه 19 آبان 1391, 10:20 صبح
سلام
برای بدست آوردن کد html یک صفحه می تونید از کامپوننت TIdHttp هم به شکل زیر استفاده کنید:
Memo1.Text := IdHTTP1.Get('http://www.google.com');
sajioo
جمعه 19 آبان 1391, 12:57 عصر
برای بدست آوردن کد html یک صفحه می تونید از کامپوننت TIdHttp هم به شکل زیر استفاده کنید:
آقای عشایری نشد. باز هم همون اروری که پست قبل نشون دادم رو میده
sajioo
جمعه 19 آبان 1391, 13:52 عصر
دوستان گلم
اگر از این کد استفاده کنم
Memo1.Text := IdHTTP1.Get('http://www.msn.com');
ایرادی نداره چون سایت مورد نظر فارسی توش نداره
اما اگه از سایتی استفاده بشه که فارسی توش هست ایراد encoding را میگیره .چکار میشه کرد؟.
BORHAN TEC
جمعه 19 آبان 1391, 14:42 عصر
اون کدی که من نوشتم مشکلی نداره. اون ایراد encoding هم که میبینید بخاطر اینه که شما دارین از نسخه های فسیل شده دلفی استفاده می کنید. درسته؟؟؟؟:لبخندساده:
sajioo
جمعه 19 آبان 1391, 15:45 عصر
درسته !!!!!!!!!!!!!!!!!!! :لبخند:
اما به دلایلی مجبورم از این نسخه استفاده کنم.
حالا توی این راهی نداره؟
BORHAN TEC
جمعه 19 آبان 1391, 16:16 عصر
حالا توی این راهی نداره؟
راستش نمیدونم. چون من خودم شخصاً دلفی رو با نسخه های یونیکد شروع کردم. ولی طبق گفته برخی از سایت ها میگویند که برای این کار باید از کامپوننتهای TNT استفاده کرد.
Mask
شنبه 20 آبان 1391, 13:40 عصر
میتونید قسمت لود و اینکدینگ رو تو dll با نسخه های بالای دلفی پیاده سازی کنید و از dll خروجی رو به برنامتون که یونیکد پشتیبانی نمیکنه بفرستید.
nice boy
شنبه 14 اردیبهشت 1392, 13:16 عصر
اینو دوران جوونی نوشته بودم .
برنامه درست كار ميكنه ولي براي سايت هاي HTTPS اررو مي ده دليلش چيه؟
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.