رسالة معرفة انا كان هنالك حقل فارغ في سجل

النهر العطشان · أغسطس 3, 2022

السلام عليكم

احتاج الى رسالة تنبيه ان هنالك حقل فارغ او اكثر عند نقل سجل من جدول الى جدول ثاني ضمن البرنامج وهل يمكن ملئ الحقل الفارغ بعد اعلامي

وكما في البرنامج المرفق .

علما ان البرنامج قد حصلت عليه من هذا الموقع ومن احد الاسائذة الكرام .

وشكرا

Example.accdbFetching info...

**متقاعد** · أغسطس 3, 2022

في 3‏/8‏/2022 at 15:15, النهر العطشان said:

احتاج الى رسالة تنبيه ان هنالك حقل فارغ او اكثر عند نقل سجل من جدول الى جدول ثاني ضمن البرنامج

Expand

نعم ممكن عمل ذلك والفكرة تتلخص في عمل كود يبحث في البداية برقم الطالب الذي نرغب نقل بياناته هنا نستخدم مصدر السجلات Recordset

ثم نعمل حلقة باستخدام For Each تمر على كافة حقول السجل المطلوب نقله ⬇️

For Each fld In rst.Fields
If IsNull(fld.Value) Then

اي في حالة وجود اي حقل فارغ نفذ الشرط

وجواب الشرط يكون فتح نموذج الطالب وعلى نفس السجل الحالي لنقوم باستكمال الحقل او الحقول الفارغة

DoCmd.OpenForm "frm_Stud", , , "[id]=" & [Text0]

اي اننا نعمل نموذج يفتح عند تحقق وجود حقول فارغة واذا كان لديك مسبقا نموذج خاص بالطلاب فلادعي للنموذج الجديد

اما في حالة عدم وجود حقول فارغة فيتم نقل السجل للجدول الاخر سواء عن طريق استعلام او عن طريق مصدر السجلات

ونتوقف قليلا وندع الامر لاحد الاساتذة ربما لديه فكرة افضل

تحياتي

النهر العطشان · أغسطس 3, 2022

في 3‏/8‏/2022 at 18:54, مبرمج سابق said:
عم ممكن عمل ذلك والفكرة تتلخص في عمل كود يبحث في البداية برقم الطالب الذي نرغب نقل بياناته هنا نستخدم مصدر السجلات Recordset

ثم نعمل حلقة باستخدام For Each تمر على كافة حقول السجل المطلوب نقله ⬇️
For Each fld In rst.Fields
If IsNull(fld.Value) Then
اي في حالة وجود اي حقل فارغ نفذ الشرط

وجواب الشرط يكون فتح نموذج الطالب وعلى نفس السجل الحالي لنقوم باستكمال الحقل او الحقول الفارغة
DoCmd.OpenForm "frm_Stud", , , "[id]=" & [Text0]
اي اننا نعمل نموذج يفتح عند تحقق وجود حقول فارغة واذا كان لديك مسبقا نموذج خاص بالطلاب فلادعي للنموذج الجديد

اما في حالة عدم وجود حقول فارغة فيتم نقل السجل للجدول الاخر سواء عن طريق استعلام او عن طريق مصدر السجلات

ونتوقف قليلا وندع الامر لاحد الاساتذة ربما لديه فكرة افضل

تحياتي
Expand

السلام عليكم استاذ مبرمج سابق على المداخلة والاجابة

ممكن توضيح بمثال للملف المرفق

**متقاعد** · أغسطس 4, 2022

في 3‏/8‏/2022 at 19:32, النهر العطشان said:

ممكن توضيح بمثال للملف المرفق

Expand

نعم اخي وان كنت افضل ان يكون الحل مقدم من احد اساتذة الموقع او الخبراء الافاضل

نعود للموضوع المطلوب نقل سجلات الطالب من جدول الى اخر عن طريق رقم الطالب والتأكد بعدم وجود حقول خاليه خلال عمليه النقل

الفكرة على النحو التالي مع التأكيد بان الكود يمكن اختصاره

في زر الامر نقل وضعنا الكود التالي

Dim n As Integer
n = IIf(IsNull([Text0]), 0, [Text0])
If DCount("*", "[Students]", "[ID]=" & n) = 0 Then Exit Sub
    Dim rst As Recordset
    Dim rs As Recordset
    Dim fld As Field
    Set rst = Me.RecordsetClone
    Set rs = CurrentDb.OpenRecordset("team")
    rst.FindFirst "[ID]=" & [Text0]
    For Each fld In rst.Fields
    If IsNull(fld.Value) Then
    MsgBox fld.Name
    DoCmd.OpenForm "frm_Stud", , , "[id]=" & [Text0]
    Exit Sub
Else
    rs.AddNew
    rs.Fields(0) = rst.Fields(0)
    rs.Fields(1) = rst.Fields(1)
    rs.Fields(2) = rst.Fields(2)
    rs.Fields(3) = rst.Fields(3)
    rs.Fields(4) = rst.Fields(4)

    End If
    Next fld
    rs.Update
    rs.Close: rst.Close
    Set rs = Nothing: Set rst = Nothing

السطر 1 و 2 و3 الغرض منها ايقاف تنفيذ الامر في حالة كون رقم الطالب غير صحيح او ان حقل البحث فارغ ويمكن استبدالها بامر معالجة الاخطاء

الاسطر 4 و 5 و 6 حجز متغيرات اثنين مصدر سجلات وواحد حقل

الاسطر 7 و 8 اسناد متغيرين الى مصدرهما

السطر التاسع البحث عن رقم الطالب

10 و 11 عمل حلقة لفحص الحقول في السجل المطلوب نقلة

12 و 13 و 14 اضهار رسالة باسم الحقل الفارغ وفتح النموذج على بيانات الطالب لاستكمال الحقول الفارغة وانهاء الاجراء لحين استكمال البيانات يمكن الاستغناء عن سطر 12

من 15 الى 21 في حالة عدم وجود حقول فارغة انقل السجل كل حقل بمكانه المحدد ايضا ممكن اختصاره من 7 اسطر الى 3 اسطر طالما اسماء الحقول متطابقة

باقي الاسطر لانهاء الشرط والحلقة الدوارة واغلاق مصدر السجلات

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

الملف مرفق

تحياتي

النهر.accdbFetching info...

النهر العطشان · أغسطس 4, 2022

في 4‏/8‏/2022 at 06:39, مبرمج سابق said:

عم اخي وان كنت افضل ان يكون الحل مقدم من احد اساتذة الموقع او الخبراء الافاضل

Expand

شكرا اخي على الاجابة والطريقة صحيحة ولو ان كود نقل السجل ليس هو في المثال المرفق من قبلي .

كنت اتمنى انا ايظا ان يشاركنا احد الاساتذة الكرام من الخبراء في هذا الموقع المحترم وبفكره اخرى وعلى مثالي المرفق .

باظهار رسالة للحقل الفارغ والتعديل علية .

مع جزيل الشكر والامتنان

Example.accdbFetching info...

**متقاعد** · أغسطس 4, 2022

في 4‏/8‏/2022 at 15:17, النهر العطشان said:

ولو ان كود نقل السجل ليس هو في المثال المرفق من قبلي

Expand

الكود الذي انت استخدمته هو كود استعلام الحاق

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

وطالما اننا فتحنا مصدر السجلات فان الاجراء الصحيح من وجهة نظري الاستغناء عن استعلام الالحاق واضافة السجل بنفس الطريقة التي عملتها

على كل حال اعتبر هذا الرد رفع للموضوع لعلك تجد ما تريد

تحياتي

النهر العطشان · أغسطس 4, 2022

في 4‏/8‏/2022 at 15:45, مبرمج سابق said:

على كل حال اعتبر هذا الرد رفع للموضوع لعلك تجد ما تريد

تحياتي

Expand

شكرا اخي على الاجابة جعلها الله في ميزان حسناتك

ننتظر من الاساتذة الخبراء في الموقع على اعطائنا حل آخر للموضع وان امكن بالكود المستخدم في عملية نسخ سجل من جدول الى اخر المرفق بالملف اعلاه

وشكرا

**أبوبسمله** · أغسطس 4, 2022

السلام عليكم ورحمه الله وبركاته

مشاركه مع اخى واستاذى ووالدى الحبيب @مبرمج سابق جزاه الله عنا كل خير 💐🌹

وعلى الرغم باننى لست احد الاساتذه فقد احببت مشاركتكم للتعلم والاستفاده فقد مزجت بين كود معلمى ووالدى الحبيب وبين الكود السابق بالمثال لرغبه الاخ السائل

الكود التالى والمرفق بالمثال

Private Sub Command2_Click()

Dim n As Integer
n = IIf(IsNull([Text0]), 0, [Text0])
If DCount("*", "[Students]", "[ID]=" & n) = 0 Then MsgBox "هذا القيد غير موجود": Exit Sub
    Dim rst As Recordset

    Dim fld As Field
    Set rst = Me.RecordsetClone

    rst.FindFirst "[ID]=" & [n]

    For Each fld In rst.Fields
        If IsNull(fld.Value) Then
            MsgBox fld.Name
            DoCmd.OpenForm "frm_Stud", , , "[id]=" & [n]
            Exit Sub
        End If
    Next fld

DoCmd.SetWarnings False

DoCmd.RunSQL "INSERT INTO Team ( ID, Fullname, tel, Degree, class ) " & vbCrLf & _
             "SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & vbCrLf & _
             "FROM Students " & vbCrLf & _
             "WHERE (((Students.ID)=[Forms]![Form]![Text0]));"

DoCmd.SetWarnings True

Me.Text0 = ""
Me.Text0.SetFocus

End Sub

وتعديل بسيط ع كود معلمى ووالدى الحبيب جزاه الله عنا كل خير

وهو اخراج جزء الاضافه لما بعد فحص الحقول

Private Sub Command2_Click()
Dim n As Integer
n = IIf(IsNull([Text0]), 0, [Text0])
If DCount("*", "[Students]", "[ID]=" & n) = 0 Then Exit Sub
    Dim rst As Recordset
    Dim rs As Recordset
    Dim fld As Field
    Set rst = Me.RecordsetClone
    Set rs = CurrentDb.OpenRecordset("team")
    rst.FindFirst "[ID]=" & [Text0]
    
    For Each fld In rst.Fields
        If IsNull(fld.Value) Then
            MsgBox fld.Name
            DoCmd.OpenForm "frm_Stud", , , "[id]=" & [Text0]
            Exit Sub
        End If
    Next fld
    
    rs.AddNew
    rs.Fields(0) = rst.Fields(0)
    rs.Fields(1) = rst.Fields(1)
    rs.Fields(2) = rst.Fields(2)
    rs.Fields(3) = rst.Fields(3)
    rs.Fields(4) = rst.Fields(4)
    rs.Update
    
    rs.Close: rst.Close
    Set rs = Nothing: Set rst = Nothing
End Sub

تقبلوا تحياتى ومرورى

Example_1.accdbFetching info...

**kanory** · أغسطس 4, 2022

وهذه مشاركة مع اساتذتي الكرام ... مع التحية لهم جميعا .....

If DCount("*", "[Students]", "[ID]=" & Me.Text0) > 0 Then

    Dim rst As DAO.Recordset
    Dim fld As Field
    Dim a As Integer
    Set rst = CurrentDb.OpenRecordset("SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & _
                                        "FROM Students " & _
                                        "WHERE (((Students.ID)=" & [Forms]![Form]![Text0] & "));")
    For a = 1 To rst.RecordCount
    For Each fld In rst.Fields
    If IsNull(fld.Value) Then
    MsgBox "قم باكمال البيانات" & "(" & fld.Name & ")" & "ليس هناك بيانات في الحقل"
    DoCmd.OpenQuery "استعلام1", acViewNormal
    Exit Sub
    End If
    Next fld
    rst.MoveNext
    Next a
    rst.Close: Set rst = Nothing
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO Team ( ID, Fullname, tel, Degree, class ) " & vbCrLf & _
            "SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & vbCrLf & _
            "FROM Students " & vbCrLf & _
            "WHERE (((Students.ID)=[Forms]![Form]![Text0]));"

DoCmd.SetWarnings True
Me.Text0 = ""
Else
   MsgBox "هذا القيد غير موجود"
End If
Me.Requery
Me.Text0 = Null
Me.Text0.SetFocus

Example.accdbFetching info...

تم تعديل أغسطس 4, 2022 بواسطه kanory

**AbuuAhmed** · أغسطس 5, 2022

يمكن اختصار:

n = IIf(IsNull([Text0]), 0, [Text0])

إلى:

n = Nz(Me.Text0), 0)

ويمكن لمزيد من الاختراز تبديل:

If IsNull(fld.Value) Then

إلى:

If Trim(Nz(fld.Value, "")) = "" Then

مع الإعتذار لكاتب الأكواد فهي صحيحة ولكن صيغت أولها للإختصار والأخرى لمزيد من الإحتراز.

النهر العطشان · أغسطس 5, 2022

السلام عليكم ورحمة الله وبركاته

شكر وتقدير الى كل الاساتذه الكرام ممن اتحفونا بهندسة برمجية جميلة ورائعة جعلها الله في ميزان حسناتهم

شكر وتقدير الى الاستاذ kanory المحترم

شكر وتقدير الى الاستاذ احمد الفلاحجي المحترم

شكر وتقدير الى الاستاذ مبرمج سابق المحترم

شكر وتقدير الى الاستاذ AbuuAhmed المحترم

من لم يشكر المخلوق لم يشكر الخالق

بالنسبة لكود استاذنا الكبير kanory لدي سؤال ؟

قمت بتغيير قليلا من الكود الذي تفضلت به واخذت منه فقط الرساله التي تظهر اسم الحقل الفارغ لكل سجل بعد كتابة رقم السجل في المربع للفورم .

سؤالي عندما يكون هنالك اكثر من حقل فارغ في السجل فأن الرسالة تعلمني فقط بحقل واحد !

هل يمكن التعديل عليها بحيث تظهر لي رساله اسم كل الحقول الفارغة اذا كان هنالك اكثر من حقل فارغ ؟؟؟

وكما في الملف المرفق

exap 3.accdbFetching info...

تم تعديل أغسطس 5, 2022 بواسطه النهر العطشان
خطاء في السؤال

**أبوبسمله** · أغسطس 5, 2022

الشكر لله ثم لاخوانننا واساتذتنا جزاهم الله عنا كل خير

في 5‏/8‏/2022 at 11:14, النهر العطشان said:

هل يمكن التعديل عليها بحيث تظهر لي رساله اسم كل الحقول الفارغة اذا كان هنالك اكثر من حقل فارغ ؟؟؟

Expand

اتفضل التعديل على تعديلك لكود اخى واستاذى @kanory جزاه الله خيرا

Private Sub Command2_Click()
If DCount("*", "[Students]", "[ID]=" & Me.Text0) > 0 Then

    Dim rst As DAO.Recordset
    Dim fld As Field
    Dim a As Integer
    Set rst = CurrentDb.OpenRecordset("SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & _
                                        "FROM Students " & _
                                        "WHERE (((Students.ID)=" & [Forms]![Form]![Text0] & "));")

    For a = 1 To rst.RecordCount
    For Each fld In rst.Fields
    If IsNull(fld.Value) Then
    
  
    MsgBox "فارغ   " & fld.Name & "   حقل", vbOKOnly + vbMsgBoxRight, "انتبه"
    End If
    Next fld
   
    rst.MoveNext
    Next a
    rst.Close: Set rst = Nothing
    End If

 End Sub

بالتوفيق

النهر العطشان · أغسطس 5, 2022

في 5‏/8‏/2022 at 14:42, احمد الفلاحجي said:

اتفضل التعديل على تعديلك لكود اخى واستاذى @kanory جزاه الله خيرا

Expand

السلام عليكم استاذي الفاضل احمد الفلاحجي المحترم

شكر وتقدير لحضرتك والى الاستاذ الفاضل kanory المحترمين

جعلها الله في ميزان حسناتكم .

وهو المطلوب .

ولكن هل يمكن :

1-هل يمكن ان تتوحد الرسائل التي تنبهني ان هنالك حقول فارغه برسالة واحده فقط بكل الحقول الفارغة للسجل الواحد ؟

2-وهل يمكنني ان احدد اي حقل يعني اريد ان اختار حقل معين مثلا اختار حقلين فقط (الاسم ورقم الهاتف) وتتغاضى عن بقية الحقول الفارغة من هذا الكود باسم السجلات التي اريدها ؟

Set rst = CurrentDb.OpenRecordset("SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & _
"FROM Students " & _
"WHERE (((Students.ID)=" & [Forms]![Form]![Text0] & "));")

وشكرا

تم تعديل أغسطس 5, 2022 بواسطه النهر العطشان
اضافة كود

**أبوبسمله** · أغسطس 6, 2022

في 5‏/8‏/2022 at 18:04, النهر العطشان said:

ولكن هل يمكن :

1-هل يمكن ان تتوحد الرسائل التي تنبهني ان هنالك حقول فارغه برسالة واحده فقط بكل الحقول الفارغة للسجل الواحد ؟

2-وهل يمكنني ان احدد اي حقل يعني اريد ان اختار حقل معين مثلا اختار حقلين فقط (الاسم ورقم الهاتف) وتتغاضى عن بقية الحقول الفارغة من هذا الكود باسم السجلات التي اريدها ؟

Expand

اتفضل ان شاء الله يكون ما تريد

Private Sub Command2_Click()
If DCount("*", "[Students]", "[ID]=" & Me.Text0) > 0 Then

    Dim rst As DAO.Recordset
    Dim fld As Field
    Dim a As Integer
    Set rst = CurrentDb.OpenRecordset("SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & _
                                        "FROM Students " & _
                                        "WHERE (((Students.ID)=" & [Forms]![Form]![Text0] & "));")

    For a = 1 To rst.RecordCount
        For Each fld In rst.Fields
            If IsNull(fld.Value) Then
                If fld.Name = "Fullname" Or fld.Name = "tel" Then
                    x = fld.Name & vbCrLf & x
                End If
            End If
        Next fld
        rst.MoveNext
    Next a
    
    If Len(x & "") <> 0 Then MsgBox "All Fields Null :" & vbCrLf & x, vbOKOnly, "انتبه"
    
    rst.Close: Set rst = Nothing
    End If

 End Sub

بالتوفيق

exap3_3A.accdbFetching info...

تم تعديل أغسطس 6, 2022 بواسطه احمد الفلاحجي

النهر العطشان · أغسطس 7, 2022

في 6‏/8‏/2022 at 22:23, احمد الفلاحجي said:

اتفضل ان شاء الله يكون ما تريد

Expand

السلام عليكم احمد الفلاحجي استاذنا الفاضل

وهو المطلوب جعلها الله في ميزان حسناتك

وشكرا

**متقاعد** · أغسطس 7, 2022

في 6‏/8‏/2022 at 22:23, احمد الفلاحجي said:

اتفضل ان شاء الله يكون ما تريد

Expand

سؤال استاذ الفاضل احمد ماهي فائدة استخدام حلقتين تكرارية

    For a = 1 To rst.RecordCount
        For Each fld In rst.Fields
            If IsNull(fld.Value) Then

اليست واحدة تكفي لتنفيذ المطلوب وخصوصا اننا نتعامل مع سجل واحد كل مره واذا اردنا استخدام for next بدلا من for each

For x = 0 To rst.Fields.Count - 1
If IsNull(rst.Fields(x)) Then

وايضا لماذا الانتقال للسجل التالي

        rst.MoveNext
    Next a

كما يمكن الاستغناء عن الحلقة التكرارية بالكامل باضافة استعلام واحد نضع فيه حقل محسوب وسوف يؤدي المطلوب ولكن التكرارية هي الحل الامثل

في 5‏/8‏/2022 at 08:12, AbuuAhmed said:

مع الإعتذار لكاتب الأكواد فهي صحيحة ولكن صيغت أولها للإختصار والأخرى لمزيد من الإحتراز.

Expand

احسنت اخي ولكل طريقته

وطالما تحدثنا عن الاختصار ممكن نختصر الكود كاملا الى سبعة او ثمانية اسطر فقط بتحويل الحلقة التكرارية الى وحدة نمطية ثم تقوم بتعويض الحقول الفارغة والمكتمل الى 0 و 1

وايضا ممكن تنفيذ كل المطلوب بدون استخدام vba اي عن طريق استعلام اضافي واستخدام المايكروا وفي هذه الطريقة لن نستطيع اظهار اسماء الحقول وانما فقط رسالة بوجود حقول فارغة

----------------------

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

تحياتي للجميع

**AbuuAhmed** · أغسطس 7, 2022

دالة Nz ، دالة قوية وتغنيك عن استخدام عبارة الـ if ، أو دالة IIf
علما لم أطلع على كل الأكواد ولم أقرأ جميع الردود ولما علقت لم أركز على كاتبها ، ونحن في منتدى نتعلم كل يوم شيء جديد وكثير من الأحيان أبدل فيه طريقتي التي اعتدت عليها لما أرى طريقة جديدة دون التدقيق كثيرا في كاتبها.
لكم كل الود والتقدير.

تم تعديل أغسطس 7, 2022 بواسطه AbuuAhmed
تصحيح أخطاء مطبعية

**متقاعد** · أغسطس 7, 2022

في 7‏/8‏/2022 at 08:46, AbuuAhmed said:

دالة Nz ، دالة قوية وتغنيك عن استخدام عبارة الـ if ، أو دالة IIf

Expand

معلومة جميلة وقيمة

تحياتي

**أبوبسمله** · أغسطس 7, 2022

اخى ومعلمى ووالدى العزيز @مبرمج سابق

تقبل تحياتى اولا واشكرك وجزاك الله كل خير على ما قد نبهتنا اليه

فالحقيقه هو نقد بناء وفعليا لم انتبه له الا عندما اشرت اليه وكلامك صحيح معلمى العزيز ولكن وكما تعلم فاننى اقوم بالتعديل والاجابه ومعظم الوقت مشغول واختطف بعض الوقت حتى يصيبنى واخوتى واساتذتى دعوه تعيننا ع الحياه المريره

في 7‏/8‏/2022 at 06:49, مبرمج سابق said:

اليست واحدة تكفي لتنفيذ المطلوب وخصوصا اننا نتعامل مع سجل واحد كل مره واذا اردنا استخدام for next بدلا من for each

Expand

نعم تكفى وجزاك الله خيرا ع تنبيهك لنا ع ما قد سهونا عنه

تقبلوا تحياتى ومرورى

**متقاعد** · أغسطس 7, 2022

ياهلا بالعم احمد مساك الله بالخير

في 7‏/8‏/2022 at 19:27, احمد الفلاحجي said:

حتى يصيبنى واخوتى واساتذتى دعوه تعيننا ع الحياه المريره

Expand

اسال الله ان يعينك ويسهل امورك ويجعل لك من كل هم فرجا ومن كل ضيق مخرجا

تحياتي يا ابا بسملة 🌹

**أبوبسمله** · أغسطس 7, 2022

في 7‏/8‏/2022 at 19:43, مبرمج سابق said:

اهلا بالعم احمد مساك الله بالخير

في 7‏/8‏/2022 at 19:27, احمد الفلاحجي said:

حتى يصيبنى واخوتى واساتذتى دعوه تعيننا ع الحياه المريره

Expand

اسال الله ان يعينك ويسهل امورك ويجعل لك من كل هم فرجا ومن كل ضيق مخرجا

تحياتي يا ابا بسملة 🌹

Expand

اهلا بوالدى العزيز مساكم الله بكل خير

اللهم آمين واياكم جميعا

في 7‏/8‏/2022 at 06:49, مبرمج سابق said:

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

Expand

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

💐🌹

**متقاعد** · أغسطس 7, 2022

في 7‏/8‏/2022 at 21:10, احمد الفلاحجي said:

معك حق استاذى العزيز

Expand

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

في 7‏/8‏/2022 at 21:10, احمد الفلاحجي said:

ضعيف فى الاكواد مثلى

Expand

في هذه اختلف معك من جهتين اولا هو يحاول التعلم ويعدل على الاكواد فان لم ينجح الان سوف ينجح باذن الله مستقبلا

وفي الجانب الاخر بل انت استاذ وخبير وبشهادة الجميع

تحياتي وتقديري

تسجيل الدخول

رسالة معرفة انا كان هنالك حقل فارغ في سجل

الردود الموصى بها

النهر العطشان

متقاعد

النهر العطشان

متقاعد

النهر العطشان

متقاعد

النهر العطشان

أبوبسمله

kanory

AbuuAhmed

النهر العطشان

أبوبسمله

النهر العطشان

أبوبسمله

النهر العطشان

متقاعد

AbuuAhmed

متقاعد

أبوبسمله

متقاعد

أبوبسمله

متقاعد

Join the conversation

تصفح هذا الموضوع مؤخراً 0 اعضاء متواجدين الان

تصفح الموقع

تصفح جديد الموقع

Support

Important Information