التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6

الهوى ماهو كلام · 04-30-2006, 06:51 مساءً

كيف نتصل في قاعدة البيانات وسحب المعلومات منها .

بعد تطبيق الدرس الاول سوف تظهر لكم هذه الشاشة :

صورة 1 :

دروس لاب فيو دروس #C التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس BASIC دروس Pascal دروس بيسك دروس سي++ دروس برمجه

نقوم بفتح Form1 كما يظهر في الصورة اعلاه , واضافة زر واحد Command و نقوم باضافة Listbox :

صورة 2 :

دروس سي شارب دروس Delphi التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس سي++ دروس برمجه دروس علمية دروس لاب فيو

بعد ذلك نقوم بالدخول الى الحدث Command1_Click بالضغط على الزر مرتين ونقوم بكتابة الكود كما يظهر بالصورة :

صورة 3 :

دروس فيجوال بيسك دروس كوبول الذكاء الاصطناعي التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس C دروس دلفي دروس Delphi دروس BASIC دروس دلفي

نقوم بتعريف متغير من نوع Connection لكي يتكفل بالاتصال بقاعدة البيانات :

Dim Conn As New Connection

نقوم بتعريف متغير من نوع Connection لكي يتكفل بالاتصال بقاعدة البيانات :

Dim Conn As New Connection

بعد ذلك نقوم بتعريف متغير من نوع Recordset لكي يقوم بالتعامل مع البيانات :

Dim Rs As New Recordset

والمتغير strSQL هو متغير نص String سوف ندخل اليه جملة SQL التي تمثل البيانات التي نريد سحبها .

Dim strSQL As String

سوف نخرج من خلال جملة SQL اسماء المدن الموجوده في القاعدة :

strSQL = "Select CityName From Cities" << SQL

نتصل اولا بقاعدة البيانات

Conn.Open "Database" << Connection

بعد ذلك نخبر ال Rs بالمعلومات التي نريد اخراجها strSQL ونخبره ايضا باسم المتصل

Rs.Open strSQL, Conn

والان وقد فتح الاتصال واستطاع ال Rs الى المعلومات سوف نسأل اذا كان هناك معلومات اصلا

دروس علمية دروس BASIC دروس Visual C++ التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس بيسك دروس Pascal دروس #C دروس Java programming language tutorial

Rs.EOF معنى ذلك هل وصلنا الى النهاية ؟ اذا كان الجواب نعم True فليس هناك اي نتيجة وسوف اخرج رسالة No Fields

If Rs.EOF = True Then

اما اذا كان هناك معلومات فسوف نخرج الرسالة Yes .

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

صورة 4 :

دروس سي شارب دروس باسكال ذكاء اصطناعي التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس فيجوال بيسك programming language tutorial دروس جافا دروس باسكال دروس تعليمية

يبدو اني نسيت ان ادخل بعض البيانات

دروس COBOL دروس C دروس سي++ التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس لاب فيو دروس Pascal دروس سي++ دروس سي++ دروس COBOL

نقوم بعدها باضافة زر جديد Command وسوف يكون عمله ادخال اسماء المدن الى Listbox وهذا بعد ان قمت بادخال اسماء المدن طبعا

دروس برمجه دروس Pascal التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس السي دروس Visual C++ دروس بيسك دروس Java دروس COBOL

الى قاعدة البيانات

صورة 5 :

دروس كوبول دروس تعليمية دروس Java التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 الذكاء الاصطناعي دروس #C دروس برمجه دروس LabVIEW

بعد اضافتك لزر اضغط عليه مرتين لتدخل الى حدث Command2_Click

وقم بكتابة الكود الذي يظهر بالصورة

صورة 6 :

دروس فيجوال بيسك دروس علمية دروس تعليمية التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس Pascal دروس C++ دروس Pascal دروس Pascal programming language tutorial

نفس الكود ولكن هنا نستخدم الحلقة Do Until Loop.

ما دام Rs لم يصل الى نهاية السجلات فادخل الى الحلقة .

Do Until Rs.EOF

بعد ذلك نقوم باضافة اسماء المدن الى Listbox .

List1.AddItem Rs.Fields("CityName") << Listbox

Rs.MoveNext تعني انتقل الى السجل التالي.

وستكون النتيجة كتالي , بعد الضغط على الزر 2 .

صورة 7 :

دروس ASSEMBLY دروس #C دروس #C التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 دروس برمجه دروس باسكال دروس باسكال دروس لاب فيو دروس Java

سكون الغرام · 05-03-2006, 11:19 صباحاً

مشكور أستاذي على جهودك المبذوله

تسلم ويعطيك العافيه

تقبل ودي وأحترامي وتقديري

وأن شاء الله مانعدم وجودك وجديدك

أختــــــــــــــ سكون الغرام ــــــــــــــك

proginfo · 10-04-2006, 03:42 صباحاً

نحن ننتضر جديدك سيدي
الف شكر و الله المعين

مبحرفى ذكرياتي · 10-22-2006, 03:35 مساءً

مشكور أخوي ويعطيك العافية وجزاك الله خيرا ...

04-30-2006, 06:51 مساءً	#1 (permalink)
الهوى ماهو كلام اسرة ابن الخليج تاريخ التسجيل: Jul 2005 الدولة: K S A المشاركات: 4,844 معدل تقييم المستوى: 655	التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 كيف نتصل في قاعدة البيانات وسحب المعلومات منها . بعد تطبيق الدرس الاول سوف تظهر لكم هذه الشاشة : صورة 1 : نقوم بفتح Form1 كما يظهر في الصورة اعلاه , واضافة زر واحد Command و نقوم باضافة Listbox : صورة 2 : بعد ذلك نقوم بالدخول الى الحدث Command1_Click بالضغط على الزر مرتين ونقوم بكتابة الكود كما يظهر بالصورة : صورة 3 : نقوم بتعريف متغير من نوع Connection لكي يتكفل بالاتصال بقاعدة البيانات : Dim Conn As New Connection نقوم بتعريف متغير من نوع Connection لكي يتكفل بالاتصال بقاعدة البيانات : Dim Conn As New Connection بعد ذلك نقوم بتعريف متغير من نوع Recordset لكي يقوم بالتعامل مع البيانات : Dim Rs As New Recordset والمتغير strSQL هو متغير نص String سوف ندخل اليه جملة SQL التي تمثل البيانات التي نريد سحبها . Dim strSQL As String سوف نخرج من خلال جملة SQL اسماء المدن الموجوده في القاعدة : strSQL = "Select CityName From Cities" << SQL نتصل اولا بقاعدة البيانات Conn.Open "Database" << Connection بعد ذلك نخبر ال Rs بالمعلومات التي نريد اخراجها strSQL ونخبره ايضا باسم المتصل Rs.Open strSQL, Conn والان وقد فتح الاتصال واستطاع ال Rs الى المعلومات سوف نسأل اذا كان هناك معلومات اصلا Rs.EOF معنى ذلك هل وصلنا الى النهاية ؟ اذا كان الجواب نعم True فليس هناك اي نتيجة وسوف اخرج رسالة No Fields If Rs.EOF = True Then اما اذا كان هناك معلومات فسوف نخرج الرسالة Yes . بعد النهاية من كتابة الكود اضغط F5 لترى نتيجة العمل . صورة 4 : يبدو اني نسيت ان ادخل بعض البيانات نقوم بعدها باضافة زر جديد Command وسوف يكون عمله ادخال اسماء المدن الى Listbox وهذا بعد ان قمت بادخال اسماء المدن طبعا الى قاعدة البيانات صورة 5 : بعد اضافتك لزر اضغط عليه مرتين لتدخل الى حدث Command2_Click وقم بكتابة الكود الذي يظهر بالصورة صورة 6 : نفس الكود ولكن هنا نستخدم الحلقة Do Until Loop. ما دام Rs لم يصل الى نهاية السجلات فادخل الى الحلقة . Do Until Rs.EOF بعد ذلك نقوم باضافة اسماء المدن الى Listbox . List1.AddItem Rs.Fields("CityName") << Listbox Rs.MoveNext تعني انتقل الى السجل التالي. وستكون النتيجة كتالي , بعد الضغط على الزر 2 . صورة 7 : من مواضيع الهوى ماهو كلام في المنتدى أول عربي مسلم يرشح نفسه لرئاسة فرنسا الكائن Request- الجزء الثاني قائمة Edit الرجل الذي اراد احتلال العالم فعليا وليس فكريا القواعد الأساسية لحفظ القران الكريم

05-03-2006, 11:19 صباحاً	#2 (permalink)
سكون الغرام اسرة المنتدى تاريخ التسجيل: Nov 2005 المشاركات: 541 معدل تقييم المستوى: 76	مشاركة: التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 مشكور أستاذي على جهودك المبذوله تسلم ويعطيك العافيه تقبل ودي وأحترامي وتقديري وأن شاء الله مانعدم وجودك وجديدك أختــــــــــــــ سكون الغرام ــــــــــــــك من مواضيع سكون الغرام في المنتدى كلمـــــــــــ في خاطري ـــــــــــات أين هـــــــــــــــــــي ،، أحبك ،،، أعشقك ،،، أهواك ،،، أهيم بك ,,,, القبض على مختل طعن والديه ،، 50 معلومة قيمة جداً ,,,

10-04-2006, 03:42 صباحاً	#3 (permalink)
proginfo عضو فعــال تاريخ التسجيل: Jul 2006 الدولة: maroc المشاركات: 176 معدل تقييم المستوى: 683	مشاركة: التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 نحن ننتضر جديدك سيدي الف شكر و الله المعين من مواضيع proginfo في المنتدى مساعدة HTML TO PHP كل اصدارات linux موجود هنا كوديك الصوت و الصوره شركة سينكرونيكا تطرح هاتفًا " يصرخ " عند سرقته macormedia flashe player

10-22-2006, 03:35 مساءً	#4 (permalink)
مبحرفى ذكرياتي اسرة ابن الخليج تاريخ التسجيل: Jun 2006 الدولة: ذكرياتي المشاركات: 1,946 معدل تقييم المستوى: 1564	مشاركة: التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6 مشكور أخوي ويعطيك العافية وجزاك الله خيرا ... من مواضيع مبحرفى ذكرياتي في المنتدى vBulletin.3.5.5.PHP.Null.By.vB.Team منزوعة الكود من الفرن ثغرتين في برنامج الـvBulletin الإصدار X3.6 [ هاك ] منع تواقيع الأعضاء في أقسام معينه :: واجهة إحترافية خفيفة مفتوحة والحقــوق هدية لكم :: [ النسخة الذهبية VBulletin.v3.6.2 منزوعة الكود ] بواسطة فريق DGT- October 10, 2006 __________________ مبحرفى ذكرياتي

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

	Sitemap \| Archive \| Tag Could
	$معهد مطور - ينتهي الإعلان بتاريخ 16\10\2008$

$منتديات نظرة حب - ينتهي الاعلان بتاريخ 6\11\2008$		$الرَّقائق دعوة لترقيق القلوب - ينتهي الاعلان بتاريخ 6\11\2008$
		$نغمات إنتظار الشادي - ينتهي الاعلان بتاريخ 6\11\2008$

الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1)

المواضيع المتشابهه
الموضوع	كاتب الموضوع	المنتدى	مشاركات	آخر مشاركة
[فهرس] اهم مواضيع ودروس قسم لغات البرمجة	ADMIN	دروس لغات البرمجة	0	03-31-2007 10:12 صباحاً
(( فن التعامل مع الناس ))	باربي راك	حوارات ثقافية عامة	6	12-17-2005 11:40 صباحاً
النص الحرفي لتقرير ميليس حول اغتيال الحريري ..	الهوى ماهو كلام	حوارات ثقافية عامة	8	10-26-2005 02:59 صباحاً
صاحب الصوت العذب الشيخ أحمد العجمي القرآن كاملآ	وردة العشاق	حوارات ثقافية عامة	5	09-15-2005 03:16 صباحاً
فوائد الزنجبيل	فاتنه القلوب	ثقافة المجتمع	4	09-07-2005 04:07 مساءً

التعامل مع البيانات بطريقة Odbc فيجوال بيسك 6

منتديات شبكة ابن الخليج