الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

*أكواد* القراءة من ملف نصي

مغلق
بدأه عربية في 2 ديسمبر 2002 · 14 رد · 2,490 مشاهدة · في قسم الأرشيف و المواضيع المميزه
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اخواني الكرام

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

لدي ملف نصي يحتوي اذكار وادعية ومعلومات عامة

يوجد مربع نص على النموذج ووضعت اداة Timer

الباقي هو المهم

اريد ان يقراء الملف النصي ويعرض السطر الأول ثم الثاني وهكذا الي نهاية الملف وان امكن وضع علامة على السطر الذي يتوقف عنده (BookMark)للمواصلة منه في المرة القادمة

اذا كان هذا الامر ممكن على الاكسس اخبروني او ساعدوني

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

#2

ما اعرفه انه يمكنك فتح ملف نصي عن طريق SHELL

اي عن طريق استخدام هذا الكود ....

Dim RetVal
RetVal = Shell("هنا يكتب مسار الملف النصي", 1)
#3

اعتقد يمكن استيراد المستند النص في جدول واضافه حقل BookMark الى الجدول .

( اي ان الجدول سوف يتكون من حقلين الحقل الاول : يوجد فيه بيانات المستند والحقل الثاني : BookMark يضع علامه عندما يتم عرضه حسب التايمر )

#4

جوابي عن هذا السؤال جاء عرضاً لأنني كنت ابحث عن شيء آخر فوجدت هذا السؤال فلفت انتباهي

يمكن للأكسس القراءة من الملفات النصية على سبيل المثال فإن الأمر التالي يقوم بقراءة السطر الأول من الملف

    Dim iFileNum As Integer

    Dim firstline As String

    

    iFileNum = FreeFile

    Open "filename.txt" For Input As iFileNum

    lFileLength = LOF(iFileNum)

    firstline = Input(lFileLength, #iFileNum)

    Close iFileNum

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

#5

شكراً لكم جميعا

الاخ ابو هاجر

السبب في اختيار الملف النصي هو انه من السهل تعديله والاضافة عليه او استبدال محتوياته بدون فتح قاعدة البيانات

وان كان بالامكان وضع محتوياته في جدول مؤقت لكنني لا اعرف طريقة عمل ذلك

بقي من سؤالي السابق مسألة واحدة مهمة وهي كيفية الانتقال الي السطر التالي في الملف

بارك الله فيكم

#6

الأخت عربية

مرفق ملف يتكون من قاعدة بيانات مرتبطة بملف نصي لعل هذا هو ما تريدين

في الملف المرفق سيتم عرض سطر من الملف النصي في نموذج أكسس كل ثانيتين

عند إضافة سطر جديد في الملف النصي سيتم اعتماده مباشرة لكن لا يمكن إضافة أي سجل عن طريق الأكسس مباشرة

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

adkar.zip

#7

تغيير المسار

#8

الأخ أبو وليد

لتعديل المسار اتبع الخطوات التالية

قائمة أدوات >> أدوات مساعدة لقاعدة البيانات >> إدارة الجداول المرتبطة

عند فتح نافذة إدارة الجداول المرتبطة حدد الجدول adkar ثم انقر زر موافق

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

تحياتي

#9

صراحة احرجتنا بكرمك

رزقك من علمه وخيره وجعلك من اهل الجنة

#10

وجودك يا أستاذ أبو هاجر في المنتدى يعتبر كنز كنا محتاجين له والحمد لله قد وجدناه أتمنى من الله العلي القدير أن يمتعك بالصحة والعافية

#11

الأخ أبو وليد هذا الدعاء يكفيني قال عليه الصلام والسلام : من قال لأخيه جزاك الله خيراً فقد أجزل له في المثوبة

أسأل الله تعالى أن يرزقنا زكاة ما أعطانا إياه من علم وأن نكون لبنة في بناء هذه الأمة وعزتها التي أثق تماماً بأن التقنية سبيل من أعظم سبلها فعلينا أن نتعاون جميعاً في نشرها فهي من إعداد القوة التي أمرنا بها ربنا تعالى

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

اللهم سدد لساني واهد قلبي واسلل سخيمة صدري

#12

أخوي أبو هاجر

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

#13

بارك الله فيك على عطاءك السخي

فعلاً هذا المثال مفيد جداً جدأ بالنسبة لي

أسأل الله لي و لك ولجميع المسلمين الدرجات العالية الرفيعة في جنة الفردوس

#14

أخوي أبو هاجر وفقك الله لك ما يحب ويرضى

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

فقد حاولت كثيرا ولكن تخرج لي هذه الرسالة (( قام البرنامج بعملية غير شرعية .. ألخ)) .

فما الحل ؟ وما الطريقة الصحيحة للربط ؟

مع جزيل الشكر والتقدير

#15

أخي الكريم فهد

معذرة لتأخري في الرد فلم أنتبه لسؤالك إلا الآن في زحمة المشاركات والتساؤلات في هذا المنتدى

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

أنشئ ملفاً نصياً واكتب فيه بعض الأسماء بحث يكون كل اسم في سطر

افتح قاعدة بيانات ومن قائمة ملف >> إحضار بيانات خارجية >> ربط جداول

في شاشة تحديد الملف ومن قائمة أنواع الملفات حدد الملفات النصية ثم حدد الملف الذي قمت بإنشائة

عند ذلك سوف يعمل معالج استيراد البيانات النصية

بما أن عرض البيانات في الملف النصي الذي أنشأت ليس ثابتاً في الشاشة الأولى للمعالج اختر الخيار الأول وهو عرض محدد ثم انقر التالي

في الشاشة الثانية لا تغير شيئاً

في الشاشة الثالثة اكتب اسم الحقل الذي تريد إنشاءه في الجدول ثم انقر التالي واكتب اسم الجدول

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

آمل أن يكون هذا ما تريد وبالتوفيق

هذا الموضوع مغلق.

مواضيع مشابهة