kkhalifa1960

الدالة تصبح Function RelinkIsIco() As String Dim rs As DAO.Recordset Dim rsA As DAO.Recordset2 Dim fPath As String Dim tempPath As String ' فتح السجل Set rs = CurrentDb.OpenRecordset("SELECT progIcon FROM tblEnDc") If Not (rs.EOF And rs.BOF) Then Set rsA = rs.Fields("progIcon").Value ' Recordset خاص بالمرفقات If rsA.RecordCount > 0 Then rsA.MoveFirst ' تحديد مسار مؤقت في Windows Temp tempPath = Environ$("TEMP") & "\" & rsA!FileName ' استخراج الملف من المرفقات إلى المسار المؤقت rsA!FileData.SaveToFile tempPath RelinkIsIco = tempPath End If rsA.Close End If rs.Close Set rs = Nothing End Function واستدعاؤها Private Sub cmdShar_Click() Me.img1.Picture = RelinkIsIco() End Sub

تفضل استاذنا . الشرح والمرفق . MohamedShemi.accdb

هل هذا ماتريد !!! MohamedShemi.accdb

هذه تفيد بأن أحد المكتبات ناقصة أو مفقودة أو احد الاكواد يعمل عل 32 بت وانت نقلتها على جهاز يعمل على 64 بت . وللاسف انا كما قلت لك انا حولت الملف فقط والباقي عند الاستاذ @Foksh . هو صاحب الموضوع .................... تحياتي لك .

أولا انت لم تعطيني الملف الذي تعمل عليه . ثانيا انا اعطيتك الطريقة التي تتعامل بها ... انشاء جدول وهمي تتم عليه الضرائب وعند الانتهاء ينقلهم للجدول الاساسي ويمسح محتويات الجدول الوهمي لعملية جديدة. ثالثا انا لم اتدخل بأي شئ بمرمجتك للامور كلها . لأنك ادرى بكل خطواتها . رابعا أما اذا تريد اعادة المشروع كله بطريقني هذا شئ أخر . خامساً اليك أخر تعديل ... وخبرني بما تريد . MohamedShemi.accdb

تفضل استاذ @محمدالشيمى محاولتي حسب مافهمت اليك الشرح والمرفق . انشاء جدول مؤقت بالفاتورة ثم ملئ جدول الفواتير بالفاتورة الحالية. واخلاء الجدول المؤقت للفاتورة القادمة. MohamedShemi.accdb

الملف بعد تحويله لـــ 2003 دون الدخول بأي شئ فقط التحويل . UnMatched.mdb

ماهو لو طلبك مفهوم كان الكل ساعدك !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

استاذ @مصطفى حماد سيد حماد اذا كان هذا طلبك اضغط على تمت الاجابة على مشاركتي .

تفضل استاذ @مصطفى حماد سيد حماد مرفق من عندي به طلبك . ووافني بالرد . Students.accdb

اين الجدول ؟؟؟؟؟؟؟؟

تفضل استاذ @بلال اليامين طلبك حسب مافهمت بتقريرك .... وتقريري . Belal_Yamen.accdb

مشاركة مع استاذ @Foksh تفضل طريقتي يمكن تفيدك .... Database6.rar

اعتذاري تفضل الملف الصحيح . Emad.85-1.rar

لا تعليق لديا !!!!!!!!!!!!

تفضل المرفق بعد التعديل بطلبك . ولا تنسى تمت الاجابة Bader770-1.rar

النصيحة ياتمشي بطريقة استاذنا @ابو جودي وتكمل .............. أو بطرقتي وتكمل اختار لك طريقة .

تفضل استاذ @Emad.85 طلبك حسب ما فهمت .اليك الشرح والمرفق . ولو حابب توسع النماذج ارفقها وأنا حاضر . ووافني بالرد . Emad.85.rar

تفضل استاذ @Abdelaziz Osman 'طلبك حسب ما فهمت . اختار الاوردر من النموذج ثم افتح التقرير من الزر وطالع التقرير. ووافني بالرد . اليك المرفق بطلبك. quirytreble-1.rar

طلبك غير مفهوم .... ارفع مرفقك موضحاً عليه طلبك ..............

استاذ @moho58 برفق اليك مرفق من أعمال استاذنا @ابو جودي انا شخصياً بستعمله . ملاءمة عناصر النموذج حسب حجم النموذج.rar

استاذ @checles تفضل المرفق بعد اضافة نموذج الادخال . checles-1.rar

ممكن تذكر كيف سيحدث الجدول من جدول آخر بدون استعلام تحديث سوا كان استعلام تحديث يدوي أو استعلام من داخل حدث كما عند غلق نموذج الادخال أو أي نموذج آخر

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