بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
Lamyaa
02 الأعضاء-
Posts
86 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو Lamyaa
-
جميل جدا أستاذ جعفر .. اتستفدت كثيرا حفظكم الله ورعاكم
-
إظهار التاريخ الهجري (أم القرى) و الميلادي واليوم في نموذج
Lamyaa replied to obeidalharbi's topic in قسم الأكسيس Access
الأستاذ أبا خليل أنا أتابع فقط .. وأود تقديم شكري لك على جهودك وسعة صدرك حفظك الله وأبقاك في خير -
Disable Microsoft access security notice
Lamyaa replied to ابو عبد الله العراقي's topic in قسم الأكسيس Access
يمكنك استخدام الأمر التالي قبل تنفيذ الاستعلامات DoCmd.SetWarnings False وإن أرد بعد الانتهاء من الاستعلامات إعداته قم بتنفيذ الأمر التالي: DoCmd.SetWarnings True -
حمابة فكرة لحماية البرنامج عند التوزيع و ضمان توافقه مع جهاز العميل
Lamyaa replied to Amr Ashraf's topic in قسم الأكسيس Access
تفضل .. ها هي قاعدة البيانات وهل تعرف ما هذا : Mf}*019084/ImOe@|$<n LangData.accdb -
حمابة فكرة لحماية البرنامج عند التوزيع و ضمان توافقه مع جهاز العميل
Lamyaa replied to Amr Ashraf's topic in قسم الأكسيس Access
بطريقتك يمكن لأي شخص أن يحصل على النسخة المفتوحة الكاملة من البرنامج .. وهذا سوء تدبير إذا كنت مبرمجا وستبيع برنامجك فمن الطبيعي أن تتحمل إنشاء نسختين من برنامجك أنت تسأل (ليه كل ده) .. وأجيبك حتى لا يضيع جهدك ويسرقه ضعاف النفس. ثم هذا ليس وجع رأس من حق من سيشتري برنامج أن يحصل على برنامج يعمل بشكل صحيح ومن دون مشاكل أي أنك ليس فقط عملت (كومبايل) وإنما اختبرت كل صغيرة وكبيرة على النواتين. هذا رأيي ولك ما تشاء -
حمابة فكرة لحماية البرنامج عند التوزيع و ضمان توافقه مع جهاز العميل
Lamyaa replied to Amr Ashraf's topic in قسم الأكسيس Access
السلام عليكم ورحمة الله وبركاته أعتقد أن من الأنسب أن يقوم المبرمج بعمل نسختين من البرنامج لكلتا النواتين ويتم تزويد المستخدم النهائي بالنسخة المناسبة -
شاركوني في تهنئة فريق العمل بنجمها الجديد ، ابو جودي
Lamyaa replied to jjafferr's topic in قسم الأكسيس Access
ألف مبروك يا أبا جودي تستاهل كل خير وفقك الله واعانك -
هذه الطريقة تعمل إلى الآن ولا علاقة لها بالويندوز جهازي ويندوز 10 وتعمل عليه
-
في الأكسس من قائمة ملف أنزل في الأسفل إلى خيارات ومن ثم انتقل إلى تبويب قاعدة البيانات الحالية وقم بتحديد مسار الأيقونة أو يمكنك عمل ذلك من خلال الأكواد باستخدام VBA
-
جزيل الشكر والامتنان لـ @د.كاف يار وللأساتذة الكرام الذين يهبوننا من وقتهم ومعرفتهم الشيء الكثير أنتم مصداق لقوله علية الصلاة والسلام (خير الناس أنفعهم للناس) قضى الله حوائجكم وفي ميزان حسناتكم
-
أقترح أن يتم فتح الرابط https://wa.me/" & txtNumbers داخليا في البرنامج باستخدام أداة Webbrowser
-
أنت تحتاج إلى أداة ActiveX يمكنك استخدام هذه الأداة: https://www.google.com/search?q=Comm32+Serial+Communications+OCX+9.0.0.1&safe=strict&sxsrf=ALeKk02MACSIXUc-A60uRWXsGyrY-SNEbA%3A1617557853779&source=hp&ei=XflpYNWRLYaflwTs-bqAAg&iflsig=AINFCbYAAAAAYGoHbeM64-CnxfuQ8vcJRlKIXBhqSTqD&oq=Comm32+Serial+Communications+OCX+9.0.0.1&gs_lcp=Cgdnd3Mtd2l6EANQqAJYqAJg9gVoAHAAeACAAQCIAQCSAQCYAQCgAQKgAQGqAQdnd3Mtd2l6&sclient=gws-wiz&ved=0ahUKEwiVtJrKkOXvAhWGz4UKHey8DiAQ4dUDCAY&uact=5
-
أين يمكن توثيق التصميم والبرمجة لبرامج أكسس ؟
Lamyaa replied to عربي عالمي's topic in قسم الأكسيس Access
أعتقد أن الجهة ذات الاختصاص هي : الهيئة السعودية للملكية الفكرية https://www.saip.gov.sa/ar/ -
رفعت موضوعا قديما ذكرنا بأبي هادي تمنياتنا أن يكون بصحة وعافية
-
طريقة وضع التقارير الثلاثه في صفحة واحدة
Lamyaa replied to أبو ماجد الغامدي's topic in قسم الأكسيس Access
إذا كان هناك علاقة بين التقارير فيمكن عملها كتقارير فرعية في في تقرير واحد. وإذا لم يكن فيمكن تصدير كل تقرير على حدة ثم دمج الثلاث تقارير في ملف pdf واحد باستخدام سطر الأوامر وأحد أدوات التعامل مع ملفات pdf مثل: 2PDF https://www.cmd2pdf.com -
حسب علمي أن الأجهزة الصينية 99% متشابهة ويمكن في أغلبها إن لم يكن في جميعها تعديل الإعدادات بحث لو تم تسجيل الدخول مرة لا يتم تكرار التسجيل مرة أخرى .. ابحث في الإعدادات
-
أستاذ محمد طاهر شكرا بحجم السماء
-
السلام عليكم ورحمة الله وبركاته آمل من الأخوة القائمة على المنتدى تعديل قالب الهدر الخاص بالمنتدى بحيث يتم إضافة تعليمة dir="rtl" إلى وسم <html> حتى يتم تصفح المنتدى بالشكل المناسب من اليمين لليسار ودمتم بخير
-
اذا كانت قيمة الحقل فراغ يتم استبدالها بصفر
Lamyaa replied to عبد اللطيف سلوم's topic in قسم الأكسيس Access
يمكن استخدام دالة NZ() NZ([القيمة]) -
كود توقف عن العمل بعد استخدام نسخة 64 بت
Lamyaa replied to عبد الله قدور's topic in قسم الأكسيس Access
وللتعامل مع الكود استخدم: Me.Text0 = DialogColor(Me.Text0) 'لوضع كود اللون في مربع النص Me.Text0.BackColor = Me.Text0 ' لجعل خلفية مربع النص باللون الذي تم تحديده -
كود توقف عن العمل بعد استخدام نسخة 64 بت
Lamyaa replied to عبد الله قدور's topic in قسم الأكسيس Access
استخدم هذا الكود وسيعمل معك على الإصدارتين #If VBA7 Then Private Type ChooseColor lStructSize As Long hwndOwner As LongPtr hInstance As LongPtr rgbResult As Long lpCustColors As LongPtr flags As Long lCustData As LongPtr lpfnHook As LongPtr lpTemplateName As String End Type #Else Private Type ChooseColor lStructSize As Long hwndOwner As Long hInstance As Long rgbResult As Long lpCustColors As Long flags As Long lCustData As Long lpfnHook As Long lpTemplateName As String End Type #End If Private Const CC_ANYCOLOR = &H100 'Private Const CC_ENABLEHOOK = &H10 'Private Const CC_ENABLETEMPLATE = &H20 'Private Const CC_ENABLETEMPLATEHANDLE = &H40 Private Const CC_FULLOPEN = &H2 Private Const CC_PREVENTFULLOPEN = &H4 Private Const CC_RGBINIT = &H1 'Private Const CC_SHOWHELP = &H8 'Private Const CC_SOLIDCOLOR = &H80 #If VBA7 Then Private Declare PtrSafe Function ChooseColor Lib "comdlg32.dll" Alias "ChooseColorA" (pChoosecolor As ChooseColor) As Long #Else Private Declare Function ChooseColor Lib "comdlg32.dll" Alias "ChooseColorA" (pChoosecolor As ChooseColor) As Long #End If Public Function DialogColor(Optional lDefaultColor As Variant) As Long Dim CC As ChooseColor Dim lRetVal As Long Static CustomColors(16) As Long 'Some predefined color, there are 16 slots available for predefined colors 'You don't have to defined any, if you don't want to! CustomColors(0) = RGB(255, 255, 255) 'White CustomColors(1) = RGB(0, 0, 0) 'Black CustomColors(2) = RGB(255, 0, 0) 'Red CustomColors(3) = RGB(0, 255, 0) 'Green CustomColors(4) = RGB(0, 0, 255) 'Blue With CC .lStructSize = LenB(CC) .hwndOwner = Application.hWndAccessApp .flags = CC_ANYCOLOR Or CC_FULLOPEN Or CC_PREVENTFULLOPEN Or CC_RGBINIT If IsNull(lDefaultColor) = False _ And IsMissing(lDefaultColor) = False Then .rgbResult = lDefaultColor 'Set the initial color of the dialog .lpCustColors = VarPtr(CustomColors(0)) End With lRetVal = ChooseColor(CC) If lRetVal = 0 Then 'Cancelled by the user DialogColor = RGB(255, 255, 255) ' White -> 16777215 Else DialogColor = CC.rgbResult End If End Function -
إنا لله وإنا إليه راجعون لله ما أخذ وله ما أعطى وكل شيء عنده بأجل مسمى. عظم الله أجركم استاذنا محمد ، وأحسن عزاكم، وغفر له ، وأسكنه فسيح جناته وألهمكم وذيه الصبر والسلوان