السلام عليكم ورحمة الله وبركاته
الكود التالي يقوم بجلب سورس ال html لاي صفحة خارجية مثلا تعطيه
ط´ط¨ظƒط© ط³ظˆط§ظ„ظپ - ظ„طھط·ظˆظٹط± ط§ظ„ظ…ظˆط§ظ‚ط¹ ظˆط§ظ„ظ…ظ†طھط¯ظٹط§طھ ظˆط®ط¯ظ…ط§طھ ط§ظ„ط§ط³طھط¶ط§ظپط©
يجيب لك سورس ال html كامل للصفحة
للنقاش حول الكود ومحاولة تحسين ادائة وقبل هذا لتبادل المعرفة اكتب الموضوع
الكود هو
كود:'الرابط الالكتروني الذي سوف يتم جلب السورس كود الخاص به Dim Url As String = "http://www.swalif.net/softs/index.php" 'الترميز للموقع المستهدف Dim Myencoding As Encoding = Encoding.GetEncoding("Windows-1256") Dim MyWebRequest As HttpWebRequest = DirectCast(WebRequest.Create(Url), HttpWebRequest) Dim MyWebResponse As HttpWebResponse = DirectCast(MyWebRequest.GetResponse(), HttpWebResponse) Dim MyStream As Stream = MyWebResponse.GetResponseStream() Dim MyStreamReader As New StreamReader(MyStream, Myencoding) 'بداية قرائة السورس كود Dim HTMLSource As String = MyStreamReader.ReadToEnd() 'نهاية قرائة السورس كود
ارجو منك تجربته وعرض اي افكار ومناقشات او محاولات تحسين
في امان الله