29-10-13, 12:50 AM
السلام عليكم...
يمكن ذلك باستعمال الـ Stream و لكن لا يتم الحفظ بنفس طريقة الـ Browser حيث تحفظ موارد الصفحة (الصور و الفلاشات و غيرها) في مجلد يحمل اسم الصفحة + files_ ، و إنما تحفظ كصفحة HTML.
على أية حال ربما يفيدك هذا الكود:
ستلاحظ أن الحفظ يتم بسرعة لأنه - كما قلت - لا يتم تنزيل الموارد المرتبطة بالصفحة.
نرجو الاستفادة و السلام.
يمكن ذلك باستعمال الـ Stream و لكن لا يتم الحفظ بنفس طريقة الـ Browser حيث تحفظ موارد الصفحة (الصور و الفلاشات و غيرها) في مجلد يحمل اسم الصفحة + files_ ، و إنما تحفظ كصفحة HTML.
على أية حال ربما يفيدك هذا الكود:
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Fs As FileStream = New FileStream("D:\MyWebPage.html", FileMode.Create, FileAccess.Write, FileShare.None)
Dim BW As New BinaryWriter(Fs)
Dim ContentArr(WebBrowser1.DocumentStream.Length - 1) As Byte
WebBrowser1.DocumentStream.Position = 0
WebBrowser1.DocumentStream.Read(ContentArr, 0, WebBrowser1.DocumentStream.Length)
BW.Write(ContentArr)
BW.Flush()
BW.Close()
MsgBox("تم الحفظ")
End Sub
End Classستلاحظ أن الحفظ يتم بسرعة لأنه - كما قلت - لا يتم تنزيل الموارد المرتبطة بالصفحة.
نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
