اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

توزيع الجلوس والسرى


إذهب إلى أفضل إجابة Solved by ابو جودي,

الردود الموصى بها

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

                                      كل عام وانتم جميعا بكل خير

بالمرفق نموذج (secrets) يتم فيه توزيع الجلوس والسرى حيث يصب فى جدول (key) وهو يعمل بكفاءة تامة ما أريده طلبان 

أولا لم أتمكن من وضع اسم الصناعة الموجودة حيث أنى ادخلت اسم الصناعة كهرباء وادخلت الجلوس من 100101 الى 100110 تم التوزيع تمام ولكن فى الحقل(case_cod) يكتب كل الصناعات نفس الشئ عندما اخترت صنعة التبريد كرر باقى الصناعات بالترتيب إذا امكن المساعدة فى اظهار اسم الصنعة المختارة فقط امام ارقام الجلوس المخصصة لهذه الصنعة قبل التوزيع على المدارس 

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

 

db4_4.rar

رابط هذا التعليق
شارك

37 دقائق مضت, خالد عبد الغفار said:

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

                                      كل عام وانتم جميعا بكل خير

بالمرفق نموذج (secrets) يتم فيه توزيع الجلوس والسرى حيث يصب فى جدول (key) وهو يعمل بكفاءة تامة ما أريده طلبان 

أولا لم أتمكن من وضع اسم الصناعة الموجودة حيث أنى ادخلت اسم الصناعة كهرباء وادخلت الجلوس من 100101 الى 100110 تم التوزيع تمام ولكن فى الحقل(case_cod) يكتب كل الصناعات نفس الشئ عندما اخترت صنعة التبريد كرر باقى الصناعات بالترتيب إذا امكن المساعدة فى اظهار اسم الصنعة المختارة فقط امام ارقام الجلوس المخصصة لهذه الصنعة قبل التوزيع على المدارس 

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

 

db4_4.rar 140.53 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 2 downloads

اتفضل :fff::yes:

db4_5.mdb

  • Thanks 1
رابط هذا التعليق
شارك

أشكرك أخى الفاضل ابا جودى

بارك الله فيك استاذنا الفاضل واعطاك حتى ترضى النموذج أصبح يعمل تمام التمام تقبل تحياتى وكل عام وأنتم بكل خير 

رابط هذا التعليق
شارك

3 دقائق مضت, خالد عبد الغفار said:

أشكرك أخى الفاضل ابا جودى

بارك الله فيك استاذنا الفاضل واعطاك حتى ترضى النموذج أصبح يعمل تمام التمام تقبل تحياتى وكل عام وأنتم بكل خير 

لا فى شئ غريب هو ده صح فى الكود


If case_cod = 7 Then
db.Execute "insert into key (setno,secr1,case_cod) values (" & x1 & "," & y & "," & x & ")"
khaled = "تريكو"
Else
If case_cod = 7 Then
db.Execute "insert into key (setno,secr1,case_cod) values (" & x1 & "," & y & "," & x & ")"
khaled = "نسيج"

 

case_cod = 7

مرتين 

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

السلام عليكم أخونا الفاضل أبا جودى

أولا فعلا كان هناك خطأ فى تكرار رقم7 مرتين ولكنى لم أنتبه إليه إلا بعد ارسال المرفق لك موفور الشكر أيها الكريم على التعديل الأخير فعلا للأحسن وربنا يبارك فيك وتحقق كل امانيك ولكن عند التجربة على المرفق الأخير وضعت جلوس من 2450101 الى 2453100 ثم السرى سبعة ارقام اخرى من  4250101 الى 4253100 يعطى رسالة خطأ جربت ذلك على المرفق الذى ارفقته قبل الأخير يعمل تمام يا ترى ما سبب الخطأ عند ادخال سبعة ارقام فى السرى 

ثانيا هل نطمع فى سؤال آخر مرتبط بنفس المرفق (الأول)

                                                                                تقبل تحياتى أخى الكريم

 

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information