منتديات الجنرال صدام الشرعبي لي الهكرز والاختراقات
عزيزي الزائر عزيزتي الزائرة يرجي التكرم بتسجبل الدخول
لي اجل تستطيع اطهار جميع المواضيع والاقسام
اذا كنت عضو معنا

او التسجيل ان لم تكن عضو وترغب في الانضمام الي المنتدي

نتشرف بتسجيل

ادارة المنتدى
منتديات الجنرال صدام الشرعبي لي الهكرز والاختراقات
عزيزي الزائر عزيزتي الزائرة يرجي التكرم بتسجبل الدخول
لي اجل تستطيع اطهار جميع المواضيع والاقسام
اذا كنت عضو معنا

او التسجيل ان لم تكن عضو وترغب في الانضمام الي المنتدي

نتشرف بتسجيل

ادارة المنتدى
منتديات الجنرال صدام الشرعبي لي الهكرز والاختراقات
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.


منتديات الجنرال صدام الشرعبي لي الهكرز والاختراقاأكبر منتدى هكر عربي متخصص بجديد الثغرات واختراق المواقع والأجهزة.منتدى إختراق البريد والايميلات- قسم اختراق دورة إحتراف التلغيمدورة اختراق IPs من نوع SIPو VOIP‎دورة كشف التلغيم‎دورة اختراق الأجهزة‎دورة
 
الرئيسيةأحدث الصورالتسجيلدخول


تحياتي لك الباب مفتوح لي في جميع الاقسام الذي تريده عند المشاركه  اي استفسار انا جاهز ان شاء الله
بحـث
 
 

نتائج البحث
 
Rechercher بحث متقدم
سحابة الكلمات الدلالية
المواضيع الأخيرة
» انشاء ./payload
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالأربعاء أغسطس 11, 2021 12:03 pm من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» دروس تعلم فنون الهكرز للمبتدئين
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالجمعة ديسمبر 29, 2017 1:33 pm من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» اقوى كود ازالة حسابات الفيس بوك
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالجمعة ديسمبر 29, 2017 1:27 pm من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» عملاق التحميل من التورنت Vuze 5.6.0.0 الجديد كليا واحدث الادوات والاصدرات
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالسبت مارس 07, 2015 11:36 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» برنامج FastPictureViewer 1.9 Build 342 لتعديل و عرض الصور بكل سهوله
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالأربعاء مارس 04, 2015 3:57 pm من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» احدث فلود اضافات روم 2015
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالأربعاء مارس 04, 2015 10:20 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» ]VB6[ أفضل الطرق لتجميل برامجك شبكة الجنرال صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالثلاثاء مارس 03, 2015 10:58 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» الدرس الثالث -الجمل الشرطية و الدوارات شبكة الجنرال صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالثلاثاء مارس 03, 2015 10:55 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» الدرس الثاني -المتغيرات شبكة الجنرال صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالثلاثاء مارس 03, 2015 10:53 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» ]#C[ الدرس الاول تعلم خطوة بخطوة , مع الإجابة عن أي سؤال شبكة الجنرال صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالثلاثاء مارس 03, 2015 10:52 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» ]C#[ الخطوه الثانية اضافةالبيانات بالـ LINQ شبكة الجنرال صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالثلاثاء مارس 03, 2015 10:47 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» ]C#[ الخطوه الاولى لأستيعاب الـ LINQ شبكة الجنرال صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالثلاثاء مارس 03, 2015 10:45 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

» ]#C[ عمل برامج للاجهزه النقاله والPDA‏ شبكة الجنرال صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Icon_minitimeالثلاثاء مارس 03, 2015 10:41 am من طرف ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

نوفمبر 2024
الإثنينالثلاثاءالأربعاءالخميسالجمعةالسبتالأحد
    123
45678910
11121314151617
18192021222324
252627282930 
اليوميةاليومية
التبادل الاعلاني

انشاء منتدى مجاني



أفضل 10 فاتحي مواضيع
ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
جنـرال الـهكـر
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
رابح..زيرؤ.فؤر.ايفر
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
ابوعلي
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
ملك الهكر
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
سنايبر1
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
العاشق
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
الساحر
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
__alsafa7__
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
صدام الشرعبي
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
أفضل 10 أعضاء في هذا المنتدى
ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے - 1851
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
رابح..زيرؤ.فؤر.ايفر - 300
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
جنـرال الـهكـر - 227
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
سنايبر1 - 146
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
ابوعلي - 55
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
العاشق - 49
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
نسيـم البحـر1 - 27
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
ملك الهكر - 27
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
لووورد اليمن - 24
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
__alsafa7__ - 18
[VB6]برمجة برنامج دليل الهاتف Vote_rcap1[VB6]برمجة برنامج دليل الهاتف Voting_bar[VB6]برمجة برنامج دليل الهاتف Vote_lcap1 
تسجيل صفحاتك المفضلة في مواقع خارجية
تسجيل صفحاتك المفضلة في مواقع خارجية reddit      

https://sadam-alsharabi.roo7.biz

قم بحفض و مشاطرة الرابط منتديات الجنرال صدام الشرعبي لي الهكرز والاختراقات على موقع حفض الصفحات
تصويت
احصائيات
هذا المنتدى يتوفر على 2284 عُضو.
آخر عُضو مُسجل هو Mahrr فمرحباً به.

أعضاؤنا قدموا 3052 مساهمة في هذا المنتدى في 2055 موضوع

 

 [VB6]برمجة برنامج دليل الهاتف

اذهب الى الأسفل 
كاتب الموضوعرسالة
ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے

ٱ‏ٱلجنرٱل صدٱٱم ٱلشرعبيے


السٌّمعَة : 47
تاريخ التسجيل : 19/11/2012
العمر : 34
الموقع : https://m.facebook.com/profile.php?id=465134066889659

[VB6]برمجة برنامج دليل الهاتف Empty
مُساهمةموضوع: [VB6]برمجة برنامج دليل الهاتف   [VB6]برمجة برنامج دليل الهاتف Icon_minitimeالأحد أبريل 27, 2014 6:51 pm

بسم الله الرحمن الرحيم
استكمالا لدروس البرمجة التي قدمها الأستاذ  micro proأقدم هذا الدرس المتواضع والبسيط جدا لبرمجة برنامج دليل الهاتف[/SIZE][/CENTER]
فكرة البرنامج 
تعتمد فكرة البرنامج على أن البرنامج يأخذ البيانات التي تدخلها أنت في البرنامج ويقوم بتسجيلها في قاعدة بيانات
 
ما الذي سوف نتعلمه منن هذا الدرس
1.سوف نتعلم كيفية ربط برنامج بقاعدة بيانات 
2.سوف نتعلم الأوامر الخاصة بقاعدة البيانات 
3.سوف نتعلم كيفية البحث عن سجل في القاعدة 
الأدوات المستخدمة

برنامج الفيجوال بيسك 6
الأكسس
خطوات العمل
أفتح برنامج الفيجوال بيسك
 [VB6]برمجة برنامج دليل الهاتف I182948369_59287_2
 [VB6]برمجة برنامج دليل الهاتف I182973366_97999_2
 قم بإضافة 8 Command (أزرار) ثم قم بإضافة 10 Text ثم قم بإضافة 1 Combo1  ثم 10 Label وإليك طريقة إضافتهم 
  [VB6]برمجة برنامج دليل الهاتف I182919355_64514_2
ثم قم بترتيبهم وتغيير أسمائهم عن طريق الخاصية Caption  على هذا النحو كما في الصورة
[VB6]برمجة برنامج دليل الهاتف I182917347_49054_2
ثم بعد ذلك قم بحفظ المشروع في مجلد في إي مكان وأغلق الفيجوال بيسك 
ثم أفتح برنامج الاكسس 
وقم بعمل قاعدة بيانات جديدة واحفظها في نفس المكان الذي حفظت فيه البرنامج وإليك طريقة عمل قاعدة بيانات
افتح برنامج أكسس وقم بالضغط على ملف ثم جديد ثم قاعدة بيانات فارغة سوف يفتح لك مربع حواري لتختار مكان حفظ القاعدة أحفظها في المجلد الذي قمت بحفظ البرنامج فية ولكن باسمTELL (مهك جدا)
الآن أضغط على جدول ثم إنشاء جدول في طريقة عرض التصميم 
ثم افعل كما في الصورة
 [VB6]برمجة برنامج دليل الهاتف I182907380_84400_2
مع جعل كل السجلات مفهرسة هكذا
  [VB6]برمجة برنامج دليل الهاتف I182935350_5607_2
ثم قم بحفظ الجدول باسم dalel  (مهم جدا)
إذا كنت تعمل على الفيجوال بيسك 6 فيجب عليك تحويل قاعدة البيانات عن طريق الذهاب إلى أدوات
ثم أدوات مساعدة لقواعد البيانات ثم تحويل قاعدة البيانات ثم أختر لتنسيق ملف 97 ACCESS
وقم بحفظها 
وأغلق الأكسس وقم بفتح الفيجوال بيسك 
وقم بإضافة هذة الأداة إلى المشروع أداة ألDATA
عن طريق هذة الأيكونة
[VB6]برمجة برنامج دليل الهاتف I182828382_41320_2 
 
سوف تجد من خصائص هذة الأداة خاصية أسمها DATA BASE NAME
اضغط على المربع ذي الثلاث نقط الذي أمامها وأختار قاعدة البيانات من الملف الذي قمت بحفظها به
ثم اهبط إلى خاصية اسمها RecordSource وقم باختيار الجدول DALEL
اضغط على التكست رقم واحد سوف تجد من خصائصه كما في الصورة  

 [VB6]برمجة برنامج دليل الهاتف I182970363_40104_2
فى خاصية data source  اختارنا هذا الاختيار لأن هذا هو أسم الأداة التي بواسطتها ربطنا البرنامج بقاعدة البيانات 
أما فى الاختيار الأخر فأخطرنا name وهو أسم الجدول المختص بتسجيل الاسم وعلينا فعل هذا مع كل التكستات وإليك كل تكست والحقل الذي يخصوه
الاسم    name  
تليفون المنزل 1  tell
تليفون المنزل 2  home2no
تليفون الجوال 1  mopilno
تليفون الجوال 2 mopi2no
العنوان  adr
تليفون العمل  workno
البريد الأالكترونى  email
الموقع  wep
مع مراعاة اختيار data1 مع كل التكستات
الأن كل شيء تمام ما باقى غير الأاكواد

إضغط على الفورم ضبل كليك وأكتب فية الأاتى فى المكان الذي بين السطرين الموجودين
الكود:
Combo1.AddItem "بحث بواسطة رقم المنزل 1"
Combo1.AddItem "بحث بواسطة الأسم"
Combo1.AddItem "بحث بواسطة العنوان"
Combo1.AddItem "بحث بواسطة رقم الجوال 1"
Combo1.AddItem "بحث بواسطةرقم الجوال 2"
Combo1.AddItem "بحث بواسطة رقم المنزل 2"
Combo1.AddItem "بحث بواسطة رقم العمل"
Combo1.AddItem "بحث بواسطة البريد الإلكترونى"
Combo1.AddItem "بحث بواسطة الموقع الشخصى"

On Error GoTo data_error
Data1.DatabaseName = App.Path & "\tell.mdb"
Data1.*******
Data1.Recordset.AddNew
Exit Sub
data_error:
MsgBox "لم يتم العثور على قاعدة البيانات", vbCritical, "خطأ"

ثم إضغط على زر الإضافة ضبل كليك وأضف هذا الكود فية
الكود:
Data1.Recordset.AddNew

ثم إضغط على زر التعديل وأضف هذا الكود
الكود:
Data1.*******

ثم زر الحذف وأضف هضا الكود
الكود:
On Error GoTo data_error
If MsgBox("هل تريد حذف السجل بالتأكيد؟", vbQuestion + vbYesNo, "تأكيد حذف") = vbYes Then

Data1.Recordset.Delete
Data1.Recordset.MoveNext
End If
Exit Sub
data_error:
MsgBox "لم يبقى سجلات", vbCritical, "خطأ"

ثم زر الإنتقال لليمين 
الكود:
On Error Resume Next

Data1.Recordset.MoveNext

ثم زر الشمال
الكود:
On Error Resume Next

Data1.Recordset.MovePrevious


ثم زر البحث
الكود:
Select Case Combo1.ListIndex
Case 0
Data1.RecordSource = (" select * from dalel where tell=" + "'" + Text10.Text + "'")
Data1.*******
Case 1
Data1.RecordSource = (" select * from dalel where name=" + "'" + Text10.Text + "'")
Data1.*******
Case 2
Data1.RecordSource = (" select * from dalel where adr=" + "'" + Text10.Text + "'")
Data1.*******
Case 3
Data1.RecordSource = (" select * from dalel where mopilno=" + "'" + Text10.Text + "'")
Data1.*******
Case 4
Data1.RecordSource = (" select * from dalel where mopi2no=" + "'" + Text10.Text + "'")
Data1.*******
Case 5
Data1.RecordSource = (" select * from dalel where home2no=" + "'" + Text10.Text + "'")
Data1.*******
Case 6
Data1.RecordSource = (" select * from dalel where workno=" + "'" + Text10.Text + "'")
Data1.*******
Case 7
Data1.RecordSource = (" select * from dalel where email=" + "'" + Text10.Text + "'")
Data1.*******
Case 8
Data1.RecordSource = (" select * from dalel where wep=" + "'" + Text10.Text + "'")
Data1.*******
End Select

ملحوظة يجب عليك أن تكتب هذة الكلمة مكان ******* النجوم فى كل الأاكواد لأنها من الواضح أنها مشفرة فى المنتدي وإنى كتبتها فى صورة لتنقلوها[VB6]برمجة برنامج دليل الهاتف I182870199_3654_2
الرجوع الى أعلى الصفحة اذهب الى الأسفل
https://sadam-alsharabi.roo7.biz
 
[VB6]برمجة برنامج دليل الهاتف
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1
 مواضيع مماثلة
-
» حصريا وقبل الجميع برنامج حرق + حظر نكات الفلود + حماية من الاعلانات من برمجة
» دليل تعلم SQL للمبتدئين
» مفكرة الهاتف باستخدام البرمجة بدون كود
» كتاب برمجة الاندرويد
» شرح برنامج SubSeven v.2.1 GOLD لأختراق الاجهزه وهذا أفضل برنامج بنظري بعد البرورات

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات الجنرال صدام الشرعبي لي الهكرز والاختراقات :: الفئة الأولى :: منـتدئ مختـص في بـرمجـة الفيجـوال بيسـك-
انتقل الى: