الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيفية عمل progress bar يوضح نسبة ما تم تنفيذه من العملية

مغلق
بدأه خالد الزهري في 6 يونيو 2002 · 6 رد · 1,117 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

عزيزي الأستاذ خضر ترزي: أحيك على هذا الجهد الرائع الذي يتحدث عنك في هذا الموقع الرائع، وأعلم أن إجابة تساؤلي عندك، وأرجوا ألا تبخل علينا بها.

* لدي قاعدة بيانات أكسس على الجهاز وليكن اسمها c:mydata.mdb وبها جدول باسم Students وبهذا الجدول حقل memo باسم notes.

* أبحث من خلال البرنامج ومن خلال أداة Data Control على أي معلومة في هذا الحقل من خلال الكود التالي:

SQL="Select * from Students where notes like '*book*'

Data1.RecordSource=SQL

Data1.refresh

ونتيجة لكبر حجم قاعدة البيانات، فإن هذه العملية قد تستغرق عدة دقائق.

السؤال: كيف يمكن إلغاء تنفيذ الـ query وبنفس الطريقة كيفية عمل progress bar يوضح نسبة ما تم تنفيذه من العملية، وذلك كما يفعل access.

للعلم: بحث وعرفت أنه يمكنني تعريف ADO recordset Object withevents واستخدام FetchProgress event ولقد حاولت تجربة الأمثلة التي عليها والموجودة في MSDN ولكنها جميعاً بأءت بالفشل مع علمي بالاحتياطات الازمة.

وشكراً جزيلاً وبارك الله فيك.:confused:

===================

من خضر ترزي:

لقد قمت بتعديل عنوان السؤال فقط و نقله الى منتدى قواعد البيانات

#2

انا صراحة استخدمت هذه الخاصية عبر Microsoft Access هناك مرة واحدة سابقا و لم اجربها في اية برنامج اخر، حتى انها في Microsoft Access بتحصل لوحدها حيث هناك شريط اسفل البرنامج يمكن برمجته اذا دعت الضرورة

حول الشريط الخاص ب Microsoft Access فهو موجود في رسالة من الرسائل القديمة في في مكان ما في منتدى قواعد البيانات

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

اتمنى ان يساعدك الاخوة في المنتدى هنا ايضا.

#3

يبدو من السؤال انك تستخدم فيجوال بيزيك مع خلفية اكسس

ارجو اخباري حتي أنقل الموضوع لقسم البيزيك

ربما أفادك هذا

http://www.arabteam2000.com/vb/showthread....ht=progress+bar

counter2001.cgi?558002

#4

لدي جدول أكسس وبه عدة حقول، ما يهمني هو حقل subject وبه مجموعة من الأسماء ( لا توجد أسماء فارغة)

استخدمت العبارة التالية:

Select * from MyTable order by subject

ومرة أخرى استخدمت العبارة

Select * from MyTable where subject like '*' order by Subject

المفروض أن العبارتين متساويتين، وبالرغم من هذا وجدت أن طريقة الترتيب أو الفرز Sorting في الحالتين مختلفة.

سؤالي هو لماذا؟

خالد

#5

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

#6

العملية بغاية البساطة من خلال الدخول الى designe اختار من ال contro;s ستجد ما يسمى progress صهة في الشاشة واكتب الكود التالي

Private Sub Command3_Click()

On Error GoTo out

'Stop

Me!text1 = Me!prog.Value

Me!text1.Requery

Me!text1.SetFocus

'Me!Command3.SetFocus

rs.Filter = "date=#23/6/2002#"

Set rsf = rs.OpenRecordset

tot = rsf.RecordCount

While Not rsf.EOF

meter = (rsf.AbsolutePosition / tot) '/ 100

Me!prog = meter' اسم ال كونترول

Me!text1 = Me!prog.Value

Me!text1.Requery

'Me!text1.SetFocus

'Me!Command3.SetFocus

rsf.MoveNext

Wend

out:

MsgBox "finished reading " & tot

End Sub

#7

هذا درس كامل فى شريط التقدم لأبو حمود

http://www.msaccess4arab.com/Amtelah/Progr...ssBar/index.htm

counter2001.cgi?558002

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…