دروب مبرمج
الخبراء-
Posts
204 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
4
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو دروب مبرمج
-
ارسال رسائل الواتس اب عبر الاكسس وعلاقه انترنت اكسبلور
دروب مبرمج replied to رياض البرعي's topic in قسم الأكسيس Access
كلمة فنان او معلم او محترف قليلة في انسان عظيم مثلك يشرفني بأن احتفظ بهذه الشفرة في مكتبتي -
ارسال رساله نصيه من الاكسس الى الجوال _ وتعريب النص
دروب مبرمج replied to سلمان الشهراني's topic in قسم الأكسيس Access
نعم النص العربي يحتاج الى تشفير لحظات و يكون عندك التعديل تفضل التعديل و هذا هو كود التشفير المستخدم لتمرير النصوص عبر الويب Function EncodeQP2(s As String) As String Dim i As Long Dim p1 As Long Dim p2 As Long Dim r As String Dim n As Long For i = 1 To Len(s) n = AscW(Mid(s, i, 1)) If n < 128 Then r = r & "%" & Hex(n) ElseIf n < 2048 Then p1 = n \ 64 r = r & "%" & Hex(p1 + 192) p2 = n Mod 64 r = r & "%" & Hex(p2 + 128) Else End If Next i EncodeQP2 = r End Function sms (1).accdb -
هل سيتم اضافة الأيام فعلاً خاصة لو ان العمود نصي !؟ مجرد رأي يحتمل الكثير من الخطأ استخدام دوام التاريخ DateAdd بإعتقادي أنها تحمي المبرمج من الخطأ على الاقل من وجهة نظري و لكل شيخ طريقته في العلاج
-
فكرة جدول مبني بلغة HTML مع تلوين الاسطر عند المرور عليها
دروب مبرمج replied to دروب مبرمج's topic in قسم الأكسيس Access
اسعدتني بمرورك العطر و الجميل و زخات كلمات التي تنهمر على القلب كزخات المطر شكرا لك معلمي @ابوخليل تفضل طلبك في المرفقات قد تجد بعض الأخطاء لكن حتما سنتجاوزها مع الأيام لأنني مازلت اتعلم و اتدرب و يمكن بعد فتح البرنامج عرض صفحت ويب من خلال المتصفح الافتراضي لديك لعرض النتائج مع اخطاء اقل web.mdb -
فكرة جدول مبني بلغة HTML مع تلوين الاسطر عند المرور عليها
دروب مبرمج replied to دروب مبرمج's topic in قسم الأكسيس Access
ابشر -
ارسال رساله نصيه من الاكسس الى الجوال _ وتعريب النص
دروب مبرمج replied to سلمان الشهراني's topic in قسم الأكسيس Access
تفضل التعديل sms.accdb -
رصيد الصنف لا يظهر في كارت الصنف
دروب مبرمج replied to ابو عبد الرحمن اشرف's topic in قسم الأكسيس Access
هذا ليس نموذج مصغر اذا يرجى تحديد اسم جدول الأصناف + جدول حركة الأصناف ( الداخل و الخارج ) لأن المعادلة المستهدفة اجمالي عدد الأصناف الموردة - اجمالي عدد الأصناف المسحوبة او المباعة = المخزون المتبقي -
ربط قاعدة بيانات الاكسس في sql server
دروب مبرمج replied to iyad mohamad's topic in قسم الأكسيس Access
-
رصيد الصنف لا يظهر في كارت الصنف
دروب مبرمج replied to ابو عبد الرحمن اشرف's topic in قسم الأكسيس Access
ارفق نموذج مصغر لكي استطيع مساعدتك -
مشكلة في كشف الحساب - المتبقي خطأ
دروب مبرمج replied to عبد اللطيف سلوم's topic in قسم الأكسيس Access
تفضل هذا لتعديل بطريقة مختلفة راح يكون اكثر تفاعلية و راح تشعر بأن الكود يفهم طلبك و تطلعاتك جرب و اعطيني انطباعك القروض والديون2024.rar -
اضافة كلمة DISTINCT لجملة الإستعلام تمكن من عرض القيم بدون تكرار يعني لو في الجدول بيانات متكررة اكثرة من مرة راح يعرضها مرة وحدة فقط طريقة الإستخدام SELECT DISTINCT [Company] FROM [Orders] بهذه الجملة سيتم عرض جميع الشركات في جدول الطلبات بدون تكرار اسم الشركة هذا الموقع جعلته المرجع الخاص بي لجميع جملة الإستعلام SQL https://www.w3schools.com/sql/sql_distinct.asp
-
حساب الوقت بين تاريخين -- نتائج خطأ
دروب مبرمج replied to عبد اللطيف سلوم's topic in قسم الأكسيس Access
المعادلة صحيحة طبيعي اذا مثلا طلعت اجازة اليوم ما راح ترجع بنفس اليوم مثلا انت موظف و قدمت على طلب اجازة يوم واحد فقط تبدء من تاريخ : 16/05/2023 ما راح ترجع في نفس اليوم راح ترجع ثاني يوم يعني تاريخ نهاية الإجازة في : 17/05/2023 لكن لو حبيت انها تنتهي في نفس اليوم فقط تقدر تضيف (+1) للمعادة و بتكون الاجازة تبدء و تنتهي في نفس اليوم -
هل يمكن حفظ مسار الملف فقط و اعادة تشغيله عند البحث
دروب مبرمج replied to ziadi hor's topic in قسم الأكسيس Access
عندك مشكلة في اللغة غيير اعدادات اللغة في جهاز من خلال الاعدادات الاقليمية و امورك طيبة بإذن الله اختر اللغة العربية - المملكة العربية السعودية و بتحصل الرموز الي في الرسالة ظهرت بشكلها الطبيعي و اكيد و حتما راح يفيدنا اخونا @ابوخليل لأن هذي المشكلة او مره تمرني كذلك خبرتي بسيطة في الأوفيس و الاكسس بشكل خاص -
-
ما هو اسم التقرير ؟؟؟
-
تفضل هذا التعديل AVI.rar
-
استخدم هذا الكود Dim SetSql As Variant, varFilter As Variant SetSql = Null varFilter = Null '--------------- جزء فلترة النموذج حسب القائمة المسندلة ---------------- varFilter = (varFilter) & "[natnump] =" & Me.name1.Column(0) With Me.Form If Not IsNull(varFilter) Then .DataEntry = False: .Filter = varFilter: .FilterOn = True Else .FilterOn = False End If .Requery End With '--------------- جزء تغيير مصدر النموذج الفرعي ---------------- If Len(txtyear) = 0 Or IsNull(txtyear) Then Me.äãæÐÌ_ÝÑÚí_gadamat_ishraf2.SourceObject = "Table.alaqat" Else Me.äãæÐÌ_ÝÑÚí_gadamat_ishraf2.SourceObject = "Query.qry_alaqat" End If السجل الاشرافي.rar
-
هل يمكن حفظ مسار الملف فقط و اعادة تشغيله عند البحث
دروب مبرمج replied to ziadi hor's topic in قسم الأكسيس Access
اضف المكتب التالية و في اسفل محرر الأكود الصق الشفرة التالية Public Function Choose_Folder() As String On Error Resume Next Dim FolderPath As String, Addfile As Object With Application.FileDialog(msoFileDialogFolderPicker) .Show Choose_Folder = .SelectedItems(1) End With End Function و ضع ازرار بجوار مربع النص و الصق الكود التالي به [مكان الحفظ] = Choose_Folder و سيكون مربح الحوار بهذا الشكل فقط اختر الفولدر و اضغط موافق و سيتم تخزين موقع الفولدر في مربع النص تفضل برنامجك بعد التعديل و لتصفح الملفات و اختيار الملفات استخدم الكود التالي Dim Addfile As Object Set Addfile = Application.FileDialog(3) With Addfile .AllowMultiSelect = True .InitialFileName = "" .Filters.Clear .Filters.Add "All Files", "*.*" If .Show = True Then Dim fPath As Variant For Each fPath In .SelectedItems Debug.Print fPath Next Else Exit Sub End If End With الاذاعةقبل الكود.accdb -
سعر شراء الصنف لا يظهر في فاتورة المشتريات
دروب مبرمج replied to ابو عبد الرحمن اشرف's topic in قسم الأكسيس Access
تفضل الصق هذه الشفرة في سجل الأكواد Module1 Public Function Get_Last_PRICE(ITEM_CODE As String) As Double On Error Resume Next Get_Last_PRICE = Nz(DLast("PURSHASED_PRICE", "ITEMS", "[ITEM_CODE] Like '" & ITEM_CODE & "'"), 0) End Function و في صفحة المبيعات و صفحة المشتريات في حدث عند التغيير ضع الكود التالي [ITEM_PRICE] = Get_Last_PRICE([ITEM_CODE]) وهذه هي النتيجة لم استطع ارفاق التعديل بسبب كبر حجم الملف -
حساب عدد الايام مع حذف ساعات الويكند مع العطلات الرسمية
دروب مبرمج replied to AbuTalal20's topic in قسم الأكسيس Access
تفضل حساب عدد ايام الإجازات الفعلية بدون اجازات نهاية الإسبوع + الإجازات الرسمية حسب جدول الإجازات WM2000.mdb -
للأسف يا صاحب الموضوع و عت نفسك في زاوية ضيقة و حصرت طلب المساعدة على عضو واحد و قد نفذت منه جميع الحلول نصيحة : اجعل طلباتك دائما للعموم لكي تأخذ اكثر من شكل للمساعدة و المشورة حين تكثر الحلول يسزداد استيعابك و فهمك لبيئة التطبيق الذي تريد انشائه نصيحة اخرى : لا تستعمل اي كود لا تعريف كيف يعمل و لا تفهم اقسامه خذا الأكواد و حاول ان تفهمها لكي تستطيع معالجة المشكلات التي من المحتمل ان تواجهك اثناء التطبيق
-
-
حاولت و حاولت المساعدة لكن عجزت اعرف وين التاريخ بالضبط لجل نطبق عليه الفلتر و ثاني شغلة الكود سهل و مقدور عليه لكن انت وين بالضبط تحتاج city تكون موجودة احس ماهي منطقية كذلك تصميم جدولك فيه اخطاء كثير مثلا لو بغيت تلغي او تضيف منتج راح تضطر تعديل في تصميم الجدول و كل الأكواد مبنية على الجدول الاساسي انتبه الشغل الصحيح و السليم يدوم و يسهل التعامل معاه و تقدر تعرض البيانات بدون الحاجة الى كود من خلال العرض الجدولي وهذي نصيحة في النهاية شارك بمثال واضح لجل نقدر نساعدك و الجميع يشارك في الحلول العضو الي ساعدك واضح ان تواجده قليل
-
البحث والفلترة داخل الكومبو بوكس
دروب مبرمج replied to mostafaelshnawy5's topic in قسم الأكسيس Access
هيا جرب هذا الفلتر ممكن يفي بالغرض تبحث بجزء من الاسم المساعدة في الكومبو بوكس.zip