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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+--- الموضوع : فتح صفحة ويب بدون رساله ActiveX (/showthread.php?tid=19413)



فتح صفحة ويب بدون رساله ActiveX - الحائطي - 25-02-17

السلام عليكم اخواني المهندسين

ارجو المساعده تعديل على الكود بحيث يقوم بفتح صفحة الويب بدون رساله عناصر التحكم

[صورة مرفقة: 148802484587041.jpg]

Private Sub Command2_Click()
Dim obj As Object
Set obj = CreateObject("InternetExplorer.Application")
obj.Navigate2 App.Path & "\index.htm"
obj.Visible = True
End Sub


RE: فتح صفحة ويب بدون رساله ActiveX - khodor1985 - 25-02-17

السلام عليكم أخي العزيز ورحمة الله وبركاته
يمكنك التعديل على وضعية ActiveX Prompt من خلال عنصر الخيارات لصفحة Internet Explorer دون الحاجة إلى كتابة أكواد، والخطوات هي :
Internet Options > Security > Custom Level > and Set ActiveX Controls and Plugins to Disable


RE: فتح صفحة ويب بدون رساله ActiveX - khodor1985 - 25-02-17

عذرا أخي الكريم لم ألتفت للقسم، فأنا لا أجيد Visual basic 6،
أتمنى لك التوفيق


RE: فتح صفحة ويب بدون رساله ActiveX - الحائطي - 25-02-17

اخي khodor1985  اشكر تفاعلك

تفاعلك للموضوع اكبر مساعده لي جزاك الله خير

مطلوب نفس الطريق للاخ khodor1985 ولاكن عن طريق الاكواد


RE: فتح صفحة ويب بدون رساله ActiveX - الحائطي - 25-02-17

ارجو المساعده


RE: فتح صفحة ويب بدون رساله ActiveX - khodor1985 - 25-02-17

شكرا لك أخي العزيز، هيدا من ذوقك


RE: فتح صفحة ويب بدون رساله ActiveX - الحائطي - 26-02-17

?????? مساعده


RE: فتح صفحة ويب بدون رساله ActiveX - السيد الغالي - 28-02-17

جرب الكود التالي
Dim x As String
x = App.Path & "\index.html"
AppActivate Shell("C:\Program Files\Internet Explorer\IExplore.exe " & x, vbMaximizedFocus)


RE: فتح صفحة ويب بدون رساله ActiveX - الحائطي - 01-03-17

السيد الغالي

اشكر تفاعلك نفس المشكله