20-12-13, 02:55 AM
السلام عليكم
- إذا كنت تريد عمل التقسيم لموظفي قسم معين فقط دون باقي الأقسام ، فأكيد أنه يوجد حقل لنوع القسم في جدول الموظفين ، إذا كل ما عليك فعله هو إضافة شرط إسم القسم في جملة الإستعلام ، مثلاً : Where Dept='الصادر' ، وباقي الكود أتركه كما هو ، يعني عدل الإستعلام الموجود في المثال السابق ليصبح هكذا :
- وأيضاً عدل الإستعلام الذي في أول الكود لاتنساه .
- تحياتي .
- إذا كنت تريد عمل التقسيم لموظفي قسم معين فقط دون باقي الأقسام ، فأكيد أنه يوجد حقل لنوع القسم في جدول الموظفين ، إذا كل ما عليك فعله هو إضافة شرط إسم القسم في جملة الإستعلام ، مثلاً : Where Dept='الصادر' ، وباقي الكود أتركه كما هو ، يعني عدل الإستعلام الموجود في المثال السابق ليصبح هكذا :
كود :
IF I = 1 Then
Select Top " & Group_Members(I) & " ID,Name From Table1 Where Dept ='الصادر'
Else
Select Top " & Group_Members(I) & " ID,Name From Table1 Where Dept ='الصادر' And ID >" & LastID
End IF- وأيضاً عدل الإستعلام الذي في أول الكود لاتنساه .
- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
