منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ممكن مساعدة في تصميم بروز - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : ممكن مساعدة في تصميم بروز (/showthread.php?tid=9011)

ممكن مساعدة في تصميم بروز - algroob - 24-05-13

السلام عليكم


ابي اصمم2 بروز في فورم واحد عند الضقط على الوصلة في WebBrowser1 يعمل WebBrowser2

ياريت يتم التعديل على التصميم .

وشكراً لكم


مرفق التصميم :-

ممكن مساعدة في تصميم بروز - algroob - 25-05-13

لا يوجد رد

ممكن مساعدة في تصميم بروز - Hassan Khamees - 25-05-13

بروجكت بروز أخي بالمرفقات

ممكن مساعدة في تصميم بروز - algroob - 26-05-13

شكراً لك ولاكن مش هذا المقصود

ممكن مساعدة في تصميم بروز - VB_Coder - 26-05-13

السلام عليكم

- ضع هذا الكود داخل كود الفورم :

كود :
Dim Is_Cancel As Boolean

Private Sub Form_Load()
    
Is_Cancel = True

Call WebBrowser1.GoHome
Call WebBrowser2.GoHome

End Sub

Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
If Is_Cancel = False Then
   WebBrowser2.Navigate URL
   Cancel = True
End If
End Sub

Private Sub WebBrowser1_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
Is_Cancel = False
End Sub

- تحياتي .

ممكن مساعدة في تصميم بروز - algroob - 28-05-13

شكررررررررررراً هذا المطلوب

الله يجزيك خير