محمد طاهر

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

لفتح التقرير علي السجل المفتوح فى الفورم اذا كان الحقل الذي يصنف السجل رقمي DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]=" & forms![Forname]![TXTBOXNAME] واذا كان نص DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]='" & forms![Forname]![TXTBOXNAM…

لفتح التقرير علي السجل المفتوح فى الفورم اذا كان الحقل الذي يصنف السجل رقمي DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]=" & forms![Forname]![TXTBOXNAME] واذا كان نص DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]='" & forms![Forname]![TXTBOXNAM…

اخي العزيز رجاء استخدام البحث قبل طرح السؤال كل الثلاث استفسارات سبق تناولها كما أرجو فى المستقبل طرح كل استفسار فى سؤال علي حدة لتعم الفائدة *تقارير* وضع إطار + تغيير اتجاه الصفحة http://www.arabteam2000.com/vb/showthread....=&threadid=4039 السؤال الثاني لفتح…

آسف لقد عكست الاجابة ف False للايقاف و TRue للتفعيل

أخونا أبو حمود سبق و أن طرح استفسار مماثل و أجابه الاخوة بالتفصيل فابحث عنه ففيه اجابة مكثفة لآراء العديد من الاخوة

أخوتي الاعزاء أرجو استخدام البحث قبل طرح الاسئلة لتعم الفائدة *فورم* كيف الحصول علي نموذخ خالي من البيانات http://www.arabteam2000.com/vb/showthread....=&threadid=8383

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

حل مؤقت بما أن المستخدم يريد كل شيئ بالعربي فليحمل ويندوز عربي Local و ليس Enabled

حل مؤقت بما أن المستخدم يريد كل شيئ بالعربي فليحمل ويندوز عربي Local و ليس Enable

لفتح التقرير علي السجل المفتوح فى الفورم اذا كان الحقل الذي يصنف السجل رقمي DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]=" & forms![Forname]![TXTBOXNAME] واذا كان نص DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]='" & forms![Forname]![TXTBOXNAM…

الاكواد توضع فى أي موديول و هي مجهزة لتعطي الناتج فى ال immediate window فمن نافذى تصميم الكود فى ضع مؤشر الماوس داخل الدالة التي تريد ثم اضغط علي زر التشغيل أو Run فتظهر النتيجة داخل ال Debug Window أو ما يسمي بال immediate window و هي تظهر بالضغط علي CTR + G…

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

فى البداية ضع On Error GoTo ERROR_SUB و بعد ذلك Dim fs, S, a, xx, x Dim I As Integer, j As Integer Set fs = CreateObject("Scripting.FileSystemObject") S = fs.GetDrive(fs.GetDriveName(fs.GetSpecialFolder(1))).SerialNumber Open fs.GetSpecialFolder(1) & "" & "[Fi…

ابحث عن active skin أو اكتيف سكين فى قسم البيزيك

قبل الكود ضع DoCmd.SetWarnings False

لطباعة الجداول و الاستعلامات و الحقول Sub EnumerateTables() Dim dbsLocal As Database Dim tblLocal As TableDef Set dbsLocal = CurrentDb For Each tblLocal In dbsLocal.TableDefs Debug.Print tblLocal.Name Next tblLocal End Sub Sub EnumerateQueries() Dim dbsLocal A…

العديد من الطابعات التي صدرت خلال السنوات الماضية بها خاصية تحويل المقاس أثناء الطباعة و هذا من خصائص الطابعة

لايقاف الرسائل ضع قبل أمر التحديث DoCmd.SetWarnings false و بعده فعل الرسائل ان أردت ب DoCmd.SetWarnings True ملاحظة : تم تصحيح الكود بعد أن كان معكوسا

هذا هو الكود للربط و أيضا كود لطباعة العلاقات و خاصية تتالي الحذف و التحديث تراها من dbRelationDeleteCascade 'create a relation '================= Sub CreateRelationDAO() Dim dbsLocal As Database Dim relLocal As Relation Dim fldLocal As Field Set dbsLocal = Cu…