شرح كيفية انشاء ارتباط تشعبى Hyperlink لموقع معين من خلال الفجوال بيسك 6

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

شرح كيفية انشاء ارتباط تشعبى Hyperlink لموقع معين من خلال الفجوال بيسك 6

مُساهمة من طرف NEXT في الجمعة نوفمبر 02, 2012 4:21 pm

بسم الله الرحمن الرحيم


أخوانى الاعضاء اهلا بكم ....اليوم راح اقدم لكم موضوع سهل عن كيفية انشاء ارتباط تشعبى Hyperlink لموقع معين ليقوم المستخدم بفتحه عند الضغط عليه ....

1_ قم بإنشاء مشروع جديد فى الفجوال بيسك 6 ....وضع أداة عنوان علية label .....

2_ قم بإضافة الكود التالى فى قسم التصريحات :

الرمز:
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal
lpDirectory As String, _
ByVal nShowCmd As Long) As Long

3 _ ثم ضع الكود التالى فى حدث الضغط على أداة العنوان label 1 :

الرمز:
ShellExecute Form1.hwnd, "open", "http://egy-tech.forumegypt.net/]http://egy-tech.forumegypt.net", "", "", SW_SHOW Or SW_NORMAL

وطبعا يمكن تغير المراد عمل له ارتباط تشعبى بدلا من الموجود بالكود ....

4_ قم بتشغيل برنامج وقم بالضغط على label ستجد أن موقع منتدى مصر التقنى قد فتح امامك ....ما رأيك ؟
الكود فى المرفقات :
المرفقات
Hyperlink.zip لا تتوفر على صلاحيات كافية لتحميل هذه المرفقات.(2 Ko) عدد مرات التنزيل 22

NEXT
الادارة
الادارة

تاريخ التسجيل : 18/02/2011
المساهمات : 262
النقاط : 378
التقيم : 10
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى