استفسارات حول ال MSFlexGrid

text1.text = "select sum fieldname from mytabl"

السلام عليكم ورحمة الله

اخى الكريم لم تعمل معى لاننى لا استخدم جملة سيلكت ليك الكود الذى استخدمه

واريد ان اجمع قيم احدى الاعمدة فى الـ MSFlexGrid

كذلك لم تجاوبنى على سوالى التانى وهو اننى اكتب اسم حقل من الجدول ويذكر لى كم عدد مرات ظهروه بالجدول

شكرااا

Dim db As Database

Dim Tbd As Recordset

Set db = Workspaces(0).OpenDatabase(App.Path & "\db.mdb")

Set Tbd = db.OpenRecordset("Tbd", dbOpenDynaset)

If Text1.Text = "" Then

MsgBox "please Enter the date"

Exit Sub

End If

i = 1

Dim d As Date

d = Text1

Do Until Tbd.EOF

If d = Tbd("date1") Then

MSFlexGrid1.Row = i

MSFlexGrid1.Col = 0

MSFlexGrid1.Text = i

MSFlexGrid1.Col = 1

MSFlexGrid1.Text = Tbd("Shift")

MSFlexGrid1.Col = 2

MSFlexGrid1.Text = Tbd("Boss")

MSFlexGrid1.Col = 3

MSFlexGrid1.Text = Tbd("Startd")

MSFlexGrid1.Col = 4

MSFlexGrid1.Text = Tbd("endd")

MSFlexGrid1.Col = 5

MSFlexGrid1.Text = Tbd("difft")

MSFlexGrid1.Col = 6

MSFlexGrid1.Text = Tbd("coded1")

MSFlexGrid1.Col = 7

MSFlexGrid1.Text = Tbd("posd1")

MSFlexGrid1.Col = 8

MSFlexGrid1.Text = Tbd("Disc")

MSFlexGrid1.Col = 9

MSFlexGrid1.Text = Tbd("kind1")

MSFlexGrid1.Col = 10

MSFlexGrid1.Text = Tbd("Dpro")

MSFlexGrid1.Col = 11

MSFlexGrid1.Text = Tbd("sot")

MSFlexGrid1.Col = 12

MSFlexGrid1.Text = Tbd("wot")

MSFlexGrid1.Col = 13

MSFlexGrid1.Text = Tbd("loss")

MSFlexGrid1.Col = 14

MSFlexGrid1.Text = Tbd("degree")

MSFlexGrid1.Col = 15

MSFlexGrid1.Text = Tbd("decision")

MSFlexGrid1.Col = 16

MSFlexGrid1.Text = Tbd("comment")

i = i + 1

MSFlexGrid1.Rows = MSFlexGrid1.Rows + 1

End If

Tbd.MoveNext

Loop

ارجو منك عزيزي ارسال المثال واعدك بالتعديل عليه

السلام عليكم ورحمة الله

لقد حاولت ارفاق المثال ولكن الملف غير قابل للتحميل رغم ان مساحته 12ك

______.rar

لقد تم ارفاق الملف بنجاح

منتظر ردك باذن الله

السلام عليكم ورحمة الله وبركاته

اخي ارجو ان يحقق طلبك

فلقد قمت بتقسيم المثال على شيئين الاول وهو

- كيفية الاستعلام عن اجمالي مبيعات بتاريخ معين ؟

- والثاني كيفية ايجاد عدد ظهور اسم عين ضمن شجلاات القاعده بحقل معين ؟

بالتوفيق ...........

A7med_prof

Ex._After_Update.zip

السلام عليكم ورحمة الله وبركاته

اسف على التاخر فى الرد وذللك لعدم دخولى الموقع خلال تلك الفترة

شكرا لك على المجهود وقبل المجهود الاهتمام مع ملحوظة صغيرة انك قمت باستخدام كود SQl وارجو منك ان توضح لى هل استخدام اكواد ال SQL افضل فى البرمجة عن الاكواد التى قمت باستخدامها

ارجو ان استفيد من خبراتك كما افدتنى بالمثال المرفق

ارجو ان تذكر لى كيف اعرف كم مرة ظهر اسم عمرو سمير رياض بالجدول وليس مكان وجود فى اى صف بمعنى انه اجمالى عدد هذا الاسم بالجدول هو 7 مرات مثلا وشكرا لك اخى الكريم

جعله الله فى ميزان حسناتك

السلام عليكم ورحمة الله وبركاته

اقتباس

انك قمت باستخدام كود SQl وارجو منك ان توضح لى هل استخدام اكواد ال SQL افضل فى البرمجة عن الاكواد التى قمت باستخدامها

القصه مش افضل القصه ان في حجات مينفعش تتعمل الا من خلال جملة SQL

اقتباس

ارجو ان تذكر لى كيف اعرف كم مرة ظهر اسم عمرو سمير رياض بالجدول وليس مكان وجود فى اى صف بمعنى انه اجمالى عدد هذا الاسم بالجدول هو 7 مرات

المثال الذي قمت بالتعديل عليه يقوم بحساب عدد ظهور "عمرو سمير رياض" في عمود معين ( حقل - Field )

وبالتالي يمكن عمل نفس هذه العمليه مع كل حقول - اعمدة - Field وتجميع النواتج لأتاتي بأجمالي عدد مات ظهور هذا الاسم في هذا الجدول .

طبعا لا تنسى عند اجراء هذه العملية وتريد ان تستعلم عن نص ان توضع النص بين علامتي التنصيص 'النص المراد الاستعلام عنه' .

بالتوفيق ,,,,

A7med_prof

شكرا اخى الكريم فهمت ما تقصد

واشكرك فعلا لانك ساعدتنى على تخطى عقبة كانت امامى فى برنامجى

لدى سوال اخر كيف ابحث بين تاريخن فى نفس المثال بمعنى هنا بحثت عن تاريخ 1/5/2007 اريد ان ابحث مثلا من 1/5/2007 الى 20/5/2007 فيتى لى بكل البيانات الى وقعت فى تلك الفترة اذا كنت مازلت تحتفظ بالبرنامج فارجو منك التعديل على المثال او ارسله لك مرة اخرى

اسف على كثرة اسالى :)

السلام عليكم ورحمة الله وبكاته

اشكرك اخي على كلامك وزوقك الرفيع ,,,

لمعرفة كيفية البحث بين تاريخين راجع هذا الموضوع : مشكله في البحث بين تاريخين

بالتوفيق ,,,,

A7med_prof