الإعــلام الآلي والرياضيــات يشتمل على جميع مبادئ الإعلام الآلي والرياضيــات

قديم 07-02-2009, 10:18 AM
  #1
achraf.mouni
مشرف قسم
الكمبيوتر وتطوير المواقع والانترنت
مشرف قسم
الرياضيات والإعلام الآلي
 الصورة الرمزية achraf.mouni
 
تاريخ التسجيل: 08-09-2008
الدولة: الجزائر
المشاركات: 2,439
achraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداع
07 بالتحكم بمتصفح الانترنت


بالتحكم بمتصفح الانترنت - Internet Explorer بواسطة visual basic
كود:
Dim WithEvents ie As InternetExplorer ' you have to  refer to _
' Microsoft Internet Control _
' the file name is  SHDOCVW.DLL



Private Sub Check1_Click(Index As Integer)
If  Check1(Index).Value = 1 Then
Select Case Index
Case 0
ie.ToolBar =  True
Case 1
ie.StatusBar = True
End Select
Else
Select Case  Index
Case 0
ie.ToolBar = False
Case 1
ie.StatusBar = False
End  Select
End If
End Sub

Private Sub  cmdopenPage_Click()
ie.Navigate txtURL.Text 'to Open the Web page
End  Sub

Private Sub cmdRefresh_Click()
ie.Refresh
End  SubSub StratIE()
Static ie As InternetExplorer
Set ie = New  InternetExplorer ' Start Internet Explorer
ie.Visible = True ' Make it  Visible
End Sub

Private Sub Command1_Click()
Unload Me
End  Sub

Private Sub Form_Unload(Cancel As Integer)
On Error Resume  Next
ie.Quit ' Quitting Internet Explorer
Set ie = Nothing
End  Sub

Private Sub ie_DownloadBegin()
lblStatus.Caption = "بداية  التحميل...."
End Sub
Private Sub  ie_DownloadComplete()
lblStatus.Caption = "انتهاء التحميل ...."
End  Sub
Private Sub cmdStratIE_Click()
Set ie = New  InternetExplorer
ie.ToolBar = False
ie.StatusBar = False
ie.Top =  3
ie.Width = 620
ie.Height = 565
ie.Left = 180
ie.Visible =  True
End Sub[/code
]



التعديل الأخير تم بواسطة achraf.mouni ; 07-02-2009 الساعة 10:22 AM
achraf.mouni غير متواجد حالياً  
قديم 09-02-2009, 08:16 PM
  #2
مامي
 الصورة الرمزية مامي
 
تاريخ التسجيل: 01-12-2007
المشاركات: 1,140
مامي عضو مبدعمامي عضو مبدعمامي عضو مبدعمامي عضو مبدعمامي عضو مبدع
افتراضي






بارك الله فيك أخي

achraf.mouni
__________________
إذاعة الصحبة الصالحة :

لا تبخل نفسك بالدخول :
مامي غير متواجد حالياً  
قديم 10-02-2009, 10:14 AM
  #3
Ssoft
مشرف قسم
الشهادات العلمية
مشرف منتدى
الدورات التعليمية المتخصصة
 الصورة الرمزية Ssoft
 
La spécialité: Informatique
اخرى ( جامعة عربية او اجنبية )
تاريخ التسجيل: 24-11-2008
الدولة: السوقر
المشاركات: 1,418
Ssoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداعSsoft عضو محترف الابداع
افتراضي

thank'ssssss
__________________


▌║││║█║▌│║│█║▌█│║▌▌║│││  
11 0011 10101 10101 1100 11

Ssoft غير متواجد حالياً  
قديم 10-02-2009, 11:56 AM
  #4
achraf.mouni
مشرف قسم
الكمبيوتر وتطوير المواقع والانترنت
مشرف قسم
الرياضيات والإعلام الآلي
 الصورة الرمزية achraf.mouni
 
تاريخ التسجيل: 08-09-2008
الدولة: الجزائر
المشاركات: 2,439
achraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداع
افتراضي

وفيك بركة........شكرا لمرورك
achraf.mouni غير متواجد حالياً  

الكلمات الدلالية (Tags)
الانترنت, بمتصفح, بالتحكم

أدوات الموضوع
انواع عرض الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
{برنامج} Internet Cyclone v2.10 برنامج إعصار الانترنت الرهيب لتسريع الانترنت yasser ndy منتدى البرامج العام 0 29-07-2011 11:06 PM
زنا الانترنت amin23 منتدى عام 5 28-10-2010 04:22 PM
{برنامج} اتصالات مجانية عبر الانترنت-اتصالات مجانية عبر الانترنت واظهار رقم الطالب زناتوريه منتدى البرامج العام 1 03-12-2009 08:16 PM
كتب الانترنت amin23 النقاش الجاد 3 14-04-2009 12:34 AM
برنامج (TeamViewer 3)يسمح لك بالتحكم بالأجهزة عبر العالم zailaf منتدى البرامج العام 4 29-08-2008 02:29 PM


الساعة الآن 06:37 AM.
Powered by vBulletin® Copyright ©2000 - 2018, Jelsoft Enterprises Ltd. , TranZ By Almuhajir