اعلن هنا
أكاديمية الصقر للتدريب
أعلن هنا
أعلن هنا
أعلن هنا
أعلن هنا



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





تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية

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



13-04-2018 10:14 صباحا
وائل شعبان
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-10-2017
رقم العضوية : 1182
المشاركات : 14
الجنس : ذكر
يتابعهم : 2
يتابعونه : 0
قوة السمعة : 26
الاعجاب : 6
 offline 
الأخوة الكرام السلام عليكم
في أول مشاركة لي بمنتداكم الطيب أتمني لكم مزيداً من التوفيق لما يرضي الله
في البداية عذراً أني سأخص بكلامي الأستاذ الفاضل ياسر خليل. باعتباره صاحب العمل الأول الذي أحتاج عليه تعديل جديد وهذا لا يعني أن يحجم من يريد المشاركة والتفاعل
ثانياً هذا هو رابط الموضوع الذي أحتاج التعديل عليه
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
ثالثاً وهو المطلوب أستيراد فقرات نصية من ورقة تكست باد Txt - الإشكال فيها أنها فقرات متوالية بدون سطر فارغ بينها - كما يتم في عمل أخي أبو البراء لملف أكسيل بحيث تكون كل فقرة مستقلة في خلية مستقلة بعد الاستيراد.

مثل علي هذه الفقرات

1) قال جابر بن عبدالله رضي الله عنه: «كان رسول الله  يعرض نفسه على الناس بالموقف فقال: (ألا رجل يحملني إلى قومه فإن قريشاً منعوني أن أبلّغ كلام ربي) رواه أبو داود وصححه الألباني».
2) كان النبي  يسأل القبائل ويقول: (ياأيها الناس: قولوا: لا إله إلا الله تفلحوا) وكان وراءه أبو لهب يسير خلفه ويقول: (إنه صابئ كاذب) وكان أبو لهب يؤذي رسول الله  ويرميه بالحجارة حتى أدمى كعبيه الشريفتين وكان  يفر منه فيعرض عنه ولا يلتفت إليه.





3) كانت بيعة العقبة الأولى في السُّنة الثانية عشرة من البعثة في موسم الحج.
4) كان عدد من كان في بيعة العقبة الأولى اثنى عشر رجلاً ليس منهم نساء كانوا من المدينة.
5) تسمى بيعة العقبة الأولى: (بيعة النساء) وذلك قبل أن يُفرض القتال.
6) بعث رسول الله  مصعب بن عمير للمدينة بعد بيعة العقبة الأولى ليقرئهم ويعلمهم الإسلام ويفقهم في الدين فكان يسمى (مقرئ المدينة) وكان منزله على أسعد بن زرارة.
7) أقام أسعد بن زرارة أول جمعة في المدينة وكانوا أربعين رجلاً وأمهم مصعب بن عمير فقد كتب له رسول الله  أن يجمع بهم.
8) قبل حلول موسم حج السُّنة الثالثة عشر عاد مصعب بن عمير لمكة ليبشر رسول الله  بالنجاح في المدينة بعد توفيق الله عز وجل.
9) كانت بيعة العقبة الثانية في السُّنة الثالثة عشر من البعثة في موسم الحج.
10) الاستدلال بالسنة يعود إلى أمرين هما: 
أ - صحة الحديث.
ب – صحة الاستدلال.
11) الصحيح أن للقرآن نزولين وهما: 
1-    نزل القرآن من اللوح المحفوظ إلى السماء الدنيا كاملاً مكتوباً. 
2-    أن الله سبحانه وتعالى تكلم بالقرآن وأنزله جبريل عليه السلام إلى النبي .

وشكرا جزيلا لكم



تم تحرير الموضوع بواسطة :وائل شعبان
بتاريخ:13-04-2018 10:21 صباحا







13-04-2018 06:25 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
وعليكم السلام أخي الكريم وائل
أهلاً بك في المنتدى ونورت بين إخوانك
يرجى إرفاق الملفات التي تريد العمل عليها ومعها الكود الذي تريد التعديل عليه ليسهل علينا تقديم المساعدة المطلوبة إذا أمكننا ذلك ..
تقبل تحياتي





13-04-2018 06:27 مساء
مشاهدة مشاركة منفردة [2]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
ها هو الملف على ما أعتقد ..يمكنك توضيح المطلوب على ملف واحد وبالصور يكون أفضل لتتضح صورة طلبك فالصورة معبرة أكثر من ألف كلمة
 
 
  Import All Text Files From Specific Folder To Worksheet YasserKhalil Excel-Egy.rar   تحميل rar مرات التحميل :(3)
الحجم :(24.587) KB






13-04-2018 10:24 مساء
مشاهدة مشاركة منفردة [3]
وائل شعبان
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-10-2017
رقم العضوية : 1182
المشاركات : 14
الجنس : ذكر
يتابعهم : 2
يتابعونه : 0
قوة السمعة : 26
الاعجاب : 6
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
أخي أبو البراء كم أسعد بكرم اهتمامك جزاك الله عني خيرا
عذرا للتأخر بالرد فقد كنت خارج المنزل إليك ما طلبت
صورة الملف القديم كان بين كل فقرة نصية وأخرى سطر فارغ
MTUxMjkzMQ1111الملف القديم

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

MjQzODQ0MQ9999الملف الجديد
 
 
  Sample Folder.rar   تحميل rar مرات التحميل :(6)
الحجم :(8.405) KB






14-04-2018 05:36 مساء
مشاهدة مشاركة منفردة [4]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
أخي الكريم وائل
جرب الكود التالي عله يفي بالغرض إن شاء الله
Sub Test()
    Dim a           As Variant
    Dim myDir       As String
    Dim fn          As String
    Dim strCont     As String
    Dim str1        As String
    Dim i           As Long
    Dim r           As Long

    With Application.FileDialog(msoFileDialogFolderPicker)
        If .Show Then myDir = .SelectedItems(1) & "\"
    End With
    If myDir = "" Then Exit Sub
    fn = Dir(myDir & "*.txt")
    r = 1

    Application.ScreenUpdating = False
        With Columns(1)
            .Clear
            .ReadingOrder = xlRTL
            .HorizontalAlignment = xlRight
        End With
    
        Do While fn <> ""
            Cells(r, 1).Value = Replace(fn, ".txt", "")
            Cells(r, 1).Interior.Color = vbCyan
            Cells(r, 1).HorizontalAlignment = xlCenter
            r = r + 1: i = 0
            strCont = LoadFileStr$(myDir & fn)
    
            With CreateObject("VBScript.Regexp")
                .Global = True
                .Pattern = "\d+\)"
                If .Execute(strCont).Count = 0 Then
                    Range("A" & r).Value = strCont
                    GoTo skipper
                End If
                str1 = .Replace(strCont, Chr$(2) & "$&")
            End With
    
            If Left$(str1, 1) = Chr$(2) Then str1 = Mid$(str1, 2)
            a = Split(Replace$(str1, vbCrLf, vbLf), Chr$(2))
    
            For i = LBound(a) To UBound(a)
                If Right$(a(i), 1) = vbLf Then a(i) = Left$(a(i), Len(a(i)) - 1)
            Next i
            a = Application.Transpose(a)
            Range("A" & r).Resize(UBound(a, 1), 1).Value = a
skipper:
            r = Cells(Rows.Count, 1).End(xlUp).Row + 1
    
            fn = Dir
        Loop
    Application.ScreenUpdating = True
End Sub

Function LoadFileStr$(fn$)
    Dim strBOMUTF8  As String
    
    strBOMUTF8 = Chr$(239) & Chr$(187) & Chr$(191)
    
    With CreateObject("Scripting.FileSystemObject")
        LoadFileStr$ = .OpenTextFile(fn, 1).readall
    End With

    If Left$(LoadFileStr$, 3) <> strBOMUTF8 Then Exit Function

    With CreateObject("ADODB.Stream")
        .Charset = "utf-8"
        .Open
        .LoadFromFile fn$
        LoadFileStr$ = .ReadText()
        .Close
    End With
End Function

أثارت هذه المشاركة إعجاب: وائل شعبان،




14-04-2018 06:52 مساء
مشاهدة مشاركة منفردة [5]
وائل شعبان
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-10-2017
رقم العضوية : 1182
المشاركات : 14
الجنس : ذكر
يتابعهم : 2
يتابعونه : 0
قوة السمعة : 26
الاعجاب : 6
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
أخي وأستاذي العزيز أبو البراء
جزاك الله خيرا كعادتك مبدع فيما يخرج عن فكرك ويدك ما شاء الله
الأمر تم ولكن اسمح لي بإبداء ملاحظة يبدو أن الفصل بين الفقرات تم بدلالة القوس الموجود بعد الترقيم في أول السطور وهذا بالفعل موجود بالملف الذي تم رفعه وقد نجح الأمر معه بالفعل.
ولكن ما كنت أقصده ضمناً أن يكون كود الفصل بين الفقرات عاماً لا خاصاً بهذا الملف فقط دون غيره حتي لا أتعب حضرتك كلما تجدد لدي ملف بشكل مختلف في شكل إدخال بياناته أي بدون التقيد بدلالة شيء معين في الفقرة لأني قد جربت الأمر علي ملف أخر فقراته النصية مختلفة في الترقيم ويمكن أن تكون هناك ملفات أخري بغير ترقيم من الأساس وفلم ينجح الكود معها لأنه مقيد بدلالة معينة في عمله إذا لم يجدها فينقل كافة البيانات كما يظهر بالصورة
MzY3MTg5MQ9191ملف أخر جديد
هنا سيأتي سؤالك المهم والذي أعرفه مسبقاً وهو كيف سوف يفهم الاكسيل الفرق بين نهاية كل فقرة وأخري والجواب بحق لا أعلم
إن قلت لك نجعلها بدلالة النقطة في نهاية كل فقرة فسوف نجد فقرات بلا نقاط في نهايتها
وسوف نجد أيضا فقرة واحدة بها بعض النقاط الفرعية منها وكل منها في سطر مستقل وتاخذ نقطة وبهذا سيعتبر كل سطر فقرة وهم في الحقيقة فقرة واحدة.

شاكرا لك حسن الاهتمام وكرم الاستقبال لا أريد ان أشق عليك إن لم يكن لذلك الإشكال حل فسوف أضطر للعمل بشكل يدوي والله المستعان
 
 






14-04-2018 09:24 مساء
مشاهدة مشاركة منفردة [6]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
بارك الله فيك أخي الكريم وائل
العمل في البرمجة يخضع للمنطق .. لابد من منطق واضح للتعامل مع أي مشكلة
وهنا أنت لا تدري المنطق في البيانات التي لديك وكما ذكرت كل ملف وله هيكل مختلف
بخصوص الاعتماد على الفقرات لا يوجد ما يشير إلى ذلك ، فالفاصل بين الأسطر والفقرات هو هو وهذا غير منطقي .. انظر إلى الصورة التالية (رقم 23)
31kRlhEOpdkxxr1

هنا ستجد أن نهاية الأسطر نفس نهاية الفقرات مما يجعل النتائج غير صحيحة ..
هذا والله أعلم
 
 






14-04-2018 10:10 مساء
مشاهدة مشاركة منفردة [7]
وائل شعبان
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-10-2017
رقم العضوية : 1182
المشاركات : 14
الجنس : ذكر
يتابعهم : 2
يتابعونه : 0
قوة السمعة : 26
الاعجاب : 6
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
وفيك بارك الله أخي الفاضل
دعني أفكر معك بصوت مسموع في محاولة أخيرة للحل من خلال طرح هذا التساؤل هل يستطيع الاكسيل التميز بين الفقرة المنتهية بـ أنتر سواء تم الفصل بينها وبين السطر التالي بسطر فارغ أم لا؟
أو بمعني أخر في البرامج التي تتيح الكتابة عند الانتهاء من كتابة فقرة أو جملة من سطرين أو ثلاثة وعند الانتقال لسطر جديد يتم الضغط علي زر الانتر لتنفيذ ذلك والاستعداد لبداية الكتابة في سطر جديد لفقرة جديدة فهل يستطيع الاكسيل التمييز بين تلاصق الفقرات النصية سواء اكان الانتقال بينها بأنتر أم لا؟
والغرض من ذلك إذا كان الاكسيل يستطيع تمييز هذا الانتر بين الفقرات بدون سطر فارغ بينها فنستطيع جعل الاكسيل من خلال الكود يضع نقطة علي نهاية الفقرات وبعدها تكون هذه النقطة هي دلالة الفصل في الكود لفصل الفقرات وهذا رغم أن نتائجه لن تكون صحيحة بنسبة 100% ولكنه سيكون حلاً عملياً معقولاً بإذن الله.

- والآن بقي لي إشكال أخير يواجهني في هذا الموضوع إذا كان بالصدر وسع للتفاعل في حله إذا أمكن 
حيث يحلو للبعض عند كتابة جملة ما كتابتها باستخدام مسافة لتكبير أو تمديد الكلام والتي يمكن كتابتها بين الحروف من خلال الضغط علي مفتاحي ( شفت + حرف ت ) أثناء الكتابة باللغة العربية مثل: بـــــســـــم الله الــــرحـــمــــن الــــرحــــيـــــم
والمطلوب هل يمكن عمل كود لإلغاء هذه المسافة بين الحروف أياً كان عددها أو تكرارها حتي تعود الجملة أو الكلام إلي طبيعته الأولي بدون هذه المسافة والعلة من ذلك أن هذه الجمل أو الكلمات التي تحتوي هذه المسافة لا تظهر عند البحث لأن خاصية وآليه البحث لا ترجعها إلي معني الكلمة بدون هذه المسافة.

ارجو أني وفقت في توضيح المراد حتي لا أتعبك مع خالص شكرى وتحياتي وتمنياتي لك بالتوفيق والسداد دائماً 





14-04-2018 10:35 مساء
مشاهدة مشاركة منفردة [8]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
أخي الكريم وائل
أولاً لا يجب طرح طلب جديد داخل نفس الموضوع ، حيث يخصص موضوع لكل طلب .. لأسباب منها تيسير عمليات البحث مستقبلاً إن شاء الله وأمر آخر هو عدم التشتت ..
يمكنك طرح موضوع جديد بالطلب الجديد الخاص بإلغاء المسافات بين الحروف وإن شاء الله تجد استجابة من إخوانك بالمنتدى

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





15-04-2018 01:04 مساء
مشاهدة مشاركة منفردة [9]
وائل شعبان
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-10-2017
رقم العضوية : 1182
المشاركات : 14
الجنس : ذكر
يتابعهم : 2
يتابعونه : 0
قوة السمعة : 26
الاعجاب : 6
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
أخي الكريم أبو البراء بارك الله فيك
أود أن تسمح لي مشكوراً باستفسار وإضافة للكود الذي تفضلت به حلاً لهذا الموضوع
1- ما هو موقع تغير القوس في الكود حتي أستطيع أن أغيره بنفسي إذا كان ذلك بالأمكان لانتفع بهذا الكود بجعله مرناً واستخدامه مع ملفات أخري ليس بها أقواس بعد الترقيم بل علامات أخري مثل الشرطة أو النجمة أو النقطة ألخ
2- ارجو أن تضيف للكود إمكانية وضع ( نقطة بدون مسافة ) في نهاية الفقرات التي لا تنتهي بنقطة في نهايتها حتي تتوحد الفقرات كلها مع ملاحظة أني أقصد الفقرة المنتهية بأنتر مهما كان عدد سطورها.
ارجو ألا أكون قد أثقلت عليك وأن يكون المطلوب واضحاً مع خالص التحية والتقدير





15-04-2018 05:30 مساء
مشاهدة مشاركة منفردة [10]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
توجد علامة القوس في هذا السطر
.Pattern = "\d+\)"

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

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





15-04-2018 06:56 مساء
مشاهدة مشاركة منفردة [11]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
أخي الكريم وائل
حاول إرفاق كذا ملف نصي مع حذف معظم الأسطر لكي يكون الملف بسيط ويمكن اختبار الأكواد من خلاله على أن تكون الملفات منوعة كما هي لديك وإن شاء الله أحاول في أي وقت العمل عليها مجدداً .. هذا ليس وعد لأنني لا أملك الوقت ، ولكن أقول سأحاول إن شاء الله





15-04-2018 08:32 مساء
مشاهدة مشاركة منفردة [12]
وائل شعبان
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-10-2017
رقم العضوية : 1182
المشاركات : 14
الجنس : ذكر
يتابعهم : 2
يتابعونه : 0
قوة السمعة : 26
الاعجاب : 6
 offline 
look/images/icons/i1.gif تجميع فقرات نصية من ملف txt دون فتحها إلى الاكسيل دفعة واحدة بحيث يكون لكل فقرة خلية
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريبالملف في المرفق كما طلبت حضرتك وشاكر لك اهتمامك رغم مشاغلك أعانك الله وبارك لك في وقتك وعافيتك

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  Sample Folder.rar   تحميل rar مرات التحميل :(3)
الحجم :(8.455) KB








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


 







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



الساعة الآن 10:06 مساء

أعلن هنا
أعلن هنا
أعلن هنا