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

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

اول مشاركة لي بعد تحرير مدينتا عدن من المعتدين

المثال عبارة عن شاشة ديفلوبر تقوم بالقراءة من ملف اكسل الى إتجاهين الاتجاه الاول تقوم بقراءة البيانات من ملف اكسل الى جدول قاعدة بيانات والاتجاه الثاني تقوم بقراءة بيانات اكسل إلى بلوك في نفس الشاشة دفلوبر 6i لعرضها للمستخدم كما يمكنك إضافة بيانات للشاشة من عدة ملفات وكذا من عدة أوراق عمل لنفس الملف أومن ملفات أخرى

مكونات المثال ملفين اكسل وشاشة دفلوبر 6i

لقراء الى جدول قاعدة البيانات يجب انشاء جدول القراءة حسب الكود التالي

CREATE TABLE EXCEL_TAB (EXCEL_COLM1  VARCHAR2(80),EXCEL_COLM2  VARCHAR2(80),EXCEL_COLM3  VARCHAR2(80));

ملاحظة هامة :

1.ملف الإكسل الذي ستقراء منه لا يجب أن يكون مفتوحا.

2. يجب أن تكتب اسم ورقة العمل الذي ستقراء منها البيانات وعليك معرفة اسم الورقة مسبقا لكتابتها في مربع ورقة العمل في الشاشة

3.إذا كان هناك ملف اكسل مفتوح غير الذي ستختاره وطابق اسم ورقة العمل الاسم للورقة العمل الذي ستكتتبها سيأخذ البيانات من الملف المفتوح.

أترككم مع المثال

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

وهنا بعد تنفيد عرض على الشاشة

أهداء المثال ...

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

شهداء عدن الباسلة وشهداء منطقة المعلا وشهداء كل المناطق الحرة في اليمن

شهداء التحالف العربي ممن ناصروا أخوانهم وهم شهداء المملكة العربية السعودية وشهداء دولة الامارات العربية المتحدة

اللهم تقبلهم مع الشهداء اللهم امين

Meeh_excel.rar

طبعا مكونات المرفقات :

1 . شاشة ديفلوبر 6I اسمها MEEH_EXCEL_TO_TABLE

2.ملفين EXCEL فيهما البانات التي تقرءه الشاشة باصدارين مختلفين اسمهما Meeh_Excel.XLSX باصدار 2007 وملف Aden_Excel.XLS باصدار 97-2003

3. ملف نصي فيه كود انشاء الجدول واسم الملف EXCEL_TAB.TXT

 

فكرة رائعة جدا جدا باش مهندس وبالتأكيد ليس بالامر غرابة ان يبدر هذا منك فانت من عودتنا اخ ميهال

خالص الشكر والتقدير ومزيدا من التقدم والنجاح الازدهار...
------

وإذا صنعاء تشكونا ** فكل بلادنا يمنٌ

 

تحية لكل اشقائنا في اليمن الحبيبة نصرهم الله وجعل تدمير عدوهم في تدبيره ,, نسعد لكم او لنا جدا بهذا النصر امنياتنا بتحرير كل شبر في اليمن الحبيبة وكل بلاد العرب والمسلمين

ماشاء الله دائما متميز  ورائع أخى المهندس ميهال 

جزاك الله خير على دعائك أخي

emad.pro11

وشكرا لمرورك الكريم

الله يبارك فيك أخي حسام مافي تميز فقط شوية إجتهاد وبحث

واشتقنا لمشاركاتك الرائعة وننتظر منك الابداع وشكرا لمرورك الكريم

موفق إن شاء الله 

مشاركة مميزة جزاك الله خيراً

وفقك الله في ما يحب ويرضاه أختنا  

ميسم الكرام التميز هو اسهامك المستمر في المنتدى الله يعطيك من رزقه

                                        

صورة توضح ما هو اسم ورقة العمل في المصنف (ملف اكسل) وانوه انه عملية قراءة البيانات تبداء من الصف الثاني لاني عاملها باللوب وبمكن ان تغيرها كما تريد حسب احتياجك

ماشاء الله مبدع يا باش مهندس ميهال  ورحم الله شهداء اليمن وشهداء عدن الباسلة وشهداء منطقة المعلا وشهداء كل المناطق الحرة في اليمن

وشهداء التحالف العربي ممن ناصروا أخوانهم وهم  شهداء المملكة العربية السعودية وشهداء دولة الامارات العربية المتحدة

اللهم تقبلهم مع الشهداء اللهم امين

جزاك الله خير أخي

اشرف فراج

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

مشكور يا باش مهندس ..

بس يظهرلي خطأ كما هو موضح بالصورة المرفقة

 

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

الشكر لله اخي خالد منصور وشكر خاص لاخونا انس
بالنسبة للاخطاء المثال يعمل معي 100 بالمئة وهو على فورم 6i

أخي خالد منصور هل انشئت الجدول حسب جملة الانشاء المنوه عنها في اول مشاركة ؟

منتظرين  فورمه زي  دي بال  10g   منك يابشمهندس  ميهال 

ان شاء الله اذا ترتب الظروف نحاول نشوفها على 10g لانه شوية ظغط عليا بالعمل على شبكات wifi هذه الايام وكذلك شغلات اخرى

السلام عليكم 

 

هنالك مسج خطأ عن جدول غير موجود 

اسم الجدول temp

 

وقد سأل خالد نفس السؤال

 

الرجاء الاجابة 

اخي الكريم وانا رديت من سابق عن هذا فهل انشئت الجدول بجملة الانشاء السابقة في المشاركة الاولى وان شاء الله نتابع الخطاء ان وجد

أخي المهندس ميهال
جزاك الله خير
تظهر رسالة خطأ temp
وما يتنفذ

اعيد رفع المثال ومجرب رغم انه الاول مجرب قلت اعيده مرة ثانية

Meeh_excel.rar

الاخوة اللي عندهم مشكلة بالمثال هل انحلت مشكلتكم ان شاء الله بعد الرفع الاخير والتحديث الجديد للمثال

مهندسنا المبدع..

 

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

 

المعذرة على الرجوع إلى الخلف قليلا..

 

كنت في حاجة إلى قراء البيانات في البلوك إلى ملف إكسل موجود على الجهاز ...

بحيث الملف الإكسل يحتوى على أعمده بعدد الحقول في البلوك ..

 

وتم إستخدام المرفق وتجربة زر إضافة إلى الموجود...

وتم إدخال بيانات على البلوك ثم الضغظ على الزر .

قبل ما يتم حفظها على الجدول.

لأنه أريد أن انقل الييانات الموجوده إلى ملف الإكسل..

 

وللاسف الشديد لم ينقل البيانات إلى الملف..

 

هل هناك إي إضافة ممكن تفيديني بهذا الموضوع يا مبدع..

 

اخوك

الف شكر يا بش مهندس . دائما مزودنا بخبراتك 

العفو اخي الفاضل Esalm Mrwan ولا شكر على واجب وشكرا لمرورك الكريم
بالتسب لاخي الحبيب
المثال One Way اي انه فكرته جاي من الاكسل لشاشة الديفلوبر او الى قاعدة البيانات ومؤشرها ورقة العمل في المصنف اكسل حيث يقوم بعمل بالقراء من ورقة العمل كاملة وزر اضافة المعمول بالمثال هو لجلب لاكثر من ورقة عمل لبيانات موزعة بالنسبة لفكرتك
وهي العكس انه ترسل بيانات الى الاكسل من البلوك حسب ما فهمت با مكانك استخدام طريقة المثال ارسال بيانات الى Ms Word وهي باستخدام Ole وبامكانك تستخدم معاه Vba كما في المثال وتعمل اللي تريد وكنت سابق بدئت اجهز فكرة لهذا النوع من العمل لكن ظروف الحرب منعتنا واتاخرت مايقارب سنة الفكرة للان واذا وجدت الوقت المناسب اسعفناك بمثال فقط اخاف ما القى وقت فقط لكن عندك الاولويات كيف المدخل لها واستعين بالمثال الذي ذكرته لك