ترحيل بيانات

[ثامر أبو بلقيس]

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

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

شكرا جزيلا

[النصل القاطع]

ستستخدم الدالة input.gettext أولا لتخزين الموجود فى الإنبوت إلى متغير تسميه بمعرفتك

shahada = Input.GetText("Input1");
salah = Input.GetText("Input2");

all = shahada.." "..salah
TextFile.WriteFromString("C:\\MyFile.txt", all, false);


طبعا مسار الملف الناتج ستحدده أنت بمعرفتك
فى المتغير all تلاحظ وجود " " هذة تترك مسافة كفاصل
ضع بين علامتى الإقتباس
الفاصلة التى تريدها عوضا عن المسافة
و لو ما تريد مسافة من الأساس
بدل سطر المتغير all ب
all = shahada..salah

[ثامر أبو بلقيس]

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

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

[ثامر أبو بلقيس]

شكرا مجددا استاذ
جربت الكود المرسل عدلت هنا
all = shahada.."\r\n"..salah

[خادم المسلمين]

بسم الله ما شاء الله على الاخوة ربنا يبارك فيكم جميعا

استمر اخى أبو بلقيس

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

[النصل القاطع]

all = shahada.."\r\n"..salah
هذا يجعل كل عبارة فى سطر
و عذرا لم أنتبه إلى أنك تريد كل عبارة فى سطر

[ثامر أبو بلقيس]

بسم الله الرحمن الرحيم
السلام عليكم جميعا وبعد
أشكرك كثيرا أستاذ خالد ... على ما قدمته لي من فائدة
أعددت مصنف ايكسل أخذ مني وقتا طويلا حيث جهزته بمايلي :
1 - استقبال بيانات من ملف نصي بالطريقة التي تفضلت بها
2 - تجرى كل العمليات وفق ما تم استيراده من هذا الملف
3- يحول البيانات ثم يصدرها في ملف نصي مرتب سطر فوق سطر
4- يتم الخروج من المصنف بحفظ تلقائي و بدون شعور المستخدم

الان : سأطمع في طرح سؤال آخر
عندي معطيات موجودة في ملف نصي
مثلا :
خطأ
صحيح

بضغطة زر في الاوتوبلاي .... نريد خطأ تنزل في الانبوت الأول
صحيح تنزل في الانبوت الثاني


شكرا
أخي خادم المسلمين نرسم مع بعض طريق لأسئلة أكمل الفراغ
و بتوفيق من الله ها نحن قطعنا مسافة لابأس بها .

[عبود عبود]

result = TextFile.ReadToTable("AutoPlay\\Docs\\quran-simple.txt");
Input.SetText("Input1", result[3]);

حيث الكود الأول هو لقراءة سطور الملف النصى ويتم تخزين النتيجة على هيئة تيبل أو مصفوفة

الكود الثانى هو لجعل الإينبوت يقرأ السطر الثالث على سبيل المثال إذا كان هو المطلوب يمكن التغيير 3 برقم السطر المطلوب

حيث تغيير السطر يكون بوضع كلمة result وهو المتغير الذى تم الحفظ فية مسبقا .

[ثامر أبو بلقيس]

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

[خادم المسلمين]

أخى ثامر

انا متابع مع حضرتك أول بأول
وربنا ييسر لك ويتمم مشروعك

[ثامر أبو بلقيس]

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

وسنرد الجميل

أخي خادم المسلمين يعلم الله أني مشغول بتلاميذك
وبالتالي : حتى لاننسى فضل الأساتذة أجدد شكري العميق .
من جهة أخرى .... أخبرك و فكر معي ....
الاستيراد و التصدير في الاوتوبلاي المشكل حله الأساتذة و صار ممكنا
نرجع للايكسل كن على ثقة تامة أني أنهيت كود الاستيراد من ملف نصي
كود إرسال النتائج في ملف نصي و هو الأهم ... كود نجعل صفحة الايكسل تفتح
و تغلق و تقوم بالنتائج في مدة أقصاها 10 ثوان ثم تغلق لوحدها في صورة مصغرة
وهذا انتهى ..... طبعا أكواد تخفيض مستوى الأمان نزرعها في الاوتوبلاي و نركز على جميع
اصدارات الاوفيس و هذا كذلك انتهى ....... كي تنجح الفكرة 100 بالمائة هناك شرط بسيط
هو عندما نكمل العمل في الايكسل نضع المؤشر في الخلايا التي يتم فيها الاستيراد و نحفظ المصنف
و لكي نتحكم فيه علينا بتخفيظ الامان إذ كان مرفوعا و هذه الاداة كذلك جاهزة كلام كثير أعرف
سأجربه و أرسل لك كالتالي :
في الصفحة الأولى نضع السؤال :
الصلوات الخمس هي : و نضع 5 أنبوتات
يكتب فيها مثلا التلميذ م ايريد
عند الضغط سيجد نفسه في صفحة أخرى فيها :
أنت قلت الصوات الخمس هي : ...... ....... ......... ........ .........
و الصحيح هو : ...... ........ ........ ........ ..........
و أخذت العلامة : ... .... .... .... .... .....
الملاحظات : تنزل عن كل إجابة حكم بالصحة أو الخطأ
مجموع العلامات : .......
النسبة المئوية : ...........

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

[خادم المسلمين]

اخى ابو بلقيس

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

ولكن يا غالى

الشرح الفلاشى بدءا من اول المشروع يكون افضل
حتى يكون مرجعا يستفيد منه المبتدىْ قبل المحترف
وخصوصا ايضا انى لم اجرب العمل ابدا على الاكسل
وطبعا مع الشرح نحتاج مشروع مفتوح المصدر كما تعودنا منك ومن اخواننا جميعا
ارجوا ان تتفهمنى جيدا
متابع

[ثامر أبو بلقيس]

بسم الله الرحمن الرحيم
أخي خادم المسلمين السلام عليكم
بحكم أنك لم تتعامل مع الايكسل والله عجزت
أن أضع شرحا لم اجد من اين ابدا فالعملية مركبة
و تنجز حسب ظروف المشروع في الاوتوبلاي ...
أي لا يمكن أن ننجز شيء إذ لم نملك تصور ماذا نريد
أن يحدث في الاوتوبلاي؟
- عدد الاجابات لتحديد الخلايا الموازية لها
- ماذا سينتج في هذه الخلايا عمليات ... نسب ... جمل شرطية ....
فهمتني
بمعنى تختار مشروع نظريا و ساضع شرح ماذا فعلت في الايكسل
وشرح ماذا فعلت في الاوتوبلاي اختار مشروع وهمي ونحاول مع بعض
ما أأكده هو أن ماحدث في الصفحة الثانية هو كله ايكسل
و كأننا عرضنا الاكسل داخل الاوتوبلاي كل انبوت هو منتوج
خلية إذ ظهرت أي عيوب في التجربة جميل أن تشير إليها لأتي لا أملك
كل الاصدارات للتجربة عليها .

http://www.gulfup.com/?hRO7bZ

الشكر دائما موصول للأستاد خالد و أخي عبود

[خادم المسلمين]

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

[ثامر أبو بلقيس]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[ثامر أبو بلقيس]

بسم الله الرحمن الرحيم
إليك أخي خادم المسلمين بعض ما قد يفيد إن شاء الله
كما أدعو كل محبي الايكسل للاطلاع على هذه الفكرة
البسيطة لعلك يوما أعجبت بالأوتوبلاي و أحببت أن
تنقل خلايا الايكسل إليه ... هذه إحدى الطرق
وليست آخرها و لا أحسنها قد يفاجئنا يوما أحد الأساتذة
بربط أكثر دقة وسلاسة .... على كل
هذا ما حدث في الايكسل وقد تفاديت الدخول للتعليمات البرمجية
عن قصد
http://im18.gulfup.com/0M5H3.swf
وهذا ما قمت به في الاوتوبلاي
http://im13.gulfup.com/TIqx3.swf
وهذا المجلد فيه كل ما حدث
http://www.gulfup.com/?WQqXSd

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

[خادم المسلمين]

الشرح اكثر من رائع اخى

وكلنا طبعا واثقين ان حضرتك لاتتأخر على اى عضو بالمساعدة والنصح
ولا ادرى كيف أشكرك
الا ا، اتوجه بالدعاء لك وأسال الله عز وجل أن يرضى عنك ويرضيك
وأن يحفظك ويكرمك
وبقى سؤال
لا اريد ان تظهر اى نافذة من برنامج الايكسل اثناء تصحيح الاجابة
كيف ذلك ؟

[ثامر أبو بلقيس]

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

سنتواصل

[خادم المسلمين]

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

سنتواصل

ربنا ييسر لك امرك كلها ويعزك وينفع بك

ومنتظر اجابتك

لا اريد ان تظهر اى نافذة من برنامج الايكسل اثناء تصحيح الاجابة
كيف ذلك ؟

[أبو محسن]

ماشاء الله تبارك الله ,, موضوع مفيد جداً ..

[ثامر أبو بلقيس]

مرور عطر أخي أبو محسن ... بارك الله فيك

أخي خادم المسلمين في المرفقات الطريقة و ملف جاهز

[المتعملق]

السلام عليكم ورحمة الله وبركاته
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[خادم المسلمين]

مرور عطر أخي أبو محسن ... بارك الله فيك

أخي خادم المسلمين في المرفقات الطريقة و ملف جاهز


فعلا اخى الحبيب

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

http://www.abc4web.net/vb/images/misc/tag.png http://www.abc4web.net/vb/images/misc/subscribed.gif دورة تطوير الأداء ببرنامج الباور بوينت وتوظيفه لإنتاج أقوى البرامج التفاعلية (http://www.abc4web.net/vb/showthread.php?t=25032)

[ثامر أبو بلقيس]

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

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

[عبود عبود]

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


يمكن ذلك بمساعدة ملف دل كما هو موضح بالملف المفتوح التالى :

إضغـــط هنا للتحميل "Speak text" (https://dl.dropbox.com/u/29881160/Speak%20text.apz)

[ثامر أبو بلقيس]

السلام عليكم
شكرا الأخ عبود .. جربت الملف الأخ عبود
لم يصدر اي صوت عند الكتابة لا أعرف لماذا ؟
شكرا .

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

مسرسسسسسسسسسسسسسسسسسسسسسس سسسسسسسسي

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

لا اله الا الله
مشكوووووووووووووووووووووو ووووووووور

[المحترف القادم]

موفق بإذن الله ... لك مني أجمل تحية .

[النصل القاطع]

السلام عليكم
شكرا الأخ عبود .. جربت الملف الأخ عبود
لم يصدر اي صوت عند الكتابة لا أعرف لماذا ؟
شكرا .

بداية شكرا لأخى الأمير على الملف المفتوح الرائع

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

غالبا لن تجدها إن كانت نسخة الويندوز خاصتك معدلة
لكن أعتقد يمكن إضافتها من سيدى الويندوز

[ثامر أبو بلقيس]

بالضبط أستاذي خالد المحترم ملاحظتك دقيقة بارك الله فيك .
وشكرا مرة ثانية للأستاذ عبود و الى كل من مر من هنا

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

مشكوووووووووووووووووووووو ر كتيرررررررررررر

[فرح صالحي]

السلام عليكم ورحمة الله وبركاته
عندما يتكلم الكبار على الصغار امثالي الاستماع والانتباه جيدا
نفعنا الله بعلومكم ، وجعلها في ميزان حسناتكم
والسلام

[محمد سامر]

موفق بإذن الله ... لك مني أجمل تحية .

[عمر والي]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .