تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف نطبق عملية حفظ باسم للصفحة
#1
اعود من البداية لاسال عن كود حفظ الصفحة كـ صفحة ويب كاملة
مثل الموجود باي متصفح ..كيف يمكن نطبقها بان نحفظ الصفحة كاملة بنقرة زر؟
الرد
تم الشكر بواسطة:
#2
كود :
My.Computer.FileSystem.WriteAllText("Path.html", WebBrowser1.DocumentText, True)
الرد
تم الشكر بواسطة: سعود
#3
اخي الكريم كما هو واضح بالكود الطريقة ليست المطلوبة.
المطلوب حفظ صفحة ويب كاملة كما الحال مع اي متصفح .
الرد
تم الشكر بواسطة:
#4
WebBrowser1.DocumentText
مثالي كما تلاحظه فهو للحفظ مافي اداة WebBrowser1
هل تقصد بدون الاداة WebBrowser1؟
الرد
تم الشكر بواسطة: سعود
#5
اخي الكريم هذه الطريقة بسيطة جدا فهي تحفظ فقط مصدر الصفحة يعني لو طبقتها وفصلت الانترنت ستجد ان الصفحة بدون روابط يعني فقط نص.
جرب من القائمة حفظ كصفحة ويب وانظر كيف يحفظ الصور وكافة المحتويات.
الرد
تم الشكر بواسطة:
#6
صح كلامك غير
WebBrowser1.Document
الى
WebBrowser1.Document.Body.InnerHtml

طبعآآ المتصفحات تحفظ الصور والاشياء بمجلد خارجي لاحظها بنفسك
بمعنى تعمل تحميل على جميع محتويات الصفحة
الرد
تم الشكر بواسطة:
#7
طيب وش رايك بالكود هذا
كود :
WebBrowser1.ShowSaveAsDialog()
لكن شلون نحفظ بشكل ديناميكي؟؟؟

رسالة الخطا ماودها تفارقني اعوذ بالله
Illegal characters in path.
حتى بالرابط اللي اعطانياه الكود
كود :
Dim wc As New Net.WebClient
        wc.Encoding = Encoding.Default
        wc.DownloadFile(WebBrowser1.Url.Host & WebBrowser1.Url.PathAndQuery, ".htm")

صح الخطا الاخير كان الرابط لايبدا ب http
جاري اكمال التجربة مع الجوع
الرد
تم الشكر بواسطة: 3booody
#8
الافضل لك ان تحمل جميع محتويات الصفحة بمجلد واحد مثل المتصفحات
تعمل حلقة تكرارية تقوم بتحميل جميع الصور

ان شاء الله يساعدك شخص ذو خبره اكثر مني
الرد
تم الشكر بواسطة: سعود
#9
ياسلام وجدت كود مريح للغاية مع وجوب النظر لتطويعه للعملية الديناميكية
اولا اسند رابط لاداة المتصفح
ثانيا في حدث
WebBrowser1_DocumentCompleted

اكتب
كود :
WebBrowser1.ShowSaveAsDialog()
        Dim wc As New Net.WebClient
        wc.Encoding = Encoding.Default
        Dim fp As String = WebBrowser1.Url.Host & WebBrowser1.Url.PathAndQuery
        fp.Trim.Replace(" ", "")
        If fp.StartsWith("http://") = False Then
            fp.Insert(0, "http://")
        End If
      
        Dim page As String = wc.DownloadString(fp)
        IO.File.WriteAllText(Application.StartupPath & "\index.htm", page, Encoding.Default)

من يعدل على الكود بحيث يكون الحفظ مكان واحد وايضا يكون مسار كل الصور بنفس مكان الصفحة؟؟
الظاهر نرجع لـ regex SadSadSad

ممتاز ياشباب الوضع تم بشكل رائع لكن سالفة مربع الحوار شلون نتخطاها؟
ايضا اداة المتصفح شلون نستخدم الكود لانشاء مستعرض مع حدث الاكتمال؟؟؟

اكتشفت ان السطرين التاليين هما فقط المسؤلان عن نجاح العملية
كود :
WebBrowser1.Navigate("http://vb4arb.com/vb/showthread.php?tid=727")

        WebBrowser1.ShowSaveAsDialog()
الاول في حدث نقر زر
والاخر في حدث اكتمال تحميل الصفحة

=======================================
==================================

لكن سالفة مربع الحوار شلون نتخطاها؟
ايضا اداة المتصفح شلون نستخدم الكود لانشاء مستعرض مع حدث الاكتمال؟؟؟


http://msdn.microsoft.com/en-us/library/...leted.aspx

اتمنى احد يشرح المكتوب بالرابط وكيف نستخدم اضافة حدث الاكتمال
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] عملية البيع عبدالرحمن بشري عمر 0 36 18-02-19, 02:57 PM
آخر رد: عبدالرحمن بشري عمر
  [سؤال] رسالة خطأ بعد عملية الاضافة georgos 11 169 16-02-19, 03:36 PM
آخر رد: georgos
Question [سؤال] تعبئة TreeView مع جود اكثر من عملية بحث ادخل جدوالين alims 0 49 06-02-19, 11:58 PM
آخر رد: alims
  عملية تحويل رقم reverse fouadhdfouad 5 148 30-12-18, 05:50 PM
آخر رد: a.wagdi
  [VB.NET] اظهار عملية جمع حقلين في قاعدة البيانات فراس الغزي 3 183 30-12-18, 03:42 PM
آخر رد: alsouf
  [VB.NET] جمع قيمة اثناء عملية تحديث البيانات محمد اسماعيل 0 117 14-12-18, 07:32 PM
آخر رد: محمد اسماعيل
  [VB.NET] اضافة سريال لكل عملية محمد اسماعيل 4 205 14-12-18, 07:14 PM
آخر رد: محمد اسماعيل
  [VB.NET] بعد عملية التطوير من فيرجن قديم الى جديد 0theghost0 1 131 10-12-18, 02:47 PM
آخر رد: elgokr
  [سؤال] طلب عملية حسابية motazsaad94@gmail.com 2 157 04-12-18, 11:30 PM
آخر رد: motazsaad94@gmail.com
  [VB.NET] كيف يتم التأثير على المخزون عند عملية البيع 739906433 1 137 03-12-18, 05:05 PM
آخر رد: حريف برمجة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم