تضيف حقل للأب في الجدول
حيث يصبح عندك حقلين مثلا A و AX
فحقل A ندرج فيه جميع المعرفات الآباء والابناء وبالمقابل ندرج في AX الآباء فقط
مثلا :
الاسم معرف معرف الأب
محمد 1001 1001
سلوى 1001/1 1001
سعد 1001/2 1001
وهكذا ...
الآن يمكنك جلب بيانات اي شخص عن طريق المعرف
كما يمكنك التصفية واظهار افراد العائلة عن طريق معرف الأب
تم التعديل
اصبح الآن نموذجا فرعيا
يظهر في النموذج الفرعي رقم الصورة
وهو عبارة عن : معرف الشخص + الرقم التساسلي
لهذا يستحيل تكرار اسم الصورة
جرب ووافنا بالنتيجة
اما بالنسبة للتطبيق على الماسح
فلايوجد عندي جهاز
ومع ذلك سأحاول وارفق ما اتوصل اليه
وسيكون التطبيق عندك ، وتفيدنا اول بأول
اتفقنا ؟
الصور4.rar
التعدد هو الأصل حين يوجد العدل ( فانكحوا ما طاب لكم من النساء مثنى وثلاث ورباع )
وحين لا يوجد العدل يخرج الأصل ( فإن خفتم ألا تعدلوا فواحدة )
البركة فيك يا ابا عمر فلا تفوت فرصتك ( ولا تنسى نصيبك من الدنيا )
محدثك فاته قطار التعدد قبل عقدين من الزمان
ولكننا ننظر بعين الأمل للقادم ان شاء الله
شباب بلا هرم ، وصحة بلا سقم
أسأل الله الكريم ان يجعلنا واياكم من اهلها
تسلم اناملك
واول سطر بدأت به ذكرت جمال ما اتحفتنا به
والرابط فيه زيادة في تنسيق المخرجات غير موجودة في مشاركة ابو يامن
وطلب السائل تصدير اكثر من حقل
فاحببت ان اعقب بهذه الفائدة
السلام عليك
اخونا كريم تأكد لو كان سؤالك مهيأ للاجابة لحصلت عليها باسرع وقت
لايمكن ان يعرف احد اساس المشكلة عندك
ولا يمكن التعديل على الصورة
فلا بد ترفق مثالا مشتملا على المشكلة
جميل الطباعة خارج السرب
وهذا كود اذا كان الجدول يشتمل على اكثر من حقل وترغب في دمجهم
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tbl1")
Open CurrentProject.Path & "TAX.txt" For Output As #1
Do Until rs.EOF
EName = rs("t1")
Edesg = rs("t2")
ecode = rs("t3")
Print #1, ecode & EName & Edesg
rs.MoveNext
Loop
Close #1
rs.Close
Set rs = Nothing
لزيادة معلومات او تنسيقات انظر هنا http://bytes.com/topic/access/answers/945153-print-data-txt-file-tabular-format
وهذا تطبيق
تصدير جدول الى ملف نصي .rar
الاخ العزيز ابو خليل المحترم ... لقد غيرتها وازيلت فقط الفوارز اما الكوتيشنات " " فقد بقت موجودة .... وظهرت فراغات بين البيانات النهائية لكل قيد ...
انا اريد ان يظهر القيد الذي تم تصديره في الجدول على النحو التالي
3420200800000028306000000806201501
ولا يظهر على النحو التالي عندما اقوم بعملية التصدير
"3420200800","00000283060","08062015","01"
حيث ان القيد يتكون من الجزء الاول يمثل الرقم والجزء الثاني يمثل الكود والجزء الثالث يمثل التاريخ والاخير يمثل النوع
لهذا اريده ان يظهر بصورة حقل واحد مدموج البيانات مع بعض
اشكرك مرة ثانية اتعاونك معي ومساعدتي على انجاز العمل وفقك الله ....تحياتي
اخي الكريم
يمكنك ضم الحقول داخل استعلام ثم تصدير الاستعلام كحقل واحد
المحافظات 27 مكررة وبعد التجميع اصبحوا 15
وبمعن اوضح الاسماء 27 والمحافظات 15
الاستعلام جدولي (احصائي تجميعي )
فلو اردنا انه يظهر 27 سجل فيلزم نجعل الاسماء هي عنوان الصف
تفضل ضع هذا الكود في حدث الزر
DoCmd.TransferText acExportDelim, "", "Tbl1", strPath & "\Tbl1.txt", True, ""
Tbl1 هو اسم الجدول المراد تصديره
strPath هو الامتداد او مكان حفظ الجدول
Tble1.txt هو اسم النسخة المحفوظة