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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : [مشروع] برنامج ادارة مستودع ادوية (/showthread.php?tid=14217)



برنامج ادارة مستودع ادوية - bateriot - 23-12-15

السلام عليكم 

ابغى مشروع لبرنامج يعمل بتدوين الصادر والوارد للمستودع الصيدلية 

عندي ممكن 300 صنف من الادوية  Sleepy

كل اسبوع تطلع كمية من المستودع وابغى بنهاية الشهر بضغطت زر اعرف الكمية المتبقي . Smile



RE: برنامج ادارة مستودع ادوية - bateriot - 25-12-15

upupupupup


RE: برنامج ادارة مستودع ادوية - magdy_salam - 25-12-15

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

مرفق ملف اكسيل للمساعدة


RE: برنامج ادارة مستودع ادوية - bateriot - 26-12-15

حلو هذا الفكرة اللي كنت بوصل لها تقدر تخليها ع شكل برنامج
واضافة 4 اعمدة Total QTY ( OUT )

الله يعطيك العافية


RE: برنامج ادارة مستودع ادوية - bateriot - 26-12-15

انا سويت تعديل للملف ولكن ابي الفكرة 
1= الاسبوع الاول 
2= الاسبوع الثاني 
وهكذا 
يفتح الملف على شكل برنامج باسم مستخدم وكلمة مرور 

ويمكن اضافة الاصناف بالترتيب معين  وزر للطباعة ويظهر  بااسفل الورقة مدير الصيدلية ومدير المستودع 

 وقاعدة بيانات تحفظ كل شهر او ارشفه ويمكنني الرجوع لها باي وقت ،، وكذا يكون مشروعي انتهاء  Big Grin


RE: برنامج ادارة مستودع ادوية - bateriot - 29-12-15

upupupupupupupupup


RE: برنامج ادارة مستودع ادوية - bateriot - 29-12-15

ياليت احد يفيدني


RE: برنامج ادارة مستودع ادوية - احمداحمداحمد6 - 29-12-15

تعمل قاعدة بيانات
بعدد الاصناف وتسميها (انا سافرضها اربعة حقول)
for i = 1 to 300
text2.text=rs.feild i
next i
dim rs as new adodb.recordset
rs.open
for i = 1 to rs.import.recordcount
rs.import.show
rs.movenext
next i
rs.update
for i = 1 to rs.export.recordcount
rs.export=text1.text
rs.movenext
next i
if monthname(month(date)=31or 30 the
for i = 1 to 300
if rs.feild i <>nil then count =count+1
next i
print count
..........................................
هذا الي اقدر عليه
.........................................
bye


RE: برنامج ادارة مستودع ادوية - bateriot - 30-12-15

هذا الكود وين اضيفة ؟