تصدير بيانات الحقل الى ملف نصي _ تم تعديل العنوان

[عبدالقدوس48]

السلام عليكم

أخذ ملف نصي من حقل محدد وشكرا

[ناقل]

11 دقائق مضت, عبدالقدوس48 said:

السلام عليكم

أخذ ملف نصي من حقل محدد وشكرا

ممكن شرح مطول !!!!

ماذا تقصد بملف نصي من حقل؟؟؟؟

[عبدالقدوس48]

أحذ حقل واحد وتحوبله إلى ملف نصي 

[ناقل]

8 دقائق مضت, عبدالقدوس48 said:

أحذ حقل واحد وتحوبله إلى ملف نصي 

تقصد تصدير بيانات الحقل الى ملف نصي ؟؟؟ صحيح ؟؟؟ طيب ممكن ترفق لنا مثال مصغر للعمل عليه ؟؟؟

[عبدالقدوس48]

نعم أخي

نعم أخي

نعم أخي

[عبدالقدوس48]

تصدير حقل f 

f.accdb

[ابو جودي]

اتفضل يا سيدى 

يتم عمل ملف text  على القطاع D
اسم الملف النصى : Officena

 

f.accdb

[عبدالقدوس48]

هذا هو المطلوب أخي جزاكم الله خيرا

[ناقل]

4 دقائق مضت, عبدالقدوس48 said:

هذا هو المطلوب أخي جزاكم الله خيرا

تفضل .....

 

f (1).accdb

Dim FileNum As Integer
Dim msgstyle
    FileNum = FreeFile
    
    Open "D:\officena.txt" For Append As #1
    Print #1, Forms!pay!f; ""
    Close FileNum
MsgBox Space(20) & "تمت العملية بنجاح..تجد الملف باسم D:\officena" & Space(20), msgstyle, "للمعلومية"

 

[ابو جودي]

9 دقائق مضت, ناقل said:

تفضل .....

 

f (1).accdb 464 kB · 0 downloads

Dim FileNum As Integer
Dim msgstyle
    FileNum = FreeFile
    
    Open "D:\officena.txt" For Append As #1
    Print #1, Forms!pay!f; ""
    Close FileNum
MsgBox Space(20) & "تمت العملية بنجاح..تجد الملف باسم D:\officena" & Space(20), msgstyle, "للمعلومية"

 

الله الله ان استطعت لجعلتها افضل إجابة 

تسلم الايادى استاذى القدير

[ناقل]

1 دقيقه مضت, ابو جودي said:

الله الله ان استطعت لجعلتها افضل إجابة 

تسلم الايادى استاذى القدير

منكم تعلمنا استاذي الفاضل .... بارك الله فيك وفي اخلاقك النبيلة ..

[ابو جودي]

1 دقيقه مضت, ناقل said:

منكم تعلمنا

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

[عبدالقدوس48]

لكم من ألف شكر وجزاكم الله خيرا

[ابو جودي]

6 دقائق مضت, عبدالقدوس48 said:

لكم من ألف شكر وجزاكم الله خيرا

لا شكر على واجب أستاذي الفاضل

ولكن فضلا وكرما وليس امرا تأشر بأفضل إجابة للأستاذ ناقل.. ليكون من المعلوم انه تمت الإجابة على السؤال