[ابو عمر المولى]

كيفية حفظ صفحة 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

اظن الاشكال في الكود الذي لونه احمر لكن لا استطيح الحل ارجو المساعدة
علما ان فكرة البرنامج هو عندي مواقع مخزونة اريد من خلال التصفح احفظ الصفحة التي اريدها اطلعت كثيرا على الامثلة الموجودة في الشبكة ما رأيت شيئا قريب من الذي اريده

[VB_Coder]

السلام عليكم

- إستخدم هذا الكود لحفظ الصفحة الحالية في أداة ال WebBrowser :

كود :

WebBrowser1.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT

- تحياتي .

[ناجي إبراهيم]

السلام عليكم...

منوّر و الله يا أخي VB_Coder. إجاباتك دائماً تنم عن خبرة... زادك الله من علمه و نفع بك إن شاء الله.

سلام.

[ابو عمر المولى]

[SIZE=7]شكرا اخي العزيز على ذلك هذا ما اريده بالضبط واسال الله ان يجعل ذلك في موازين حسناتك[/SIZE]

[kader30]

بارك الله فيك على الجهد المبذول