مرام نت
30-05-2009, 01:04 PM
بسم الله الرحمن الرحيم
..................................
بسم الله وبحمده نحمده ونستعيه
ونستغفرة ونستهديه
عمل مواقعك المفضله في أدآه صغيرة
بسم الله نبدأ ::::::
متطلبات العمل
برنامج الفيجول
برنامج الفيجوال بيسك 6 :
http://www.vb4arab.com/vb/uploaded/59/11192657056.jpg
رابط التحميل المباشر
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://download.microsoft.com/download/vstudio60ent/SP5/Wideband-Full/WIN98Me/EN-US/vs6sp5.exe)
-------------------------------------------------------------------------------------------------
ملف المساعده العام للفيجوال بيسك Help Generator for Visual Basic 6.0
http://www.vb4arab.com/vb/uploaded/59/01192660020.jpg
رابط التحميل المباشر
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://www.code-vb.com/exes/cvbhelp.exe)
------------------------------------------------------------------------------------------------
النسخة المحموله من برنامج الفيجوال بيسك
http://www.vb4arab.com/vb/uploaded/59/01192658098.jpg
هذه نسخة الفيجول بيسك 6 المحمولة والتي تعمل على أي جهاز بدون تنصيب
حجم هذه النسخة هو 4.59 MB فقط ..... مع العلم بأن هذ النسخه لا تحتوي على
مكتبات OCX
رابط التحميل
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://www.zshare.net/download/273832438232cc)
-------------------------------------------------------------------------------------------------
مكتبة الـ MSDN الكاملة
http://www.vb4arab.com/vb/uploaded/59/01192657056.jpg
رابط التحميل المباشر من مايكروسوفت 354MB
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://download.microsoft.com/download/c/4/b/c4b15d7d-6f37-4d5a-b9c6-8f07e7d46635/setup.exe)
http://absba1.absba.org/teamwork7/446471/exevbpb4.jpg
وهذه هي المحتويات بعد فك الضغط
سيفتح لك هذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_14429132.jpg
الخطوه الثانية انظر الصورة
http://www.zyzoom.net/vb_up/upload/wh_44796340.jpg
http://www.zyzoom.net/vb_up/upload/wh_12930855.jpg
http://www.zyzoom.net/vb_up/upload/wh_89764594.jpg
والخطوة الجاية هي إضافة زراير
لأداتك التي تريد ان تضع فيها مواقعك المفضلة
http://www.zyzoom.net/vb_up/upload/wh_88977389.jpg
الشكل النهائي لعمل الزراير
http://www.zyzoom.net/vb_up/upload/wh_87166778.jpg
لتغير العنوان تبع الأداه
http://www.zyzoom.net/vb_up/upload/wh_63251446.jpg
الان الخطوة المهمة
وهي انك تضغط على الفورم الخارجي للأداه
وسوف يظهر لك هذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_29891123.jpg
كل ما عليك أنك تمسح السطرين
وتضع بدل لهم هذا الكود
Private Const SW_SHOWNORMAL = 1
Private Declare Function lExecute Lib "l32.dll" Alias _
"lExecuteA" ( _
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
ستصبح بهذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_26673150.jpg
ومن ثم
بعد عمل هذه الخطوط ووضع الأكواد كما تريد
اضعط على أف 5
الان كل ما عليك الضغط على الأزرار
سيظهر لك كود هكذا
Private Sub Command1_Click()
End Sub
ضع هذا الكود بين السطرين
lExecute Me.hwnd, "open", "http://www.zyzoom.org", vbNullString, vbNullString, SW_SHOWNORMAL
انظر الشكل
http://www.zyzoom.net/vb_up/upload/wh_32462675.jpg
ومن ثم
بعد عمل هذه الخطوط ووضع الأكواد كما تريد
اضعط على أف 5 للتأكد من انك ماشي صح
باين الأن العملية صعبت شوية
بس صدقني سهلة
انطر في الكود الذي اعطيته لك
تجد فيه رابط المنتدى الذي
غيره الى روابط المنتدى الذي تريد
http://www.zyzoom.net/vb_up/upload/wh_45902137.jpg
واخيراً تخزين البرنامج
بهذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_28434106.jpg
ودي النتيجـــــــــة
http://www.zyzoom.net/vb_up/upload/wh_15656291.jpg
ملاحظة : حمل الأكواد من المرفقات أفضل لك لأنها هنا كامله
http://www.zyzoom.net/vb_up/upload/wh_82342464.png
منقول للفائدة
..................................
بسم الله وبحمده نحمده ونستعيه
ونستغفرة ونستهديه
عمل مواقعك المفضله في أدآه صغيرة
بسم الله نبدأ ::::::
متطلبات العمل
برنامج الفيجول
برنامج الفيجوال بيسك 6 :
http://www.vb4arab.com/vb/uploaded/59/11192657056.jpg
رابط التحميل المباشر
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://download.microsoft.com/download/vstudio60ent/SP5/Wideband-Full/WIN98Me/EN-US/vs6sp5.exe)
-------------------------------------------------------------------------------------------------
ملف المساعده العام للفيجوال بيسك Help Generator for Visual Basic 6.0
http://www.vb4arab.com/vb/uploaded/59/01192660020.jpg
رابط التحميل المباشر
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://www.code-vb.com/exes/cvbhelp.exe)
------------------------------------------------------------------------------------------------
النسخة المحموله من برنامج الفيجوال بيسك
http://www.vb4arab.com/vb/uploaded/59/01192658098.jpg
هذه نسخة الفيجول بيسك 6 المحمولة والتي تعمل على أي جهاز بدون تنصيب
حجم هذه النسخة هو 4.59 MB فقط ..... مع العلم بأن هذ النسخه لا تحتوي على
مكتبات OCX
رابط التحميل
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://www.zshare.net/download/273832438232cc)
-------------------------------------------------------------------------------------------------
مكتبة الـ MSDN الكاملة
http://www.vb4arab.com/vb/uploaded/59/01192657056.jpg
رابط التحميل المباشر من مايكروسوفت 354MB
http://www.zyzoom.net/vb_up/upload/wh_82342464.png (http://download.microsoft.com/download/c/4/b/c4b15d7d-6f37-4d5a-b9c6-8f07e7d46635/setup.exe)
http://absba1.absba.org/teamwork7/446471/exevbpb4.jpg
وهذه هي المحتويات بعد فك الضغط
سيفتح لك هذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_14429132.jpg
الخطوه الثانية انظر الصورة
http://www.zyzoom.net/vb_up/upload/wh_44796340.jpg
http://www.zyzoom.net/vb_up/upload/wh_12930855.jpg
http://www.zyzoom.net/vb_up/upload/wh_89764594.jpg
والخطوة الجاية هي إضافة زراير
لأداتك التي تريد ان تضع فيها مواقعك المفضلة
http://www.zyzoom.net/vb_up/upload/wh_88977389.jpg
الشكل النهائي لعمل الزراير
http://www.zyzoom.net/vb_up/upload/wh_87166778.jpg
لتغير العنوان تبع الأداه
http://www.zyzoom.net/vb_up/upload/wh_63251446.jpg
الان الخطوة المهمة
وهي انك تضغط على الفورم الخارجي للأداه
وسوف يظهر لك هذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_29891123.jpg
كل ما عليك أنك تمسح السطرين
وتضع بدل لهم هذا الكود
Private Const SW_SHOWNORMAL = 1
Private Declare Function lExecute Lib "l32.dll" Alias _
"lExecuteA" ( _
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
ستصبح بهذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_26673150.jpg
ومن ثم
بعد عمل هذه الخطوط ووضع الأكواد كما تريد
اضعط على أف 5
الان كل ما عليك الضغط على الأزرار
سيظهر لك كود هكذا
Private Sub Command1_Click()
End Sub
ضع هذا الكود بين السطرين
lExecute Me.hwnd, "open", "http://www.zyzoom.org", vbNullString, vbNullString, SW_SHOWNORMAL
انظر الشكل
http://www.zyzoom.net/vb_up/upload/wh_32462675.jpg
ومن ثم
بعد عمل هذه الخطوط ووضع الأكواد كما تريد
اضعط على أف 5 للتأكد من انك ماشي صح
باين الأن العملية صعبت شوية
بس صدقني سهلة
انطر في الكود الذي اعطيته لك
تجد فيه رابط المنتدى الذي
غيره الى روابط المنتدى الذي تريد
http://www.zyzoom.net/vb_up/upload/wh_45902137.jpg
واخيراً تخزين البرنامج
بهذا الشكل
http://www.zyzoom.net/vb_up/upload/wh_28434106.jpg
ودي النتيجـــــــــة
http://www.zyzoom.net/vb_up/upload/wh_15656291.jpg
ملاحظة : حمل الأكواد من المرفقات أفضل لك لأنها هنا كامله
http://www.zyzoom.net/vb_up/upload/wh_82342464.png
منقول للفائدة