13-03-13, 08:32 AM
كيفية حفظ صفحة html مع commom dialog اذا كانت هذه الصفحة ضمن الكائن WebBrowser1
Private Sub mnusaveas_Click()
CommonDialog1.Filter = "web page ,complete(*.htm,*html)"
CommonDialog1.InitDir = "c:\"
CommonDialog1.FileName = WebBrowser1.Navigate()
CommonDialog1.ShowSave
End Sub
اظن الاشكال في الكود الذي لونه احمر لكن لا استطيح الحل ارجو المساعدة
علما ان فكرة البرنامج هو عندي مواقع مخزونة اريد من خلال التصفح احفظ الصفحة التي اريدها اطلعت كثيرا على الامثلة الموجودة في الشبكة ما رأيت شيئا قريب من الذي اريده
Private Sub mnusaveas_Click()
CommonDialog1.Filter = "web page ,complete(*.htm,*html)"
CommonDialog1.InitDir = "c:\"
CommonDialog1.FileName = WebBrowser1.Navigate()
CommonDialog1.ShowSave
End Sub
اظن الاشكال في الكود الذي لونه احمر لكن لا استطيح الحل ارجو المساعدة
علما ان فكرة البرنامج هو عندي مواقع مخزونة اريد من خلال التصفح احفظ الصفحة التي اريدها اطلعت كثيرا على الامثلة الموجودة في الشبكة ما رأيت شيئا قريب من الذي اريده