[issamsaidd]

السلام عليكم ورحمه الله وبركاته انا شغال على مشروع لعياده بس فى مشكله وصلت اليها وانا اول مره اصنع برنامج لعمل رسمى فى عياده اريد زر اضافة مرفق ان اضغط علية يقوم با انشاء مجلد برقم الحالة او اسمها واضغط علية يفتح لى نافذه استعراض الاضافة بعض الصور فى مجلد الحالة والزر الاسفل منه اضغط استعراض يفتح لى المجلد الذى يحمل اسم الحالة وبدخالة المرفقات التى تم وضغها 
وهكذا عند الضغط على اضافة حالة يضيف مجلد اخر لحالة اخرى واضغ مرفقتها معا صورة للبرنامج
ملاحظه اريد مجلد فى مسار C:\Users\ISSAM\Documents\Visual Studio 2010\Projects\DR Ayesh\DR Ayesh\bin\Debug\Cases
داخل مجلد Cases يكون بداخله مجلدات با ارقم كل حالة او اسمه المهم عند الضغط على اضافة مرفقت ينشى مجلد لكل حالة 
اتمنى ان تساعدونى وشكرا لكم مقدما واذا فى تعديل حابين تعدلوه عدلوه واشكركم كثير 
المشروع 
http://www.mediafire.com/file/8uhzyyzq5x...0Ayesh.rar

[عبد العزيز البسكري]

[issamsaidd]

(30-04-18, 09:21 PM)عبد العزيز البسكري كتب :

اسف نسيت الضيف الباسورد هو ١

[عبد العزيز البسكري]

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

أخي الكريم .. أتكلّم عن نفسي طبعًا .. هذه الأدوات أكره رؤيتها بأي شكل من الأشكال

إذا كان الهدف هو فقط إضافة مجلّدات باسم المريض تتضمّن مرفقات من صور أو شهادات طبّية أو وثائق أو مستندات .. بالإمكان عمل ذلك طبعا مع تغيير الفورم 3 بشكل كلّي مع الإحتفاظ طبعا بخصوصيّة أدواته

في إنتظار ذلك أتمنى مخلصا أن تجد حلا من أساتذتنا الأعزّاء بارك الله فيهم و لهم

تحياتي

[issamsaidd]

اخى الكرم انا كنت فقط اريد اضافة مجلد با اسم الحالة 
وهى الكود هادا جربته My.Computer.FileSystem.CreateDirectory(NameTextBox.Text)
بس مش عارف اسوية فى المسار المطلوب
 C:\Users\ISSAM\Documents\Visual Studio 2010\Projects\DR Ayesh\DR Ayesh\bin\Debug\Cases 
وفى نفس الوقت عبر اداة OpenFileDialog1 اختار الصور الاتية من الاسكنر وتحفقظا فى المجلد الذى تم 
وعند الضغط على مجلد عرض المرفقات يفتح المجلد الى باس اسم الحالة 
انا اريد حفظ الصور بعيد عن قاعد البينات علشان الحجم والى تشوفة مناسب اعمله وشكرا لك 
حتى لو بدك تغير الفورم غيره المهم الفكره تكون وصلت وشكرا كتتتتير الك ^_^

[عبدالله الدوسري]

فقط استخدم هذا الكود :

كود :

My.Computer.FileSystem.CreateDirectory("Cases\" & NameTextBox.Text)

إذا لم تحدد العنوان كامل , البرنامج سيفترض أنك تعني المجلد الذي يحتوي على ملف الـ exe. وسيبداء من هذا المجلد

[عبد العزيز البسكري]

(30-04-18, 11:08 PM)issamsaidd كتب : اخى الكرم انا كنت فقط اريد اضافة مجلد با اسم الحالة 
وهى الكود هادا جربته My.Computer.FileSystem.CreateDirectory(NameTextBox.Text)
بس مش عارف اسوية فى المسار المطلوب
 C:\Users\ISSAM\Documents\Visual Studio 2010\Projects\DR Ayesh\DR Ayesh\bin\Debug\Cases 
وفى نفس الوقت عبر اداة OpenFileDialog1 اختار الصور الاتية من الاسكنر وتحفقظا فى المجلد الذى تم 
وعند الضغط على مجلد عرض المرفقات يفتح المجلد الى باس اسم الحالة 
انا اريد حفظ الصور بعيد عن قاعد البينات علشان الحجم والى تشوفة مناسب اعمله وشكرا لك 
حتى لو بدك تغير الفورم غيره المهم الفكره تكون وصلت وشكرا كتتتتير الك ^_^

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

أخي الكريم .. ليس القصد من تغيير الفورم .. من أجل كلمة التغيير و فقط

و أنا أتسلّى أوقات الفراغ .. جرّبت ملف صغير لعيادة طبّية مع إمكانية إضافة المستندات و تحرير الوصفة الطبّية و ما شابه ذلك

أتمنى أنّ الفكرة وصلت .. و أرجو من الله مخلصا أن تكون إجابة أستاذنا القدير " عبد الله الدوسري " قد حقّقت المطلوب

تحياتي للجميع

[issamsaidd]

(30-04-18, 11:12 PM)عبدالله الدوسري كتب : فقط استخدم هذا الكود :

كود :

My.Computer.FileSystem.CreateDirectory("Cases\" & NameTextBox.Text)

إذا لم تحدد العنوان كامل , البرنامج سيفترض أنك تعني المجلد الذي يحتوي على ملف الـ exe. وسيبداء من هذا المجلد

شكرا لك اخ عبدا الله صح كلامك تم عمله فى المسار الصحيح ضايل اداة الاستعراض احدد منها الصور تنزل فى المجلد الى با اسم الحالة

---

(30-04-18, 11:26 PM)عبد العزيز البسكري كتب :

(30-04-18, 11:08 PM)issamsaidd كتب : اخى الكرم انا كنت فقط اريد اضافة مجلد با اسم الحالة 
وهى الكود هادا جربته My.Computer.FileSystem.CreateDirectory(NameTextBox.Text)
بس مش عارف اسوية فى المسار المطلوب
 C:\Users\ISSAM\Documents\Visual Studio 2010\Projects\DR Ayesh\DR Ayesh\bin\Debug\Cases 
وفى نفس الوقت عبر اداة OpenFileDialog1 اختار الصور الاتية من الاسكنر وتحفقظا فى المجلد الذى تم 
وعند الضغط على مجلد عرض المرفقات يفتح المجلد الى باس اسم الحالة 
انا اريد حفظ الصور بعيد عن قاعد البينات علشان الحجم والى تشوفة مناسب اعمله وشكرا لك 
حتى لو بدك تغير الفورم غيره المهم الفكره تكون وصلت وشكرا كتتتتير الك ^_^

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

أخي الكريم .. ليس القصد من تغيير الفورم .. من أجل كلمة التغيير و فقط

و أنا أتسلّى أوقات الفراغ .. جرّبت ملف صغير لعيادة طبّية مع إمكانية إضافة المستندات و تحرير الوصفة الطبّية و ما شابه ذلك

لمّا شاهدت موضوعك حول هذا المجال .. قلت بنفسي .. فقط أقوم بتغيير ما يلزمك بمشروعي الخاص و إعادة ترجمة ما يلزم لأنّ الملف عندي باللغة الفرنسية و هي اللغة التي يتعامل بها كافّة أطباء الجزائر بكامل قطرها

أتمنى أنّ الفكرة وصلت .. و أرجو من الله مخلصا أن تكون إجابة أستاذنا القدير " عبد الله الدوسري " قد حقّقت المطلوب

تحياتي للجميع

الى تشوفة مناسب اعمله اخى بس المقصد ما بدى اتعبك علشان كود صغير ندخل فى تعب كبير شكرا لك

[عبدالله الدوسري]

لدي ملاحظة مهمة على مشروعك : الملاحظات كثيرة ولكن سأذكر أهمها للإختصار

البرنامج دائماً وأبداً يبقى في الخلفية ولا يتم إغلاقة 

   

---

الحل بطريقة نموذجية :
1 :
   

---

2 :
   

---

3 :
   

---

4 :
   

---

5 :
   

---

6 :
   

---

7 :
   

---

تم إضافة كود المرفقات وعرضها .



المشروع بعد التعديل :

  DR Ayesh.rar (الحجم : 3.36 م ب / التحميلات : 92)

[issamsaidd]

شكرا لك البرنامج حملته ما اشتغل ولكن طبق الخطواط زبطت بس سئول اخير 
المسار هادا 
"C:\Users\ISSAM\Documents\Visual Studio 2010\Projects\DR Ayesh\DR Ayesh\bin\Debug\medicalreport.dotx"

عند نقل البرنامج لمكان اخر ملف medicalreport.dotx

مفيش طريقة ينقل تلقئيا فى اى مكان مها تم نقل البرنامج وشكرا لك