اذهب الي المحتوي
أوفيسنا

محمد احمد لطفى

الخبراء
  • Posts

    1931
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    2

كل منشورات العضو محمد احمد لطفى

  1. أريد استيراد ملف اكسيل الى جدول جديد بالكود ان أمكن ملف اكسل السطر الاول يرجى حذفه لان السطر الثانى هو رؤوس الحقول وجزاكم الله خيراً 0125.xls testdate4.mdb
  2. أستاذى @ابوخليل الكود CurrentDb.Execute "ALTER TABLE [tblOld] ADD CONSTRAINT PrimaryKey PRIMARY KEY ( [idNum] );" شغال زى ماهو حاولت أحذف PrimaryKey مكررة و أغير فيها مشتغلش جزاك الله كل خير testdate4.mdb
  3. أستاذ @مبرمج متقاعد فعلا الملف تم تحويله من صفحة انترنت الى اكسل ثم اكسس دزاك الله خيرا
  4. تم الحل CurrentDb.Execute "ALTER TABLE [tblOld] ADD CONSTRAINT PrimaryKey PRIMARY KEY ( [idNum] );"
  5. أريد جعل حقل idNum مفتاح أساسى عن طريق الكود وجزاكم الله خيراً testdate4.mdb
  6. جزاك الله خيراً أستاذى @أبو عبدالله الحلوانى ما أريده تغيير نوع البيانات الحقل من رقم الى نص و توصلت لها من خلال المنتدى Dim db As DAO.Database Set db = CurrentDb Dim strSQL As String strSQL = "ALTER TABLE tblOld ALTER COLUMN idNum TEXT(255)" db.Execute strSQL Set db = Nothing testdate3.mdb
  7. أريد تغيير حقل رقمى الى نص عن طريق الكود حقل idNum وجزاكم الله كل خير testdate3.mdb
  8. أستاذى @مبرمج متقاعد جزاك الله كل خير أستاذى @jjafferr جزاك الله كل خير جميع الاجابات صحيحة
  9. أستاذ @مبرمج متقاعد جزاك الله خيراً ممكن لو وصلت لحل ترفع الملف
  10. أستاذى @ابوخليل ملف حضرتك شغال تمام بس لما بطبق فى ملفى مبيشتغلش
  11. أستاذى @ابوخليل تقريبا حضرتك تقصد اضافة المتغير فى خانة التحديث فى الاستعلام ممكن استأذن حضرتك تنفذها فى الملف المرفق وجزاك الله خيراً testdate1.mdb
  12. للفائدة 1 - صورة عند تشغيل الاستعلام التحديث 2 - صورة خصائص الحقل النصى ( تاريخ)
  13. عند نسخ عمود تاريخ نص الى عمود تاريخ يتم النقل ولكن عند عمل استعلام تحديث لا يتم النقل ما الخطأ فى الكود أو هل يجب التحويل عبر الكود main1115.[dateX2] = [0125]![datex1], وجزاكم الله خيراً
  14. انا لله وانا اليه راجعون اللَّهمَّ اغفرْ لَهُ وارحمهُ ، وعافِهِ واعفُ عنهُ ، وأكْرِم نُزَلَهُ ، ووسِّع مُدَخلَهُ ، واغسلْهُ بالماءِ والثَّلجِ والبَردِ ، ونقِّهِ منَ الخطايا كما نقَّيتَ الثَّوبَ الأبيضَ منَ الدَّنسِ ، وأبدِلهُ دارًا خَيرًا مِن دارِهِ ، وأهلًا خَيرًا مِن أهلِهِ ، وزَوجًا خَيرًا مِن زَوجِهِ ، وأدخِلهُ الجنَّةَ ونجِّهِ منَ النَّارِ وأَعِذْهُ مِن عذابِ القبرِ
  15. تفضل هل هذا ما تريد مندوب مبيعات.rar
  16. أستاذى @مبرمج متقاعد أستاذى @Ahmed.IQ جزالكl الله كل خير
  17. نعم فى نفس الجدول والكود يعمل =Nz(DLookUp("[Namex]";"Tel T";"[Tel 1]&[Tel 2] like '*" & [تليفون] & "*'");"") بس فى حالة وجود رقم تليفون غير موجود فى الجدول التانى فى tel1 و أو tel2 , أو رقم التلفون فى النموذج فارغ بيجيب اى اسم شخص من الجدول تم اضافة مرفق test00654.rar
  18. أستاذى @مبرمج متقاعد هناك مشكلة صغيرة فى حالة وجود رقم تليفون غير موجود فى الجدول التانى فى tel1 و أو tel2 , أو رقم التلفون فى النموذج فارغ بيجيب اى اسم شخص من الجدول حتى بعد تغييره الى =Nz(DLookUp("[Namex]";"Tel T";"[Tel 1]&[Tel 2] like '*" & [تليفون] & "*'");"")
  19. أستاذى @Ahmed.IQ ممكن لو سمحت طريقة كتابة الكود فى مربع نص وجزاك الله خيرا
  20. أعمل بهذا الكود لاحضار اسم الشخص =Nz(DLookUp("Namex";"[Tel T]";"[Tel 1]='" & [تليفون] & "'");"") و لكن اذا كان [Tel 1] لا يساوى رقم التليفون اريد يذهب الى [Tel 2] واذا كان نفس الرقم يحضر الاسم وجزاكم الله خيراً
  21. ألف مبروك مع تمنياتي له بالتوفيق
×
×
  • اضف...

Important Information