كل الانشطه

السلام عليكم ورحمه الله من فضلكم هل من الممكن ان استخرج تقرير في اكسس مثل الصورة المرفقه يكون فيه الرقم والتاريخ مدمجان واحدهما اسفل الاخر كما في الصوره والمثال المرفق مجلد جديد (3).rar

السلام عليكم الاخوة الافاضل في هذا المنتدى الجميل في هذا الموضوع اريد معرفة ترتيب كل طالب من مجموع الطلاب (بما في ذلك عند القيام بعملية الفلترة يعطيني الترتيب وكذا مجموع الطلاب) من النموذج frm_examen_fin_formation اختار: السنة ثم الدرجة ثم البلد ثم افتح النموذج frm_modul في النموذج frm_modul : يعرض أسماء الطلبة حسب ما تم اختياره من النموذج السابق في هذا النموذج frm_modul أريد أن أعرف (الترتيب) الخاص بكل طالب من مجموع الطلاب وقد أضفت مربعي نص هما: ترتيب الطالب و مجموع الطلاب مثال فقط: من النموذج frm_examen_fin_formation اختار: السنة: 2022/2021 الدرجة: مساعد مهندس البلد: عمان ثم افتح النموذج frm_modul نلاحظ وجود 8 طلاب ما أريده من فضلكم هو أن أضع في مربعي النص الموجودين في النموذج : ترتيب كل طلاب : .... (الترتيب حسب المعدل العام من الأكبر إلى الأصغر) مجموع الطلاب: هو تلقائا 8 حسب ما تم اختياره من النموذج السابق وهذا الكود يجب أن يشتغل مع عملية الفلترة و انهاء الفلترة (الأكواد موجودة للفلترة وانهاء الفلترة) يعني يعطيني في حالة البحث عن طالب يعطيني ترتيب هذا طالب وكذا مجموع الطلاب أنا حاولت محاولة ضعيفة اشتغلت معي لكن في عملية الفلترة وانهاء الفلترة لا يعطيني ترتيب كل طالب * حاجة ثانية من فضلكم أريد ان اعرف العلاقة صحيحة الموجودة بين الجدولين info_stagiere و modul بين الحقلين ID و id لاني استعملتها كثيرا في جداول مختلفة الرجاء المساعدة والتوجيه وبارك الله فيكم baseC.accdb

فى انتظار المرفق ان شاء الله بعد انتهائك من تجميع الافكار وفق فكرتك العبقرية

شكرا لاخي @ابو جودي سبقني بالحل الناجع ............................. ولكني حاولت تجميع فكرة في تصميم برنامج خاص بتعديل خصائص العناصر ::: مميزاته::::: - ممكن استخدامه للقاعدة الحالية أو قاعدة خارجية - اختيار الشكل المناسب من بين مجموعة اشكال ممكن يحتفظ بها المصمم لبرامج اخرى - اختيار نموذج من القاعدة الحالية او نموذج القاعدة الخارجية لمعاينة الشكل ( طبعا المعاينة لا تغير من خصائص عناصر النموذج ولكن للمشاهدة فقط) - يمكن تعديل الشكل ومعاينة النموذج المختار - بعد اختيار الشكل المناسب يتم الضغط عل تطبيق فيتم تطبيق الشكل على كامل النماذج في القاعدة ( سواءا الحالية _ او الخارخية ) - للاسف لم يسعفني الوقت لاكمال التصميم بسبب انشغالي هذه الفترة

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

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

ادامك الله فوق رؤسنا وحفظكم لنا ولأحبابكم الحمد لله الذى تتم بنعمته الصالحات

وعليكم السلام ورحمة الله وبركاته 🤗 باعتقادي ، وبما أنك تجعل اسم الوثيقة هو رقم ، فهنا يجب أن تجعل اسم الوثيقة مربوطاً أيضاً برقم الموظف ( الأفضل ) ، أو اسم الموظف على سبيل المثال . هنا الوثيقة 1 للموظف1 ستختلف في الاسم عن الوثيقة 1 للموظف2 ، صحيح 😁 . لم أطلع على الملف ، أتابع من الهاتف حالياً.

نعم .. نعم .. هو كذا يا باشمهندس كذا الشغل والا بلاش .. سلمت أناملك .. وفكرك

ليس بغريب عليك جراح اكسس فعلا وعملاق في افكارك الله ينور عليك يا دك

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

أهلاً يا فنان .. وحشتني يا راجل ، طمني عنك عامل إيه 🤗 .. الله يبارك فيك على كلامك اللطيف الجميل 😇😇

اعتقد أن اللقب الجديد مش هيضيف للبروف شئ جديد لأنه من يزين الألقاب مجدا الف الف مبروك يا بروف دائما موفق

السلام عليكم استاذى الجليل و معلمى القدير و والدى الحبيب الاستاذ @ابوخليل ممتاز الان اتضحت لى الفكرة تمام انا كانت فكرتى ان لا اقوم بتعديل الاعدادت داخل كافة النماذج ولكن فقط تطبيق الاعدادت الجديدة مع الاحتفاظ بالوضع الاصلى عند التصميم ولكن حضرتك تريد فتح كافة النماذج فى وضع التصميم وتطبيق كل التعديلات على كافة النماذج لخدمة المصمم وطامل انها لخدمة المصمم فقط وتريد كل الاكواد فى النموذج دون الاعتماد على وحدات نمطية ليسهل استخدام النموذج وما بجعبته مع اى قاعدة أخرى بمجرد نسخه اليها لقد قمت بكتابة الكود بالشكل التالى : Option Compare Database Option Explicit '' ======= التصريحات والثوابت #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 #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 LongPtr 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 Long End Type #End If Private Enum SectionType stHeader = acHeader stDetail = acDetail stFooter = acFooter End Enum Private Enum ControlType ctTextBox = acTextBox ctComboBox = acComboBox ctListBox = acListBox ctLabel = acLabel ctCommandButton = acCommandButton End Enum Private Const COLOR_UNSET As Long = -1 Private Const TABLE_NAME_THEME_SETTINGS As String = "tblThemeSettings" Private Const FIELD_NAME As String = "SettingName" Private Const FIELD_VALUE As String = "SettingValue" Private Theme As Object Private DebugMode As Boolean '' ======= إنشاء القاموس عند بدء التشغيل Private Sub InitializeThemeDictionary() Set Theme = CreateObject("Scripting.Dictionary") Theme.Add "Header", CreateObject("Scripting.Dictionary") Theme("Header").Add "SectionBack", COLOR_UNSET Theme("Header").Add "TextBack", COLOR_UNSET Theme("Header").Add "TextBorder", COLOR_UNSET Theme("Header").Add "TextFont", COLOR_UNSET Theme("Header").Add "LabelBack", COLOR_UNSET Theme("Header").Add "LabelBorder", COLOR_UNSET Theme("Header").Add "LabelFont", COLOR_UNSET Theme.Add "Detail", CreateObject("Scripting.Dictionary") Theme("Detail").Add "SectionBack", COLOR_UNSET Theme("Detail").Add "TextBack", COLOR_UNSET Theme("Detail").Add "TextBorder", COLOR_UNSET Theme("Detail").Add "TextFont", COLOR_UNSET Theme("Detail").Add "LabelBack", COLOR_UNSET Theme("Detail").Add "LabelBorder", COLOR_UNSET Theme("Detail").Add "LabelFont", COLOR_UNSET Theme.Add "Footer", CreateObject("Scripting.Dictionary") Theme("Footer").Add "SectionBack", COLOR_UNSET Theme("Footer").Add "TextBack", COLOR_UNSET Theme("Footer").Add "TextBorder", COLOR_UNSET Theme("Footer").Add "TextFont", COLOR_UNSET Theme("Footer").Add "LabelBack", COLOR_UNSET Theme("Footer").Add "LabelBorder", COLOR_UNSET Theme("Footer").Add "LabelFont", COLOR_UNSET Theme.Add "Button", CreateObject("Scripting.Dictionary") Theme("Button").Add "Back", COLOR_UNSET Theme("Button").Add "Border", COLOR_UNSET Theme("Button").Add "Font", COLOR_UNSET Theme("Button").Add "Hover", COLOR_UNSET Theme("Button").Add "Pressed", COLOR_UNSET Theme("Button").Add "HoverFore", COLOR_UNSET Theme("Button").Add "PressedFore", COLOR_UNSET Theme.Add "Combo", CreateObject("Scripting.Dictionary") Theme("Combo").Add "Back", COLOR_UNSET Theme("Combo").Add "Border", COLOR_UNSET Theme("Combo").Add "Font", COLOR_UNSET Theme.Add "List", CreateObject("Scripting.Dictionary") Theme("List").Add "Back", COLOR_UNSET Theme("List").Add "Border", COLOR_UNSET Theme("List").Add "Font", COLOR_UNSET End Sub '' ======= أحداث النموذج Private Sub Form_Load() InitializeThemeDictionary EnsureThemeTableExists LoadThemeFromTable End Sub Private Sub btnSaveAndApply_Click() SaveThemeToTable ApplyThemeToAllForms MsgBox "تم تطبيق الثيم بنجاح.", vbInformation End Sub Private Sub btnApplyDefaultThemeToCurrentForm_Click() SetDefaultThemeValues ApplyThemePreview End Sub '' ======= أزرار تغيير الألوان Private Sub btnHeaderSectionColor_Click() Dim lngColor As Long lngColor = Theme("Header")("SectionBack") ApplySectionColor lngColor, stHeader Theme("Header")("SectionBack") = lngColor ApplyThemePreview End Sub Private Sub btnHeaderControlBack_Click() Dim lngColor As Long lngColor = Theme("Header")("TextBack") HandleColorPick lngColor, "BackColor", ctTextBox, stHeader Theme("Header")("TextBack") = lngColor ApplyThemePreview End Sub Private Sub btnHeaderControlBorder_Click() Dim lngColor As Long lngColor = Theme("Header")("TextBorder") HandleColorPick lngColor, "BorderColor", ctTextBox, stHeader Theme("Header")("TextBorder") = lngColor ApplyThemePreview End Sub Private Sub btnHeaderControlFore_Click() Dim lngColor As Long lngColor = Theme("Header")("TextFont") HandleColorPick lngColor, "ForeColor", ctTextBox, stHeader Theme("Header")("TextFont") = lngColor ApplyThemePreview End Sub Private Sub btnHeaderLabelBack_Click() Dim lngColor As Long lngColor = Theme("Header")("LabelBack") HandleColorPick lngColor, "BackColor", ctLabel, stHeader Theme("Header")("LabelBack") = lngColor ApplyThemePreview End Sub Private Sub btnHeaderLabelBorder_Click() Dim lngColor As Long lngColor = Theme("Header")("LabelBorder") HandleColorPick lngColor, "BorderColor", ctLabel, stHeader Theme("Header")("LabelBorder") = lngColor ApplyThemePreview End Sub Private Sub btnHeaderLabelFore_Click() Dim lngColor As Long lngColor = Theme("Header")("LabelFont") HandleColorPick lngColor, "ForeColor", ctLabel, stHeader Theme("Header")("LabelFont") = lngColor ApplyThemePreview End Sub Private Sub btnDetailSectionColor_Click() Dim lngColor As Long lngColor = Theme("Detail")("SectionBack") ApplySectionColor lngColor, stDetail Theme("Detail")("SectionBack") = lngColor ApplyThemePreview End Sub Private Sub btnDetailControlBack_Click() Dim lngColor As Long lngColor = Theme("Detail")("TextBack") HandleColorPick lngColor, "BackColor", ctTextBox, stDetail Theme("Detail")("TextBack") = lngColor ApplyThemePreview End Sub Private Sub btnDetailControlBorder_Click() Dim lngColor As Long lngColor = Theme("Detail")("TextBorder") HandleColorPick lngColor, "BorderColor", ctTextBox, stDetail Theme("Detail")("TextBorder") = lngColor ApplyThemePreview End Sub Private Sub btnDetailControlFore_Click() Dim lngColor As Long lngColor = Theme("Detail")("TextFont") HandleColorPick lngColor, "ForeColor", ctTextBox, stDetail Theme("Detail")("TextFont") = lngColor ApplyThemePreview End Sub Private Sub btnDetailLabelBack_Click() Dim lngColor As Long lngColor = Theme("Detail")("LabelBack") HandleColorPick lngColor, "BackColor", ctLabel, stDetail Theme("Detail")("LabelBack") = lngColor ApplyThemePreview End Sub Private Sub btnDetailLabelBorder_Click() Dim lngColor As Long lngColor = Theme("Detail")("LabelBorder") HandleColorPick lngColor, "BorderColor", ctLabel, stDetail Theme("Detail")("LabelBorder") = lngColor ApplyThemePreview End Sub Private Sub btnDetailLabelFore_Click() Dim lngColor As Long lngColor = Theme("Detail")("LabelFont") HandleColorPick lngColor, "ForeColor", ctLabel, stDetail Theme("Detail")("LabelFont") = lngColor ApplyThemePreview End Sub Private Sub btnFooterSectionColor_Click() Dim lngColor As Long lngColor = Theme("Footer")("SectionBack") ApplySectionColor lngColor, stFooter Theme("Footer")("SectionBack") = lngColor ApplyThemePreview End Sub Private Sub btnFooterControlBack_Click() Dim lngColor As Long lngColor = Theme("Footer")("TextBack") HandleColorPick lngColor, "BackColor", ctTextBox, stFooter Theme("Footer")("TextBack") = lngColor ApplyThemePreview End Sub Private Sub btnFooterControlBorder_Click() Dim lngColor As Long lngColor = Theme("Footer")("TextBorder") HandleColorPick lngColor, "BorderColor", ctTextBox, stFooter Theme("Footer")("TextBorder") = lngColor ApplyThemePreview End Sub Private Sub btnFooterControlFore_Click() Dim lngColor As Long lngColor = Theme("Footer")("TextFont") HandleColorPick lngColor, "ForeColor", ctTextBox, stFooter Theme("Footer")("TextFont") = lngColor ApplyThemePreview End Sub Private Sub btnFooterLabelBack_Click() Dim lngColor As Long lngColor = Theme("Footer")("LabelBack") HandleColorPick lngColor, "BackColor", ctLabel, stFooter Theme("Footer")("LabelBack") = lngColor ApplyThemePreview End Sub Private Sub btnFooterLabelBorder_Click() Dim lngColor As Long lngColor = Theme("Footer")("LabelBorder") HandleColorPick lngColor, "BorderColor", ctLabel, stFooter Theme("Footer")("LabelBorder") = lngColor ApplyThemePreview End Sub Private Sub btnFooterLabelFore_Click() Dim lngColor As Long lngColor = Theme("Footer")("LabelFont") HandleColorPick lngColor, "ForeColor", ctLabel, stFooter Theme("Footer")("LabelFont") = lngColor ApplyThemePreview End Sub Private Sub btnCommandBack_Click() Dim lngColor As Long lngColor = Theme("Button")("Back") HandleColorPick lngColor, "BackColor", ctCommandButton Theme("Button")("Back") = lngColor ApplyThemePreview End Sub Private Sub btnCommandBorder_Click() Dim lngColor As Long lngColor = Theme("Button")("Border") HandleColorPick lngColor, "BorderColor", ctCommandButton Theme("Button")("Border") = lngColor ApplyThemePreview End Sub Private Sub btnCommandFore_Click() Dim lngColor As Long lngColor = Theme("Button")("Font") HandleColorPick lngColor, "ForeColor", ctCommandButton Theme("Button")("Font") = lngColor ApplyThemePreview End Sub Private Sub btnCommandHover_Click() Dim lngColor As Long lngColor = Theme("Button")("Hover") lngColor = PickColorFromBase(lngColor) Theme("Button")("Hover") = lngColor ApplyThemePreview End Sub Private Sub btnCommandPressed_Click() Dim lngColor As Long lngColor = Theme("Button")("Pressed") lngColor = PickColorFromBase(lngColor) Theme("Button")("Pressed") = lngColor ApplyThemePreview End Sub Private Sub btnCommandHoverFore_Click() Dim lngColor As Long lngColor = Theme("Button")("HoverFore") lngColor = PickColorFromBase(lngColor) Theme("Button")("HoverFore") = lngColor ApplyThemePreview End Sub Private Sub btnCommandPressedFore_Click() Dim lngColor As Long lngColor = Theme("Button")("PressedFore") lngColor = PickColorFromBase(lngColor) Theme("Button")("PressedFore") = lngColor ApplyThemePreview End Sub Private Sub btnComboBack_Click() Dim lngColor As Long lngColor = Theme("Combo")("Back") HandleColorPick lngColor, "BackColor", ctComboBox Theme("Combo")("Back") = lngColor ApplyThemePreview End Sub Private Sub btnComboBorder_Click() Dim lngColor As Long lngColor = Theme("Combo")("Border") HandleColorPick lngColor, "BorderColor", ctComboBox Theme("Combo")("Border") = lngColor ApplyThemePreview End Sub Private Sub btnComboFore_Click() Dim lngColor As Long lngColor = Theme("Combo")("Font") HandleColorPick lngColor, "ForeColor", ctComboBox Theme("Combo")("Font") = lngColor ApplyThemePreview End Sub Private Sub btnListBack_Click() Dim lngColor As Long lngColor = Theme("List")("Back") HandleColorPick lngColor, "BackColor", ctListBox Theme("List")("Back") = lngColor ApplyThemePreview End Sub Private Sub btnListBorder_Click() Dim lngColor As Long lngColor = Theme("List")("Border") HandleColorPick lngColor, "BorderColor", ctListBox Theme("List")("Border") = lngColor ApplyThemePreview End Sub Private Sub btnListFore_Click() Dim lngColor As Long lngColor = Theme("List")("Font") HandleColorPick lngColor, "ForeColor", ctListBox Theme("List")("Font") = lngColor ApplyThemePreview End Sub '' ======= قيم افتراضية Private Sub SetDefaultThemeValues() Theme("Header")("SectionBack") = RGB(230, 230, 250) Theme("Header")("TextBack") = RGB(255, 255, 255) Theme("Header")("TextBorder") = RGB(180, 180, 180) Theme("Header")("TextFont") = RGB(0, 0, 0) Theme("Header")("LabelBack") = RGB(240, 240, 240) Theme("Header")("LabelBorder") = RGB(240, 240, 240) Theme("Header")("LabelFont") = RGB(0, 0, 0) Theme("Detail")("SectionBack") = RGB(255, 255, 255) Theme("Detail")("TextBack") = RGB(255, 255, 255) Theme("Detail")("TextBorder") = RGB(180, 180, 180) Theme("Detail")("TextFont") = RGB(0, 0, 0) Theme("Detail")("LabelBack") = RGB(240, 240, 240) Theme("Detail")("LabelBorder") = RGB(240, 240, 240) Theme("Detail")("LabelFont") = RGB(0, 0, 0) Theme("Footer")("SectionBack") = RGB(245, 245, 245) Theme("Footer")("TextBack") = RGB(255, 255, 255) Theme("Footer")("TextBorder") = RGB(180, 180, 180) Theme("Footer")("TextFont") = RGB(0, 0, 0) Theme("Footer")("LabelBack") = RGB(240, 240, 240) Theme("Footer")("LabelBorder") = RGB(240, 240, 240) Theme("Footer")("LabelFont") = RGB(0, 0, 0) Theme("Button")("Back") = RGB(220, 220, 220) Theme("Button")("Border") = RGB(180, 180, 180) Theme("Button")("Font") = RGB(0, 0, 0) Theme("Button")("Hover") = RGB(200, 200, 255) Theme("Button")("Pressed") = RGB(150, 150, 220) Theme("Button")("HoverFore") = RGB(0, 0, 80) Theme("Button")("PressedFore") = RGB(255, 255, 255) Theme("Combo")("Back") = RGB(255, 255, 255) Theme("Combo")("Border") = RGB(160, 160, 160) Theme("Combo")("Font") = RGB(0, 0, 0) Theme("List")("Back") = RGB(255, 255, 255) Theme("List")("Border") = RGB(180, 180, 180) Theme("List")("Font") = RGB(0, 0, 0) End Sub '' ======= دوال مساعدة Private Function PickColorFromBase(Optional ByVal lngStartColor As Long = -1) As Long Dim cc As CHOOSECOLOR Dim aColors(15) As Long cc.lStructSize = LenB(cc) cc.hwndOwner = Application.hWndAccessApp cc.lpCustColors = VarPtr(aColors(0)) If lngStartColor <> -1 Then cc.rgbResult = lngStartColor cc.Flags = &H1 End If If CHOOSECOLOR(cc) Then PickColorFromBase = cc.rgbResult Else PickColorFromBase = COLOR_UNSET End If End Function Private Sub HandleColorPick(ByRef lngTargetVar As Long, ByVal strProperty As String, ByVal lngControlType As Long, Optional ByVal lngSection As Variant) Dim lngNewColor As Long Dim ctl As Control Dim bolMatchSection As Boolean lngNewColor = PickColorFromBase(lngTargetVar) If lngNewColor = COLOR_UNSET Then Exit Sub lngTargetVar = lngNewColor For Each ctl In Me.Controls If ctl.ControlType = lngControlType Then On Error Resume Next bolMatchSection = (IsMissing(lngSection) Or ctl.section = lngSection) On Error GoTo 0 If bolMatchSection Then On Error Resume Next CallByName ctl, strProperty, VbLet, lngNewColor On Error GoTo 0 End If End If Next ctl End Sub Private Sub ApplySectionColor(ByRef lngTargetVar As Long, ByVal lngSection As Long) Dim lngNewColor As Long lngNewColor = PickColorFromBase(lngTargetVar) If lngNewColor <> COLOR_UNSET Then lngTargetVar = lngNewColor Me.section(lngSection).BackColor = lngNewColor End If End Sub Private Sub ApplyThemePreview() Dim ctl As Control Dim sec As String If Theme("Header")("SectionBack") <> COLOR_UNSET Then Me.section(stHeader).BackColor = Theme("Header")("SectionBack") If Theme("Detail")("SectionBack") <> COLOR_UNSET Then Me.section(stDetail).BackColor = Theme("Detail")("SectionBack") If Theme("Footer")("SectionBack") <> COLOR_UNSET Then Me.section(stFooter).BackColor = Theme("Footer")("SectionBack") For Each ctl In Me.Controls Select Case ctl.ControlType Case ctTextBox Select Case ctl.section Case stHeader: sec = "Header" Case stDetail: sec = "Detail" Case stFooter: sec = "Footer" Case Else: GoTo NextControl End Select If Theme(sec)("TextBack") <> COLOR_UNSET Then ctl.BackColor = Theme(sec)("TextBack") If Theme(sec)("TextBorder") <> COLOR_UNSET Then ctl.BorderColor = Theme(sec)("TextBorder") If Theme(sec)("TextFont") <> COLOR_UNSET Then ctl.ForeColor = Theme(sec)("TextFont") Case ctComboBox If Theme("Combo")("Back") <> COLOR_UNSET Then ctl.BackColor = Theme("Combo")("Back") If Theme("Combo")("Border") <> COLOR_UNSET Then ctl.BorderColor = Theme("Combo")("Border") If Theme("Combo")("Font") <> COLOR_UNSET Then ctl.ForeColor = Theme("Combo")("Font") Case ctListBox If Theme("List")("Back") <> COLOR_UNSET Then ctl.BackColor = Theme("List")("Back") If Theme("List")("Border") <> COLOR_UNSET Then ctl.BorderColor = Theme("List")("Border") If Theme("List")("Font") <> COLOR_UNSET Then ctl.ForeColor = Theme("List")("Font") Case ctLabel Select Case ctl.section Case stHeader: sec = "Header" Case stDetail: sec = "Detail" Case stFooter: sec = "Footer" Case Else: GoTo NextControl End Select If Theme(sec)("LabelBack") <> COLOR_UNSET Then ctl.BackColor = Theme(sec)("LabelBack") If Theme(sec)("LabelBorder") <> COLOR_UNSET Then ctl.BorderColor = Theme(sec)("LabelBorder") If Theme(sec)("LabelFont") <> COLOR_UNSET Then ctl.ForeColor = Theme(sec)("LabelFont") Case ctCommandButton If Theme("Button")("Back") <> COLOR_UNSET Then ctl.BackColor = Theme("Button")("Back") If Theme("Button")("Border") <> COLOR_UNSET Then ctl.BorderColor = Theme("Button")("Border") If Theme("Button")("Font") <> COLOR_UNSET Then ctl.ForeColor = Theme("Button")("Font") On Error Resume Next If Theme("Button")("Hover") <> COLOR_UNSET Then ctl.HoverColor = Theme("Button")("Hover") If Theme("Button")("Pressed") <> COLOR_UNSET Then ctl.PressedColor = Theme("Button")("Pressed") If Theme("Button")("HoverFore") <> COLOR_UNSET Then ctl.HoverForeColor = Theme("Button")("HoverFore") If Theme("Button")("PressedFore") <> COLOR_UNSET Then ctl.PressedForeColor = Theme("Button")("PressedFore") On Error GoTo 0 End Select NextControl: Next ctl End Sub Private Sub EnsureThemeTableExists() Dim db As DAO.Database Dim tdf As DAO.TableDef Set db = CurrentDb On Error Resume Next Set tdf = db.TableDefs(TABLE_NAME_THEME_SETTINGS) On Error GoTo 0 If tdf Is Nothing Then db.Execute "CREATE TABLE " & TABLE_NAME_THEME_SETTINGS & " (" & _ FIELD_NAME & " TEXT(50) PRIMARY KEY, " & _ FIELD_VALUE & " LONG)", dbFailOnError End If End Sub Private Sub SaveColorSetting(ByRef rs As DAO.Recordset, ByVal strName As String, ByVal lngValue As Long) rs.FindFirst FIELD_NAME & "='" & strName & "'" If rs.NoMatch Then rs.AddNew rs(FIELD_NAME) = strName rs(FIELD_VALUE) = lngValue rs.Update ElseIf rs(FIELD_VALUE) <> lngValue Then rs.Edit rs(FIELD_VALUE) = lngValue rs.Update End If End Sub Private Sub SaveThemeToTable() Dim rs As DAO.Recordset Set rs = CurrentDb.OpenRecordset(TABLE_NAME_THEME_SETTINGS, dbOpenDynaset) SaveColorSetting rs, "Header_SectionBack", Theme("Header")("SectionBack") SaveColorSetting rs, "Header_TextBack", Theme("Header")("TextBack") SaveColorSetting rs, "Header_TextBorder", Theme("Header")("TextBorder") SaveColorSetting rs, "Header_TextFont", Theme("Header")("TextFont") SaveColorSetting rs, "Header_LabelBack", Theme("Header")("LabelBack") SaveColorSetting rs, "Header_LabelBorder", Theme("Header")("LabelBorder") SaveColorSetting rs, "Header_LabelFont", Theme("Header")("LabelFont") SaveColorSetting rs, "Detail_SectionBack", Theme("Detail")("SectionBack") SaveColorSetting rs, "Detail_TextBack", Theme("Detail")("TextBack") SaveColorSetting rs, "Detail_TextBorder", Theme("Detail")("TextBorder") SaveColorSetting rs, "Detail_TextFont", Theme("Detail")("TextFont") SaveColorSetting rs, "Detail_LabelBack", Theme("Detail")("LabelBack") SaveColorSetting rs, "Detail_LabelBorder", Theme("Detail")("LabelBorder") SaveColorSetting rs, "Detail_LabelFont", Theme("Detail")("LabelFont") SaveColorSetting rs, "Footer_SectionBack", Theme("Footer")("SectionBack") SaveColorSetting rs, "Footer_TextBack", Theme("Footer")("TextBack") SaveColorSetting rs, "Footer_TextBorder", Theme("Footer")("TextBorder") SaveColorSetting rs, "Footer_TextFont", Theme("Footer")("TextFont") SaveColorSetting rs, "Footer_LabelBack", Theme("Footer")("LabelBack") SaveColorSetting rs, "Footer_LabelBorder", Theme("Footer")("LabelBorder") SaveColorSetting rs, "Footer_LabelFont", Theme("Footer")("LabelFont") SaveColorSetting rs, "Button_Back", Theme("Button")("Back") SaveColorSetting rs, "Button_Border", Theme("Button")("Border") SaveColorSetting rs, "Button_Font", Theme("Button")("Font") SaveColorSetting rs, "Button_Hover", Theme("Button")("Hover") SaveColorSetting rs, "Button_Pressed", Theme("Button")("Pressed") SaveColorSetting rs, "Button_HoverFore", Theme("Button")("HoverFore") SaveColorSetting rs, "Button_PressedFore", Theme("Button")("PressedFore") SaveColorSetting rs, "Combo_Back", Theme("Combo")("Back") SaveColorSetting rs, "Combo_Border", Theme("Combo")("Border") SaveColorSetting rs, "Combo_Font", Theme("Combo")("Font") SaveColorSetting rs, "List_Back", Theme("List")("Back") SaveColorSetting rs, "List_Border", Theme("List")("Border") SaveColorSetting rs, "List_Font", Theme("List")("Font") rs.Close End Sub Private Sub LoadThemeFromCurrentForm() Dim ctl As Control Dim sec As String Theme("Header")("SectionBack") = Me.section(stHeader).BackColor Theme("Detail")("SectionBack") = Me.section(stDetail).BackColor Theme("Footer")("SectionBack") = Me.section(stFooter).BackColor For Each ctl In Me.Controls Select Case ctl.ControlType Case ctTextBox Select Case ctl.section Case stHeader: sec = "Header" Case stDetail: sec = "Detail" Case stFooter: sec = "Footer" Case Else: GoTo NextControl End Select Theme(sec)("TextBack") = ctl.BackColor Theme(sec)("TextBorder") = ctl.BorderColor Theme(sec)("TextFont") = ctl.ForeColor Case ctComboBox Theme("Combo")("Back") = ctl.BackColor Theme("Combo")("Border") = ctl.BorderColor Theme("Combo")("Font") = ctl.ForeColor Case ctListBox Theme("List")("Back") = ctl.BackColor Theme("List")("Border") = ctl.BorderColor Theme("List")("Font") = ctl.ForeColor Case ctLabel Select Case ctl.section Case stHeader: sec = "Header" Case stDetail: sec = "Detail" Case stFooter: sec = "Footer" Case Else: GoTo NextControl End Select Theme(sec)("LabelBack") = ctl.BackColor Theme(sec)("LabelBorder") = ctl.BorderColor Theme(sec)("LabelFont") = ctl.ForeColor Case ctCommandButton Theme("Button")("Back") = ctl.BackColor Theme("Button")("Border") = ctl.BorderColor Theme("Button")("Font") = ctl.ForeColor On Error Resume Next Theme("Button")("Hover") = ctl.HoverColor Theme("Button")("Pressed") = ctl.PressedColor Theme("Button")("HoverFore") = ctl.HoverForeColor Theme("Button")("PressedFore") = ctl.PressedForeColor On Error GoTo 0 End Select NextControl: Next ctl End Sub Private Sub LoadThemeFromTable() Dim rs As DAO.Recordset On Error GoTo ErrHandler Set rs = CurrentDb.OpenRecordset("SELECT * FROM " & TABLE_NAME_THEME_SETTINGS) If rs.EOF Then LoadThemeFromCurrentForm Else Do Until rs.EOF Select Case rs(FIELD_NAME) Case "Header_SectionBack": Theme("Header")("SectionBack") = rs(FIELD_VALUE) Case "Header_TextBack": Theme("Header")("TextBack") = rs(FIELD_VALUE) Case "Header_TextBorder": Theme("Header")("TextBorder") = rs(FIELD_VALUE) Case "Header_TextFont": Theme("Header")("TextFont") = rs(FIELD_VALUE) Case "Header_LabelBack": Theme("Header")("LabelBack") = rs(FIELD_VALUE) Case "Header_LabelBorder": Theme("Header")("LabelBorder") = rs(FIELD_VALUE) Case "Header_LabelFont": Theme("Header")("LabelFont") = rs(FIELD_VALUE) Case "Detail_SectionBack": Theme("Detail")("SectionBack") = rs(FIELD_VALUE) Case "Detail_TextBack": Theme("Detail")("TextBack") = rs(FIELD_VALUE) Case "Detail_TextBorder": Theme("Detail")("TextBorder") = rs(FIELD_VALUE) Case "Detail_TextFont": Theme("Detail")("TextFont") = rs(FIELD_VALUE) Case "Detail_LabelBack": Theme("Detail")("LabelBack") = rs(FIELD_VALUE) Case "Detail_LabelBorder": Theme("Detail")("LabelBorder") = rs(FIELD_VALUE) Case "Detail_LabelFont": Theme("Detail")("LabelFont") = rs(FIELD_VALUE) Case "Footer_SectionBack": Theme("Footer")("SectionBack") = rs(FIELD_VALUE) Case "Footer_TextBack": Theme("Footer")("TextBack") = rs(FIELD_VALUE) Case "Footer_TextBorder": Theme("Footer")("TextBorder") = rs(FIELD_VALUE) Case "Footer_TextFont": Theme("Footer")("TextFont") = rs(FIELD_VALUE) Case "Footer_LabelBack": Theme("Footer")("LabelBack") = rs(FIELD_VALUE) Case "Footer_LabelBorder": Theme("Footer")("LabelBorder") = rs(FIELD_VALUE) Case "Footer_LabelFont": Theme("Footer")("LabelFont") = rs(FIELD_VALUE) Case "Button_Back": Theme("Button")("Back") = rs(FIELD_VALUE) Case "Button_Border": Theme("Button")("Border") = rs(FIELD_VALUE) Case "Button_Font": Theme("Button")("Font") = rs(FIELD_VALUE) Case "Button_Hover": Theme("Button")("Hover") = rs(FIELD_VALUE) Case "Button_Pressed": Theme("Button")("Pressed") = rs(FIELD_VALUE) Case "Button_HoverFore": Theme("Button")("HoverFore") = rs(FIELD_VALUE) Case "Button_PressedFore": Theme("Button")("PressedFore") = rs(FIELD_VALUE) Case "Combo_Back": Theme("Combo")("Back") = rs(FIELD_VALUE) Case "Combo_Border": Theme("Combo")("Border") = rs(FIELD_VALUE) Case "Combo_Font": Theme("Combo")("Font") = rs(FIELD_VALUE) Case "List_Back": Theme("List")("Back") = rs(FIELD_VALUE) Case "List_Border": Theme("List")("Border") = rs(FIELD_VALUE) Case "List_Font": Theme("List")("Font") = rs(FIELD_VALUE) End Select rs.MoveNext Loop End If rs.Close Set rs = Nothing ApplyThemePreview Exit Sub ErrHandler: If DebugMode Then Debug.Print "LoadThemeFromTable >> " & Err.Number & ": " & Err.Description End Sub Private Sub ApplyThemeToAllForms() Dim frm As Object Dim ctl As Control Dim i As Integer Dim arrSections As Variant Dim sec As section Dim secName As String arrSections = Array(stHeader, stDetail, stFooter) For Each frm In CurrentProject.AllForms On Error Resume Next DoCmd.OpenForm frm.Name, acDesign, , , , acHidden If Err.Number <> 0 Then If DebugMode Then Debug.Print "تعذر فتح النموذج: " & frm.Name Err.Clear GoTo NextForm End If On Error GoTo 0 For i = LBound(arrSections) To UBound(arrSections) Set sec = Forms(frm.Name).section(arrSections(i)) Select Case arrSections(i) Case stHeader: If Theme("Header")("SectionBack") <> COLOR_UNSET Then sec.BackColor = Theme("Header")("SectionBack") Case stDetail: If Theme("Detail")("SectionBack") <> COLOR_UNSET Then sec.BackColor = Theme("Detail")("SectionBack") Case stFooter: If Theme("Footer")("SectionBack") <> COLOR_UNSET Then sec.BackColor = Theme("Footer")("SectionBack") End Select Next i For Each ctl In Forms(frm.Name).Controls Select Case ctl.ControlType Case ctTextBox Select Case ctl.section Case stHeader: secName = "Header" Case stDetail: secName = "Detail" Case stFooter: secName = "Footer" Case Else: GoTo NextControl End Select If Theme(secName)("TextBack") <> COLOR_UNSET Then ctl.BackColor = Theme(secName)("TextBack") If Theme(secName)("TextBorder") <> COLOR_UNSET Then ctl.BorderColor = Theme(secName)("TextBorder") If Theme(secName)("TextFont") <> COLOR_UNSET Then ctl.ForeColor = Theme(secName)("TextFont") Case ctComboBox If Theme("Combo")("Back") <> COLOR_UNSET Then ctl.BackColor = Theme("Combo")("Back") If Theme("Combo")("Border") <> COLOR_UNSET Then ctl.BorderColor = Theme("Combo")("Border") If Theme("Combo")("Font") <> COLOR_UNSET Then ctl.ForeColor = Theme("Combo")("Font") Case ctListBox If Theme("List")("Back") <> COLOR_UNSET Then ctl.BackColor = Theme("List")("Back") If Theme("List")("Border") <> COLOR_UNSET Then ctl.BorderColor = Theme("List")("Border") If Theme("List")("Font") <> COLOR_UNSET Then ctl.ForeColor = Theme("List")("Font") Case ctLabel Select Case ctl.section Case stHeader: secName = "Header" Case stDetail: secName = "Detail" Case stFooter: secName = "Footer" Case Else: GoTo NextControl End Select If Theme(secName)("LabelBack") <> COLOR_UNSET Then ctl.BackColor = Theme(secName)("LabelBack") If Theme(secName)("LabelBorder") <> COLOR_UNSET Then ctl.BorderColor = Theme(secName)("LabelBorder") If Theme(secName)("LabelFont") <> COLOR_UNSET Then ctl.ForeColor = Theme(secName)("LabelFont") Case ctCommandButton If Theme("Button")("Back") <> COLOR_UNSET Then ctl.BackColor = Theme("Button")("Back") If Theme("Button")("Border") <> COLOR_UNSET Then ctl.BorderColor = Theme("Button")("Border") If Theme("Button")("Font") <> COLOR_UNSET Then ctl.ForeColor = Theme("Button")("Font") On Error Resume Next If Theme("Button")("Hover") <> COLOR_UNSET Then ctl.HoverColor = Theme("Button")("Hover") If Theme("Button")("Pressed") <> COLOR_UNSET Then ctl.PressedColor = Theme("Button")("Pressed") If Theme("Button")("HoverFore") <> COLOR_UNSET Then ctl.HoverForeColor = Theme("Button")("HoverFore") If Theme("Button")("PressedFore") <> COLOR_UNSET Then ctl.PressedForeColor = Theme("Button")("PressedFore") On Error GoTo 0 End Select NextControl: Next ctl DoCmd.Close acForm, frm.Name, acSaveYes NextForm: On Error GoTo 0 Err.Clear Next frm End Sub الكود الان يتيح تخصيص مظهر النماذج بشكل مركزي يوفر واجهة لتحديد ألوان الخلفية للأقسام (رأس، تفاصيل، تذييل) يوفر تحديد ألوان الخلفية و الحدود والنصوص للعناصر (مربعات نص - عناوين التسمية ) لكل قسم على حده يوفر تحديد ألوان الخلفية والنصوص للعناصر (مربعات نص - مربعات التحرير والسرد - قوائم القيم - أزرار ) يدعم معاينة فورية وتطبيق الثيم على جميع النماذج بنقرة واحدة مع خيار استعادة الإعدادات الافتراضية يتم حفظ الإعدادات في جدول قاعدة بيانات مما يضمن الاتساق عبر النماذج ينشئ الجدول فى حالة عدم وجوده يحدث البيانات للاعدادت داخل الجدول فى حالة وجود الجدول وأخيرا التعديل على مرفق حضرتك changColor(2).accdb

السلام عليكم الإخوة الأفاضل في هذا المنتدى الجميل في موضوعي هذا أريد التعديل على كود حفظ لحفظ الوثائق بجانب قاعدة البيانات: - فتح النموذج frm_divers_dossiers - الضغط على زر "إضافة وثيقة" - سيفتح نموذج آخر اسمه FrmAttchedFiles : في هذا النموذج أريد التعديل على كود حفظ البيانات والموجود في زر " إضافة/فتح الملف" نلاحظ وجود موظفين: موظف 1 و موظف 2 ولهما وثيقة تحمل نفس الأسم هو: 1 لكن المحتوى الداخلي للوثيقة مختلف تماما فالكود الحالي يحذف الوثائق ويبقى على وثيقة واحدة فقط لأنهما متشابهان في الإسم الكود الحالي يشتغل جيدا لكن بالصدفة أكتشفت أنه في حالة إضافة وثيقتين لهما نفس الإسم يبقى على وثيقة واحدة فقط لأنهما يقعان في نفسس المجلد (الملف) لأني أحيانا أضيف الوثائق بسرعة وليس في كل مرة يلزم أغير الإسم لأضمن أن لايتم يتعويضه هل يمكن التعديل على الكود لضمان حفظ الوثائق حتى ولو كانوا متشابهين في الإسم، أم أنه يوجد حل آخر الرجاء المساعدة والتوجيه وبارك الله فيكم baseA.accdb

رغم ان المرفق عبارة عن جداول فأنا اعتذر عن الغفلة ملحوظة : كنت في اعمال لي سابقة استخرج الغياب بناء على جدول الحضور .. حيث يوجد موظفون آخرون حاضرون في تاريخ غياب الموظف الهدف وعن طريق الاستعلام والعلاقة يظهر اسم الموظف الغائب ومعرفه ولكن سجله خالي من التوقيع ........................ هنا لنفرض ان عدد الموظفين 3 او اكثر ثم غابوا جميعا في يوم واحد .. على طريقتي التي ذكرت اعلاه سوف يختفي يوم الغياب ولن يظهر لذا اريد التطبيق على موظف واحد فقط .. واعشق الاختصار في الكائنات والادوات خاصة .. اما الاكواد والدالات فلا مشكلة d6.rar غياب يوم 8 واضح حيث لا يوجد له توقيع في جدول الحضور اما الاجازة ايضا لا يوجد توقيع في جدول الحضور ولكن تم رصد هذه الاجازة في جدول الاجازات

سعيد جدا لأنه نال إستحسانكم كلام من جماله أعجز عن الرد بالرد الذي يمكن أن يعبر عن مدى سعادتي وامتناني به والشكر موصول للأخ @SAROOK مع تحياتي

هل لنا بمرفق لتوضيح كيف تم اعتبار يوم 8 غياب ، بينما 3 ، 4 ، 5 إجازة !!

Private Sub JOS_Click() Dim TaskDialog As cTaskDialog Set TaskDialog = New cTaskDialog With TaskDialog .Init .ParenthWnd = Me.hWnd .Flags = TDF_RTL_LAYOUT .MainInstruction = "طباعة تقرير" .Content = "هل تريد طباعة تقرير المخنبر" 'التعديل الأول إلغاء هذا السطر لأنك لست بحاجته '.CommonButtons = TDCBF_OK_BUTTON .IconMain = TD_SHIELD_OK_ICON .CommonButtons = TDCBF_YES_BUTTON Or TDCBF_NO_BUTTON .Title = "المعمل الطبى" .ShowDialog 'التعديل الثاني إلغاء هذا السطر لأنه كان لغرض توضيح الأمثلة فقط 'Me.lblButton.Caption = .ResultMain 'تعديل الكود كما يلي If .ResultMain = 6 Then 'القيمة المرتجعة من النقر على زر نعم هو الرقم 6 DoCmd.PrintOut DoCmd.close acReport, "External_lab_Mokh" ElseIf .ResultMain = 7 Then 'القيمة المرتجعة من النقر على زر لا هو الرقم 7 DoCmd.close acReport, "External_lab_Mokh" End If End With Set TaskDialog = Nothing End Sub إنسخ الكود بهذا الوضع وجربه

#مركز_الفرسان_الدولي_للتدريب #Alforssan International Training Center بسم الله الرحمن الرحيم مركزالفرسان الدولي للتدريب AL-Forssan يقدم دورات فى السلامة والصحة والبيئة يمكنكم التسجيل او الاستفسارعلى الدورة الان ......................... يحصل المتدرب على شهادة معتمدة من مركز الفرسان الدولي للتدريب للتواصل والإستفسار وطلب المحتوي العلمى يرجى التواصل بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com دورة إدارة النفايات: المنهجية الحديثة والمستدامة دورة التخطيط للاستجابة في حالات الطوارئ: إدارة الأزمات في البيئات الخطرة دورة إدارة النفايات الخطرة دورة إدارة مخلفات الإنسكاب النفطي دورة طرق تنظيف الانسكابات النفطية في البحر دورة علم الحرائق وطرق المكافحة والإطفاء والإنقاذ دورة الإجراءات والمعايير الدولية للأمن والسلامة الصناعية دورة الأمن والصحة والسلامة المهنية دورة الجدارة الادارية والفنية لمشرفي الامن والسلامة دورة آليات التعامل الآمن مع تجهيز و رفع السقالات دورة الإتجاهات الحديثة في التميز والإبداع القيادي لمدراء الأمن والسلامة دورة التقنيات الحديثة في هندسة السلامة المهنية وإدارة الصحة البيئية دورة تطـوير ورفـع كفاءة أنظمــة الأمـن والسلامــة وتنفيذ معايير الجودة دورة السلامة والادارة الآمنة للنفايات الخطرة دورة الاستراتيجيات الحديثة لتنمية مهارات الإدراك والحس الأمني والتفكير الذهني (أمن البنوك والمؤسسات المصرفية) دورة معايير الأمن والسلامة البيولوجية وتوكيد الجودة فى المعامل والمختبرات دورة النظم المتقدمة للأمن الصناعى والتحقيق الفني للحوادث المهنية دورة نظام السلامة الغذائية HACCP دورة إدارة معايير التعامل مع المواد الخطرة HAZMAT - HAZCOM دورة تطوير ورفع كفاءة انظمة الامن والسلامة وتنفيذ معايير الجودة دورة إدارة العمل الآمن والتقليل الى نسبة \"الصفر\" حوداث واصابات العمل دورة نظم إدارة الصحة الوظيفية والسلامة OHSAS 18001 دورة تطوير المهارات العملية و التقنية لضباط الأمن في كافة المنشآت دورة التكنولوجيا الحديثة في السلامة وتحليل المخاطر دورة هندسة الامن والسلامة والصحة المهنية دورة إدارة أنظمة الآمان الالكترونية في المنشآت دورة الوقاية والسيطرة ورصد المخاطر وتحليل الحوادث دورة البرنامج المكثف حول السلامة والصحة المهنية طبقاً لمواصفات OSHA & NFPA دورة مكافحة الحرائق والوقاية من أخطارها وكيفية التعامل معها دورة المدونة الدولية لأمن السفن والمرافق المينائية المتقدمة دورة نظم إدارة السلامة والصحة المهنية وفقاً لمعايير الأوشا الأمريكية OSHA دورة إدارة أنظمة السلامة والصحة المهنية وإعداد الخطط التنفيذية دورة نظم السلامة الصناعية وخدمات الطوارئ الحديثة دورة أهم مخاطر بيئة العمل الصاخبة وطرق تجنبها دورة إدارة سلامة العمليات الخطرة (RBPS) دورة هندسة الإطفاء والسلامة والوقاية من الحريق دورة هندسة السلامة إدارة المخاطر ومنع الخسائر دورة مخاطر السوائل شديدة البرودة والطرق المتبعة في معالجتها دورة التميز المهنى لمشرفى الأمن الصناعى والسلامة المهنية دورة إستراتيجية إدارة الأزمة دورة التفتيش والرقابة الأمنية دورة سلامة التمديدات الكهربائية في المنشآت الصناعية دورة طرق المعالجة المتقدمة في تقييم المخاطر و إدارتها دورة تكنولوجيا السلامة من الحريق وهندسة لإطفاء الفني المتقدم دورة الصيانة وفقاً لمفهوم الهندسة القيمية دورة معايير NFPA للسلامة المهنية دورة تكنولوجيا حماية البيئة ومنع الخسائر دورة تطبيقات إستخدام الخرائط الجغرافية في نظم المعلومات الجغرافية دورة الإتجاهات الحديثة في الوقاية من الحوادث الصناعية دورة إدارة نظم البيئة وتكنولوجيا السيطرة على التلوث البيئي دورة إدارة التأمين الطبي دورة طرق تأمين الصحة و السلامة في أماكن العمل دورة هندسة السلامة وتقييم المخاطر دورة تنمية مهارات الإدراك و الدخول الآمن إلى الأماكن الضيقة دورة أسس التفتيش والمراجعــة فى أعمال السلامة دورة إعداد وتطبيق معايير السلامة والصحة المهنية دورة مهارات إعداد وصياغة التقارير الأمنية والتفتيش الأمنى دورة التدابير المتبعة في طرق السلامة في البيت و المكتب دورة نظام سلامة الأغذية HACCP دورة التقنيات المتقدمة لتخطيط وتصميم خطط الطوارئ دورة رسم سياسات واجراءات السلامة وفق المعايير الدولية دورة هندسة السلامة وإدارة العمليات الأمنية فى حماية المنشأت دورة قياس وادارة معايير وإجراءات السلامة في محطات تعبئة الوقود دورة الإدارة المتقدمة للأمن و السلامة دورة إدارة الأزمات الأمنية ومهارات التفاوض الأمني دورة أخصائي هندسة التحكم في مخاطر بيئة العمل دورة الهندسة الأمنية لتأمين المنشآت الحيوية والحساسة والتخطيط لادارة الطوارئ دورة تكنولوجيا هندسة السلامة والوقاية من الحوادث المهنية دورة تحليل الأخطاء البشرية وآليات تجنبها دورة النيبوش العامة الدولية للسلامة والصحة المهنية دورة المهارات المتقدمة في كتابة التقارير الأمنية دورة التخطيط البيئي و تقييم الاثار البيئية و قوانين حماية البيئة دورة أهم وسائل تجنب خطر الإشعاعات دورة الإستراتيجيات المتقدمة في إدارة الأزمات الأمنية و مهارات التفاوض دورة التعرف على طرق الإسعافات الأولية في موقع العمل دورة المعايير والمقاييس العالمية NFPA لأخصائيي الحرائق والسلامة وتجنب الخسائر والأمن الصناعي دورة الأوشا OSHA في السلامة والصحة المهنية دورة استراتيجيات التخطيط والتنظيم الادارى والتوجيه و إدارة الأزمات دورة التقنيات الحديثة لأنظمة إدارة الصيانة بالحاسب الألي دورة سلامة المشروعات الهندسية و الإنشائية من المخاطر و حوادث الحرائق دورة القيادة ، التخطيط ، والمهارات التنظيمية لادارة عمليات الطوارئ والانقاذ والاخلاء دورة الأمن والسلامة فى الموانيء Hazard Ports دورة تنمية مهارات فحص تجهيزات الرفع دورة تأمين وحماية المنشأت الجامعية والتعليمية دورة تقنيات السلامة و إدارة المخاطر دورة قيادة عمليات الإطفاء والإنقاذ والتدخل السريع دورة التدريب الأمثل في إدارة السلامة دورة التحليل الأمنى وبناء المنظومة الأمنية للمواقع المهمة دورة إدارة الأزمات الأمنية ومهارات التفاوض الأمني دورة إدارة نظم البيئة وتكنولوجيا السيطرة على التلوث البيئى دورة أسس السلامة المهنية في الورشة و المستودع دورة الهندسة الأمنية لتأمين المنظمات الهامة والحساسة والتخطيط لإدارة الطوارئ دورة إعداد خطط الطوارىء وفرق إدارة الأزمات والكفاءة فى عمليات الإخلاء دورة إدارة السلامة الغذائية وتحليل المخاطر ونقطة المراقبة الحرجة - HACCP دورة ادارة انظمة السلامة والصحة المهنية واعداد الخطط التنفيذية دورة الشهادة العامة الدولية في السلامة والصحة المهنية دورة تقييم أداء مشرفي السلامة وفقا ً لمعايير OSHA دورة التعريف بـH2S وطريقة تجنب مخاطره …………………………… للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام كما يعقد مركز الفرسان الدولي للتدريب الدورات التالية بالتخصصات المذكورة ( دورات الإدارة والقيادة - دورات الموارد البشرية والتدريب - دورات الجودة والأنتاجية - دورات المشتريات والمخازن اللوجستية - دورات إدارة الإمن - دورات السلامة والصحة والبيئة - دورات التسويق والمبيعات وخدمة العملاء - دورات الأعلام والعلاقات العامة - دورات المحاسبة والخدمات المالية - دورات القانون والعقود - دورات البنوك والخدمات المالية - دورات التخطيط وإدارة المشروعات - دورات التأمينات - دورات النفط والغاز - دورات التجارة الخارجية ودراسة الجدوي - دورات تخطيط أعمال الصيانة - دورات الهندسة المدنية وأعمال البناء - دورات الطاقة الكهربائية - دورات الجمارك والموانيء - دورات الخدمات الطبية - دورات السكرتارية وإدارة المكاتب ) ………………………………. إسلوب إعداد البرنامج التدريبى : المحاضرات: ينفذ الدورات مجموعة من الخبراء المتخصصون في مجالات التدريب المختلفة المادة العلمية: وهي مكتوبة على شرائح تعليمية باستخدام برنامج Power Point كوسائل مساعدة الحالات والتطبيقات العملية الحوارات والنقاشات الموجهة تمثيل ولعب الادوار ورش العمل ومشاركة المتدربين نموذج استطلاع الراي قاعات التدريب بفنادق 5 نجوم تناول الوجبات الخفيفة والمشروبات اثناء البرنامج ………………………………………… يوفر مركز الفرسان الدولي للتدريب مزايا كثيرة ضمن برنامج الدورات التدريبية تتضمن : * خصومات خاصة للمجموعات * خصومات خاصة للتسجيل المبكر * الدورات التدريبية تنفذ باللغتين : العربية أو الإنجليزية حسب تفضيلكم * القاعة التدريبية على مستوى فندقي 5 نجوم * خصومات في العديد من الفنادق و تسهيلات في السكن * وغيرها من المزايا ......... * الشهادات : يحصل المتدرب على شهادة معتمده دوليا من مركز الفرسان الدولي للتدريب لمزيد من المعلومات عن الدورات والمحتوى العلمى والتكلفة والمواعيد يرجى التواصل على الارقام الاتية للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام

جزاك الله خيرا انقر على عبارة اختر تمت الاجابة

#مركز_الفرسان_الدولي_للتدريب #Alforssan International Training Center بسم الله الرحمن الرحيم مركزالفرسان الدولي للتدريب AL-Forssan يقدم دورات فى السلامة والصحة والبيئة يمكنكم التسجيل او الاستفسارعلى الدورة الان ......................... يحصل المتدرب على شهادة معتمدة من مركز الفرسان الدولي للتدريب للتواصل والإستفسار وطلب المحتوي العلمى يرجى التواصل بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com دورة إدارة النفايات: المنهجية الحديثة والمستدامة دورة التخطيط للاستجابة في حالات الطوارئ: إدارة الأزمات في البيئات الخطرة دورة إدارة النفايات الخطرة دورة إدارة مخلفات الإنسكاب النفطي دورة طرق تنظيف الانسكابات النفطية في البحر دورة علم الحرائق وطرق المكافحة والإطفاء والإنقاذ دورة الإجراءات والمعايير الدولية للأمن والسلامة الصناعية دورة الأمن والصحة والسلامة المهنية دورة الجدارة الادارية والفنية لمشرفي الامن والسلامة دورة آليات التعامل الآمن مع تجهيز و رفع السقالات دورة الإتجاهات الحديثة في التميز والإبداع القيادي لمدراء الأمن والسلامة دورة التقنيات الحديثة في هندسة السلامة المهنية وإدارة الصحة البيئية دورة تطـوير ورفـع كفاءة أنظمــة الأمـن والسلامــة وتنفيذ معايير الجودة دورة السلامة والادارة الآمنة للنفايات الخطرة دورة الاستراتيجيات الحديثة لتنمية مهارات الإدراك والحس الأمني والتفكير الذهني (أمن البنوك والمؤسسات المصرفية) دورة معايير الأمن والسلامة البيولوجية وتوكيد الجودة فى المعامل والمختبرات دورة النظم المتقدمة للأمن الصناعى والتحقيق الفني للحوادث المهنية دورة نظام السلامة الغذائية HACCP دورة إدارة معايير التعامل مع المواد الخطرة HAZMAT - HAZCOM دورة تطوير ورفع كفاءة انظمة الامن والسلامة وتنفيذ معايير الجودة دورة إدارة العمل الآمن والتقليل الى نسبة \"الصفر\" حوداث واصابات العمل دورة نظم إدارة الصحة الوظيفية والسلامة OHSAS 18001 دورة تطوير المهارات العملية و التقنية لضباط الأمن في كافة المنشآت دورة التكنولوجيا الحديثة في السلامة وتحليل المخاطر دورة هندسة الامن والسلامة والصحة المهنية دورة إدارة أنظمة الآمان الالكترونية في المنشآت دورة الوقاية والسيطرة ورصد المخاطر وتحليل الحوادث دورة البرنامج المكثف حول السلامة والصحة المهنية طبقاً لمواصفات OSHA & NFPA دورة مكافحة الحرائق والوقاية من أخطارها وكيفية التعامل معها دورة المدونة الدولية لأمن السفن والمرافق المينائية المتقدمة دورة نظم إدارة السلامة والصحة المهنية وفقاً لمعايير الأوشا الأمريكية OSHA دورة إدارة أنظمة السلامة والصحة المهنية وإعداد الخطط التنفيذية دورة نظم السلامة الصناعية وخدمات الطوارئ الحديثة دورة أهم مخاطر بيئة العمل الصاخبة وطرق تجنبها دورة إدارة سلامة العمليات الخطرة (RBPS) دورة هندسة الإطفاء والسلامة والوقاية من الحريق دورة هندسة السلامة إدارة المخاطر ومنع الخسائر دورة مخاطر السوائل شديدة البرودة والطرق المتبعة في معالجتها دورة التميز المهنى لمشرفى الأمن الصناعى والسلامة المهنية دورة إستراتيجية إدارة الأزمة دورة التفتيش والرقابة الأمنية دورة سلامة التمديدات الكهربائية في المنشآت الصناعية دورة طرق المعالجة المتقدمة في تقييم المخاطر و إدارتها دورة تكنولوجيا السلامة من الحريق وهندسة لإطفاء الفني المتقدم دورة الصيانة وفقاً لمفهوم الهندسة القيمية دورة معايير NFPA للسلامة المهنية دورة تكنولوجيا حماية البيئة ومنع الخسائر دورة تطبيقات إستخدام الخرائط الجغرافية في نظم المعلومات الجغرافية دورة الإتجاهات الحديثة في الوقاية من الحوادث الصناعية دورة إدارة نظم البيئة وتكنولوجيا السيطرة على التلوث البيئي دورة إدارة التأمين الطبي دورة طرق تأمين الصحة و السلامة في أماكن العمل دورة هندسة السلامة وتقييم المخاطر دورة تنمية مهارات الإدراك و الدخول الآمن إلى الأماكن الضيقة دورة أسس التفتيش والمراجعــة فى أعمال السلامة دورة إعداد وتطبيق معايير السلامة والصحة المهنية دورة مهارات إعداد وصياغة التقارير الأمنية والتفتيش الأمنى دورة التدابير المتبعة في طرق السلامة في البيت و المكتب دورة نظام سلامة الأغذية HACCP دورة التقنيات المتقدمة لتخطيط وتصميم خطط الطوارئ دورة رسم سياسات واجراءات السلامة وفق المعايير الدولية دورة هندسة السلامة وإدارة العمليات الأمنية فى حماية المنشأت دورة قياس وادارة معايير وإجراءات السلامة في محطات تعبئة الوقود دورة الإدارة المتقدمة للأمن و السلامة دورة إدارة الأزمات الأمنية ومهارات التفاوض الأمني دورة أخصائي هندسة التحكم في مخاطر بيئة العمل دورة الهندسة الأمنية لتأمين المنشآت الحيوية والحساسة والتخطيط لادارة الطوارئ دورة تكنولوجيا هندسة السلامة والوقاية من الحوادث المهنية دورة تحليل الأخطاء البشرية وآليات تجنبها دورة النيبوش العامة الدولية للسلامة والصحة المهنية دورة المهارات المتقدمة في كتابة التقارير الأمنية دورة التخطيط البيئي و تقييم الاثار البيئية و قوانين حماية البيئة دورة أهم وسائل تجنب خطر الإشعاعات دورة الإستراتيجيات المتقدمة في إدارة الأزمات الأمنية و مهارات التفاوض دورة التعرف على طرق الإسعافات الأولية في موقع العمل دورة المعايير والمقاييس العالمية NFPA لأخصائيي الحرائق والسلامة وتجنب الخسائر والأمن الصناعي دورة الأوشا OSHA في السلامة والصحة المهنية دورة استراتيجيات التخطيط والتنظيم الادارى والتوجيه و إدارة الأزمات دورة التقنيات الحديثة لأنظمة إدارة الصيانة بالحاسب الألي دورة سلامة المشروعات الهندسية و الإنشائية من المخاطر و حوادث الحرائق دورة القيادة ، التخطيط ، والمهارات التنظيمية لادارة عمليات الطوارئ والانقاذ والاخلاء دورة الأمن والسلامة فى الموانيء Hazard Ports دورة تنمية مهارات فحص تجهيزات الرفع دورة تأمين وحماية المنشأت الجامعية والتعليمية دورة تقنيات السلامة و إدارة المخاطر دورة قيادة عمليات الإطفاء والإنقاذ والتدخل السريع دورة التدريب الأمثل في إدارة السلامة دورة التحليل الأمنى وبناء المنظومة الأمنية للمواقع المهمة دورة إدارة الأزمات الأمنية ومهارات التفاوض الأمني دورة إدارة نظم البيئة وتكنولوجيا السيطرة على التلوث البيئى دورة أسس السلامة المهنية في الورشة و المستودع دورة الهندسة الأمنية لتأمين المنظمات الهامة والحساسة والتخطيط لإدارة الطوارئ دورة إعداد خطط الطوارىء وفرق إدارة الأزمات والكفاءة فى عمليات الإخلاء دورة إدارة السلامة الغذائية وتحليل المخاطر ونقطة المراقبة الحرجة - HACCP دورة ادارة انظمة السلامة والصحة المهنية واعداد الخطط التنفيذية دورة الشهادة العامة الدولية في السلامة والصحة المهنية دورة تقييم أداء مشرفي السلامة وفقا ً لمعايير OSHA دورة التعريف بـH2S وطريقة تجنب مخاطره …………………………… للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام كما يعقد مركز الفرسان الدولي للتدريب الدورات التالية بالتخصصات المذكورة ( دورات الإدارة والقيادة - دورات الموارد البشرية والتدريب - دورات الجودة والأنتاجية - دورات المشتريات والمخازن اللوجستية - دورات إدارة الإمن - دورات السلامة والصحة والبيئة - دورات التسويق والمبيعات وخدمة العملاء - دورات الأعلام والعلاقات العامة - دورات المحاسبة والخدمات المالية - دورات القانون والعقود - دورات البنوك والخدمات المالية - دورات التخطيط وإدارة المشروعات - دورات التأمينات - دورات النفط والغاز - دورات التجارة الخارجية ودراسة الجدوي - دورات تخطيط أعمال الصيانة - دورات الهندسة المدنية وأعمال البناء - دورات الطاقة الكهربائية - دورات الجمارك والموانيء - دورات الخدمات الطبية - دورات السكرتارية وإدارة المكاتب ) ………………………………. إسلوب إعداد البرنامج التدريبى : المحاضرات: ينفذ الدورات مجموعة من الخبراء المتخصصون في مجالات التدريب المختلفة المادة العلمية: وهي مكتوبة على شرائح تعليمية باستخدام برنامج Power Point كوسائل مساعدة الحالات والتطبيقات العملية الحوارات والنقاشات الموجهة تمثيل ولعب الادوار ورش العمل ومشاركة المتدربين نموذج استطلاع الراي قاعات التدريب بفنادق 5 نجوم تناول الوجبات الخفيفة والمشروبات اثناء البرنامج ………………………………………… يوفر مركز الفرسان الدولي للتدريب مزايا كثيرة ضمن برنامج الدورات التدريبية تتضمن : * خصومات خاصة للمجموعات * خصومات خاصة للتسجيل المبكر * الدورات التدريبية تنفذ باللغتين : العربية أو الإنجليزية حسب تفضيلكم * القاعة التدريبية على مستوى فندقي 5 نجوم * خصومات في العديد من الفنادق و تسهيلات في السكن * وغيرها من المزايا ......... * الشهادات : يحصل المتدرب على شهادة معتمده دوليا من مركز الفرسان الدولي للتدريب لمزيد من المعلومات عن الدورات والمحتوى العلمى والتكلفة والمواعيد يرجى التواصل على الارقام الاتية للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام

#مركز_الفرسان_الدولي_للتدريب #Alforssan International Training Center بسم الله الرحمن الرحيم مركزالفرسان الدولي للتدريب AL-Forssan يقدم دورات فى السلامة والصحة والبيئة يمكنكم التسجيل او الاستفسارعلى الدورة الان ......................... يحصل المتدرب على شهادة معتمدة من مركز الفرسان الدولي للتدريب للتواصل والإستفسار وطلب المحتوي العلمى يرجى التواصل بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com دورة إدارة النفايات: المنهجية الحديثة والمستدامة دورة التخطيط للاستجابة في حالات الطوارئ: إدارة الأزمات في البيئات الخطرة دورة إدارة النفايات الخطرة دورة إدارة مخلفات الإنسكاب النفطي دورة طرق تنظيف الانسكابات النفطية في البحر دورة علم الحرائق وطرق المكافحة والإطفاء والإنقاذ دورة الإجراءات والمعايير الدولية للأمن والسلامة الصناعية دورة الأمن والصحة والسلامة المهنية دورة الجدارة الادارية والفنية لمشرفي الامن والسلامة دورة آليات التعامل الآمن مع تجهيز و رفع السقالات دورة الإتجاهات الحديثة في التميز والإبداع القيادي لمدراء الأمن والسلامة دورة التقنيات الحديثة في هندسة السلامة المهنية وإدارة الصحة البيئية دورة تطـوير ورفـع كفاءة أنظمــة الأمـن والسلامــة وتنفيذ معايير الجودة دورة السلامة والادارة الآمنة للنفايات الخطرة دورة الاستراتيجيات الحديثة لتنمية مهارات الإدراك والحس الأمني والتفكير الذهني (أمن البنوك والمؤسسات المصرفية) دورة معايير الأمن والسلامة البيولوجية وتوكيد الجودة فى المعامل والمختبرات دورة النظم المتقدمة للأمن الصناعى والتحقيق الفني للحوادث المهنية دورة نظام السلامة الغذائية HACCP دورة إدارة معايير التعامل مع المواد الخطرة HAZMAT - HAZCOM دورة تطوير ورفع كفاءة انظمة الامن والسلامة وتنفيذ معايير الجودة دورة إدارة العمل الآمن والتقليل الى نسبة \"الصفر\" حوداث واصابات العمل دورة نظم إدارة الصحة الوظيفية والسلامة OHSAS 18001 دورة تطوير المهارات العملية و التقنية لضباط الأمن في كافة المنشآت دورة التكنولوجيا الحديثة في السلامة وتحليل المخاطر دورة هندسة الامن والسلامة والصحة المهنية دورة إدارة أنظمة الآمان الالكترونية في المنشآت دورة الوقاية والسيطرة ورصد المخاطر وتحليل الحوادث دورة البرنامج المكثف حول السلامة والصحة المهنية طبقاً لمواصفات OSHA & NFPA دورة مكافحة الحرائق والوقاية من أخطارها وكيفية التعامل معها دورة المدونة الدولية لأمن السفن والمرافق المينائية المتقدمة دورة نظم إدارة السلامة والصحة المهنية وفقاً لمعايير الأوشا الأمريكية OSHA دورة إدارة أنظمة السلامة والصحة المهنية وإعداد الخطط التنفيذية دورة نظم السلامة الصناعية وخدمات الطوارئ الحديثة دورة أهم مخاطر بيئة العمل الصاخبة وطرق تجنبها دورة إدارة سلامة العمليات الخطرة (RBPS) دورة هندسة الإطفاء والسلامة والوقاية من الحريق دورة هندسة السلامة إدارة المخاطر ومنع الخسائر دورة مخاطر السوائل شديدة البرودة والطرق المتبعة في معالجتها دورة التميز المهنى لمشرفى الأمن الصناعى والسلامة المهنية دورة إستراتيجية إدارة الأزمة دورة التفتيش والرقابة الأمنية دورة سلامة التمديدات الكهربائية في المنشآت الصناعية دورة طرق المعالجة المتقدمة في تقييم المخاطر و إدارتها دورة تكنولوجيا السلامة من الحريق وهندسة لإطفاء الفني المتقدم دورة الصيانة وفقاً لمفهوم الهندسة القيمية دورة معايير NFPA للسلامة المهنية دورة تكنولوجيا حماية البيئة ومنع الخسائر دورة تطبيقات إستخدام الخرائط الجغرافية في نظم المعلومات الجغرافية دورة الإتجاهات الحديثة في الوقاية من الحوادث الصناعية دورة إدارة نظم البيئة وتكنولوجيا السيطرة على التلوث البيئي دورة إدارة التأمين الطبي دورة طرق تأمين الصحة و السلامة في أماكن العمل دورة هندسة السلامة وتقييم المخاطر دورة تنمية مهارات الإدراك و الدخول الآمن إلى الأماكن الضيقة دورة أسس التفتيش والمراجعــة فى أعمال السلامة دورة إعداد وتطبيق معايير السلامة والصحة المهنية دورة مهارات إعداد وصياغة التقارير الأمنية والتفتيش الأمنى دورة التدابير المتبعة في طرق السلامة في البيت و المكتب دورة نظام سلامة الأغذية HACCP دورة التقنيات المتقدمة لتخطيط وتصميم خطط الطوارئ دورة رسم سياسات واجراءات السلامة وفق المعايير الدولية دورة هندسة السلامة وإدارة العمليات الأمنية فى حماية المنشأت دورة قياس وادارة معايير وإجراءات السلامة في محطات تعبئة الوقود دورة الإدارة المتقدمة للأمن و السلامة دورة إدارة الأزمات الأمنية ومهارات التفاوض الأمني دورة أخصائي هندسة التحكم في مخاطر بيئة العمل دورة الهندسة الأمنية لتأمين المنشآت الحيوية والحساسة والتخطيط لادارة الطوارئ دورة تكنولوجيا هندسة السلامة والوقاية من الحوادث المهنية دورة تحليل الأخطاء البشرية وآليات تجنبها دورة النيبوش العامة الدولية للسلامة والصحة المهنية دورة المهارات المتقدمة في كتابة التقارير الأمنية دورة التخطيط البيئي و تقييم الاثار البيئية و قوانين حماية البيئة دورة أهم وسائل تجنب خطر الإشعاعات دورة الإستراتيجيات المتقدمة في إدارة الأزمات الأمنية و مهارات التفاوض دورة التعرف على طرق الإسعافات الأولية في موقع العمل دورة المعايير والمقاييس العالمية NFPA لأخصائيي الحرائق والسلامة وتجنب الخسائر والأمن الصناعي دورة الأوشا OSHA في السلامة والصحة المهنية دورة استراتيجيات التخطيط والتنظيم الادارى والتوجيه و إدارة الأزمات دورة التقنيات الحديثة لأنظمة إدارة الصيانة بالحاسب الألي دورة سلامة المشروعات الهندسية و الإنشائية من المخاطر و حوادث الحرائق دورة القيادة ، التخطيط ، والمهارات التنظيمية لادارة عمليات الطوارئ والانقاذ والاخلاء دورة الأمن والسلامة فى الموانيء Hazard Ports دورة تنمية مهارات فحص تجهيزات الرفع دورة تأمين وحماية المنشأت الجامعية والتعليمية دورة تقنيات السلامة و إدارة المخاطر دورة قيادة عمليات الإطفاء والإنقاذ والتدخل السريع دورة التدريب الأمثل في إدارة السلامة دورة التحليل الأمنى وبناء المنظومة الأمنية للمواقع المهمة دورة إدارة الأزمات الأمنية ومهارات التفاوض الأمني دورة إدارة نظم البيئة وتكنولوجيا السيطرة على التلوث البيئى دورة أسس السلامة المهنية في الورشة و المستودع دورة الهندسة الأمنية لتأمين المنظمات الهامة والحساسة والتخطيط لإدارة الطوارئ دورة إعداد خطط الطوارىء وفرق إدارة الأزمات والكفاءة فى عمليات الإخلاء دورة إدارة السلامة الغذائية وتحليل المخاطر ونقطة المراقبة الحرجة - HACCP دورة ادارة انظمة السلامة والصحة المهنية واعداد الخطط التنفيذية دورة الشهادة العامة الدولية في السلامة والصحة المهنية دورة تقييم أداء مشرفي السلامة وفقا ً لمعايير OSHA دورة التعريف بـH2S وطريقة تجنب مخاطره …………………………… للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام كما يعقد مركز الفرسان الدولي للتدريب الدورات التالية بالتخصصات المذكورة ( دورات الإدارة والقيادة - دورات الموارد البشرية والتدريب - دورات الجودة والأنتاجية - دورات المشتريات والمخازن اللوجستية - دورات إدارة الإمن - دورات السلامة والصحة والبيئة - دورات التسويق والمبيعات وخدمة العملاء - دورات الأعلام والعلاقات العامة - دورات المحاسبة والخدمات المالية - دورات القانون والعقود - دورات البنوك والخدمات المالية - دورات التخطيط وإدارة المشروعات - دورات التأمينات - دورات النفط والغاز - دورات التجارة الخارجية ودراسة الجدوي - دورات تخطيط أعمال الصيانة - دورات الهندسة المدنية وأعمال البناء - دورات الطاقة الكهربائية - دورات الجمارك والموانيء - دورات الخدمات الطبية - دورات السكرتارية وإدارة المكاتب ) ………………………………. إسلوب إعداد البرنامج التدريبى : المحاضرات: ينفذ الدورات مجموعة من الخبراء المتخصصون في مجالات التدريب المختلفة المادة العلمية: وهي مكتوبة على شرائح تعليمية باستخدام برنامج Power Point كوسائل مساعدة الحالات والتطبيقات العملية الحوارات والنقاشات الموجهة تمثيل ولعب الادوار ورش العمل ومشاركة المتدربين نموذج استطلاع الراي قاعات التدريب بفنادق 5 نجوم تناول الوجبات الخفيفة والمشروبات اثناء البرنامج ………………………………………… يوفر مركز الفرسان الدولي للتدريب مزايا كثيرة ضمن برنامج الدورات التدريبية تتضمن : * خصومات خاصة للمجموعات * خصومات خاصة للتسجيل المبكر * الدورات التدريبية تنفذ باللغتين : العربية أو الإنجليزية حسب تفضيلكم * القاعة التدريبية على مستوى فندقي 5 نجوم * خصومات في العديد من الفنادق و تسهيلات في السكن * وغيرها من المزايا ......... * الشهادات : يحصل المتدرب على شهادة معتمده دوليا من مركز الفرسان الدولي للتدريب لمزيد من المعلومات عن الدورات والمحتوى العلمى والتكلفة والمواعيد يرجى التواصل على الارقام الاتية للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام

#مركز_الفرسان_الدولي_للتدريب #Alforssan International Training Center بسم الله الرحمن الرحيم مركزالفرسان الدولي للتدريب AL-Forssan يقدم دورات فى إداة الأمن يمكنكم التسجيل او الاستفسارعلى الدورة الان ......................... يحصل المتدرب على شهادة معتمدة من مركز الفرسان الدولي للتدريب للتواصل والإستفسار وطلب المحتوي العلمى يرجى التواصل بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام دورة كتابة التقارير الأمنية دورة إدارة الحوادث الأمنية والتحقيقات دورة الإجراءات والسياسات الأمنية دورة شهادة في الإشراف على العمليات الأمنية دورة إدارة الأمن المادي ومراقبة الدخول دورة الأخصائي المعتمد في الأمن الرقمي دورة شهادة في إدارة الأمن دورة شهادة في إدارة أنظمة الأمن والسلامة دورة تأمين مسرح الجريمة وإجراءات جمع الأدلة الجنائية دورة استراتيجيات الإمن القومي دورة مسرح الجريمة دورة التحليل الأستخباري المتقدمة دورة الإدارة المتكاملة للطوارىء دورة الإمن الوطني دورة العلوم فى القيادة الشرطية والأمنية دورة إدارة استمرارية الأعمال دورة اجراءات القبض والتفتيش دورة ادارة الكوارث دورة ادارة النشاط التدريبي في المؤسسات الأمنية دورة استراتيجيات الأمن القومى دورة استراتيجيات التخطيـط الأمني دورة استراتيجيات التخطيط والتنظيم الادارى والتوجيه و إدارة الأزمات دورة استراتيجيات تأمين المنشآت ضد التخريب دورة الاتجاهات الحديثة في التحقيقات الإدارية دورة الاتجاهات الحديثة للتفتيشات الامنية واجراء عمليات المسح الأمني للمنشآت الحساسة دورة الشرطة والإمن دورة الاجراءات الامنية المتقدمة والتنسيق واعداد اللجان الامنية فى ادارة الازمات دورة الادارة الأمنية دورة الاستراتيجيات الحديثة لتنمية مهارات الإدراك والحس الأمني والتفكير الذهني دورة الاشراف الأمني دورة الإجراءات الدولية لحماية الشخصيات الهامة دورة الإحتراف والممارسة الدولية للأعمال الأمنية دورة الإستخبارات والمراقبة الامنية دورة الإعداد الإنسانى لرجل الأمن دورة الإعلام الأمني ومبدأ الشفافية دورة الإنتربول والأمن الدولي دورة الأدوات الفنية والتكنولوجية في إدارة التحقيقات الأمنية دورة الأساليب الأمنية لتفعيل الأداء وتنظيم اللوائح وتبسيط الإجراءات دورة الأساليب الحديثة في التفتيش و التحقيـق والاستجواب الأمنـي دورة الأساليب الحديثة لأمن وحراسة المنشآت دورة الأساليب الحديثة لكشف أساليب التزوير دورة الأسس الفنية للتحقيقات الأمنية دورة الأمن السياحى للعاملين بقطاع السياحة دورة الأمن القومي والوقاية من مكافحة جرائم التسلل دورة الأمن القومي وتحليل المعلومات الأمنية دورة الأمن والسلامة للمنشآت العامة دورة البرنامج التدريبي المتقدم في السيطرة على أمن المنشآت الهامة دورة التخطيط الاستراتيجى للوقاية من الجريمة دورة التخطيط لعمليات القبض والتفتيش وإعداد الكمائن دورة التخطيط وبحوث العمليات في صنع القرار الأمني دورة التدريب الأمني " بين النظرية والتطبيق دورة التدريب الأمني الحديث لمواجهة الجرائم المستجدة دورة التطوير الاستراتيجي في المؤسسات الأمنية دورة التعامل الأمنى مع المظاهرات والإعتصامات دورة التفتيش الامني الجمركي وأهمية توظيف لغة الجسد في التفتيشات دورة التفتيش الذاتي – أجهزة التفتيش تحليل الصور دورة التفتيشات الأمنية " الإجراءات – ووسائل الضبط " دورة التقنيات الحديثة في حراسة وتأمين المنشآت الإصلاحية والعقابية دورة التقنيات الحديثة للأمن فى المصارف دورة الحس الامنى ولغة الجسد دورة المراقبة والاستطلاع لامن الفنادق دورة المراقبة والإستطلاع وجمع المعلومات لنقل وتأمين وحراسة النزلاء والموقوفين أمنياً وسياسياً دورة النقل الجوي بين العبقرية الإرهابية والتدابيرالأمنية دورة الهندسة الأمنية لتأمين المنشآت الحيوية والحساسة والتخطيط لادارة الطوارئ دورة إعتبارات الحراسة الأمنية وحماية الموانئ البرية والجوية والبحرية دورة إعداد رؤساء أقسام الدفاع المدنى دورة أخلاقيات وسلوكيات أفراد البحث الجنائى دورة أساليب تطوير الدوريات الأمنية دورة أسلوب إعداد السياسة الأمنية للمنشـأة دورة أمن المطارات التأسيسية دورة أمن المطارات والمنافذ دورة أمن المعلومات وحمايتها من قبل القرصنة الالكترونية وكيفية تأسيس فرق عمل لمكافحة الجريمة دورة أمن المنشأت الحيوية دورة أمن الوثائق والمستندات والمعلومات الأمنية دورة أمن أجهزة المعلومات دورة أمن وحماية المطارات والمنافذ دورة أهمية الدوريات الأمنية في الوقاية من الجريمة دورة برنامج زرع وتركيب وصيانة كاميرات المراقبة دورة تأمين الاحتفالات والمؤتمرات والإجتماعات دورة تأمين مسرح الجريمة وإجراءات جمع الأدلة الجنائية دورة تأمين و حماية المنشآت و الشخصيات طبقاً لمعايير منظمات الأمن الدولية دورة تأمين وحراسة المنشآت الجامعية والتعليمية دورة تحديث وتطوير الإجراءات الأمنية في ظل المتغيرات العالمية دورة تدريب المدربين في المؤسسات الأمنية دورة تقييم وتقدير نسب النجاح فى المهام الأمنية دورة تلقى البلاغات بغرف العمليات دورة تنمية المهارات الميدانية لضباط العمليات الأمنية دورة تنمية مهارات الحس الأمني دورة لغة المكان من الناحية الامنية دورة مهارات الدفاع عن النفس دورة مهارات كتابة التقارير الأمنية …………………………… للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام كما يعقد مركز الفرسان الدولي للتدريب الدورات التالية بالتخصصات المذكورة ( دورات الإدارة والقيادة - دورات الموارد البشرية والتدريب - دورات الجودة والأنتاجية - دورات المشتريات والمخازن اللوجستية - دورات إدارة الإمن - دورات السلامة والصحة والبيئة - دورات التسويق والمبيعات وخدمة العملاء - دورات الأعلام والعلاقات العامة - دورات المحاسبة والخدمات المالية - دورات القانون والعقود - دورات البنوك والخدمات المالية - دورات التخطيط وإدارة المشروعات - دورات التأمينات - دورات النفط والغاز - دورات التجارة الخارجية ودراسة الجدوي - دورات تخطيط أعمال الصيانة - دورات الهندسة المدنية وأعمال البناء - دورات الطاقة الكهربائية - دورات الجمارك والموانيء - دورات الخدمات الطبية - دورات السكرتارية وإدارة المكاتب ) ………………………………. إسلوب إعداد البرنامج التدريبى : المحاضرات: ينفذ الدورات مجموعة من الخبراء المتخصصون في مجالات التدريب المختلفة المادة العلمية: وهي مكتوبة على شرائح تعليمية باستخدام برنامج Power Point كوسائل مساعدة الحالات والتطبيقات العملية الحوارات والنقاشات الموجهة تمثيل ولعب الادوار ورش العمل ومشاركة المتدربين نموذج استطلاع الراي قاعات التدريب بفنادق 5 نجوم تناول الوجبات الخفيفة والمشروبات اثناء البرنامج ………………………………………… يوفر مركز الفرسان الدولي للتدريب مزايا كثيرة ضمن برنامج الدورات التدريبية تتضمن : * خصومات خاصة للمجموعات * خصومات خاصة للتسجيل المبكر * الدورات التدريبية تنفذ باللغتين : العربية أو الإنجليزية حسب تفضيلكم * القاعة التدريبية على مستوى فندقي 5 نجوم * خصومات في العديد من الفنادق و تسهيلات في السكن * وغيرها من المزايا ......... * الشهادات : يحصل المتدرب على شهادة معتمده دوليا من مركز الفرسان الدولي للتدريب لمزيد من المعلومات عن الدورات والمحتوى العلمى والتكلفة والمواعيد يرجى التواصل على الارقام الاتية للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام

#مركز_الفرسان_الدولي_للتدريب #Alforssan International Training Center بسم الله الرحمن الرحيم مركزالفرسان الدولي للتدريب AL-Forssan يقدم دورات فى إداة الأمن يمكنكم التسجيل او الاستفسارعلى الدورة الان ......................... يحصل المتدرب على شهادة معتمدة من مركز الفرسان الدولي للتدريب للتواصل والإستفسار وطلب المحتوي العلمى يرجى التواصل بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام دورة كتابة التقارير الأمنية دورة إدارة الحوادث الأمنية والتحقيقات دورة الإجراءات والسياسات الأمنية دورة شهادة في الإشراف على العمليات الأمنية دورة إدارة الأمن المادي ومراقبة الدخول دورة الأخصائي المعتمد في الأمن الرقمي دورة شهادة في إدارة الأمن دورة شهادة في إدارة أنظمة الأمن والسلامة دورة تأمين مسرح الجريمة وإجراءات جمع الأدلة الجنائية دورة استراتيجيات الإمن القومي دورة مسرح الجريمة دورة التحليل الأستخباري المتقدمة دورة الإدارة المتكاملة للطوارىء دورة الإمن الوطني دورة العلوم فى القيادة الشرطية والأمنية دورة إدارة استمرارية الأعمال دورة اجراءات القبض والتفتيش دورة ادارة الكوارث دورة ادارة النشاط التدريبي في المؤسسات الأمنية دورة استراتيجيات الأمن القومى دورة استراتيجيات التخطيـط الأمني دورة استراتيجيات التخطيط والتنظيم الادارى والتوجيه و إدارة الأزمات دورة استراتيجيات تأمين المنشآت ضد التخريب دورة الاتجاهات الحديثة في التحقيقات الإدارية دورة الاتجاهات الحديثة للتفتيشات الامنية واجراء عمليات المسح الأمني للمنشآت الحساسة دورة الشرطة والإمن دورة الاجراءات الامنية المتقدمة والتنسيق واعداد اللجان الامنية فى ادارة الازمات دورة الادارة الأمنية دورة الاستراتيجيات الحديثة لتنمية مهارات الإدراك والحس الأمني والتفكير الذهني دورة الاشراف الأمني دورة الإجراءات الدولية لحماية الشخصيات الهامة دورة الإحتراف والممارسة الدولية للأعمال الأمنية دورة الإستخبارات والمراقبة الامنية دورة الإعداد الإنسانى لرجل الأمن دورة الإعلام الأمني ومبدأ الشفافية دورة الإنتربول والأمن الدولي دورة الأدوات الفنية والتكنولوجية في إدارة التحقيقات الأمنية دورة الأساليب الأمنية لتفعيل الأداء وتنظيم اللوائح وتبسيط الإجراءات دورة الأساليب الحديثة في التفتيش و التحقيـق والاستجواب الأمنـي دورة الأساليب الحديثة لأمن وحراسة المنشآت دورة الأساليب الحديثة لكشف أساليب التزوير دورة الأسس الفنية للتحقيقات الأمنية دورة الأمن السياحى للعاملين بقطاع السياحة دورة الأمن القومي والوقاية من مكافحة جرائم التسلل دورة الأمن القومي وتحليل المعلومات الأمنية دورة الأمن والسلامة للمنشآت العامة دورة البرنامج التدريبي المتقدم في السيطرة على أمن المنشآت الهامة دورة التخطيط الاستراتيجى للوقاية من الجريمة دورة التخطيط لعمليات القبض والتفتيش وإعداد الكمائن دورة التخطيط وبحوث العمليات في صنع القرار الأمني دورة التدريب الأمني " بين النظرية والتطبيق دورة التدريب الأمني الحديث لمواجهة الجرائم المستجدة دورة التطوير الاستراتيجي في المؤسسات الأمنية دورة التعامل الأمنى مع المظاهرات والإعتصامات دورة التفتيش الامني الجمركي وأهمية توظيف لغة الجسد في التفتيشات دورة التفتيش الذاتي – أجهزة التفتيش تحليل الصور دورة التفتيشات الأمنية " الإجراءات – ووسائل الضبط " دورة التقنيات الحديثة في حراسة وتأمين المنشآت الإصلاحية والعقابية دورة التقنيات الحديثة للأمن فى المصارف دورة الحس الامنى ولغة الجسد دورة المراقبة والاستطلاع لامن الفنادق دورة المراقبة والإستطلاع وجمع المعلومات لنقل وتأمين وحراسة النزلاء والموقوفين أمنياً وسياسياً دورة النقل الجوي بين العبقرية الإرهابية والتدابيرالأمنية دورة الهندسة الأمنية لتأمين المنشآت الحيوية والحساسة والتخطيط لادارة الطوارئ دورة إعتبارات الحراسة الأمنية وحماية الموانئ البرية والجوية والبحرية دورة إعداد رؤساء أقسام الدفاع المدنى دورة أخلاقيات وسلوكيات أفراد البحث الجنائى دورة أساليب تطوير الدوريات الأمنية دورة أسلوب إعداد السياسة الأمنية للمنشـأة دورة أمن المطارات التأسيسية دورة أمن المطارات والمنافذ دورة أمن المعلومات وحمايتها من قبل القرصنة الالكترونية وكيفية تأسيس فرق عمل لمكافحة الجريمة دورة أمن المنشأت الحيوية دورة أمن الوثائق والمستندات والمعلومات الأمنية دورة أمن أجهزة المعلومات دورة أمن وحماية المطارات والمنافذ دورة أهمية الدوريات الأمنية في الوقاية من الجريمة دورة برنامج زرع وتركيب وصيانة كاميرات المراقبة دورة تأمين الاحتفالات والمؤتمرات والإجتماعات دورة تأمين مسرح الجريمة وإجراءات جمع الأدلة الجنائية دورة تأمين و حماية المنشآت و الشخصيات طبقاً لمعايير منظمات الأمن الدولية دورة تأمين وحراسة المنشآت الجامعية والتعليمية دورة تحديث وتطوير الإجراءات الأمنية في ظل المتغيرات العالمية دورة تدريب المدربين في المؤسسات الأمنية دورة تقييم وتقدير نسب النجاح فى المهام الأمنية دورة تلقى البلاغات بغرف العمليات دورة تنمية المهارات الميدانية لضباط العمليات الأمنية دورة تنمية مهارات الحس الأمني دورة لغة المكان من الناحية الامنية دورة مهارات الدفاع عن النفس دورة مهارات كتابة التقارير الأمنية …………………………… للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام كما يعقد مركز الفرسان الدولي للتدريب الدورات التالية بالتخصصات المذكورة ( دورات الإدارة والقيادة - دورات الموارد البشرية والتدريب - دورات الجودة والأنتاجية - دورات المشتريات والمخازن اللوجستية - دورات إدارة الإمن - دورات السلامة والصحة والبيئة - دورات التسويق والمبيعات وخدمة العملاء - دورات الأعلام والعلاقات العامة - دورات المحاسبة والخدمات المالية - دورات القانون والعقود - دورات البنوك والخدمات المالية - دورات التخطيط وإدارة المشروعات - دورات التأمينات - دورات النفط والغاز - دورات التجارة الخارجية ودراسة الجدوي - دورات تخطيط أعمال الصيانة - دورات الهندسة المدنية وأعمال البناء - دورات الطاقة الكهربائية - دورات الجمارك والموانيء - دورات الخدمات الطبية - دورات السكرتارية وإدارة المكاتب ) ………………………………. إسلوب إعداد البرنامج التدريبى : المحاضرات: ينفذ الدورات مجموعة من الخبراء المتخصصون في مجالات التدريب المختلفة المادة العلمية: وهي مكتوبة على شرائح تعليمية باستخدام برنامج Power Point كوسائل مساعدة الحالات والتطبيقات العملية الحوارات والنقاشات الموجهة تمثيل ولعب الادوار ورش العمل ومشاركة المتدربين نموذج استطلاع الراي قاعات التدريب بفنادق 5 نجوم تناول الوجبات الخفيفة والمشروبات اثناء البرنامج ………………………………………… يوفر مركز الفرسان الدولي للتدريب مزايا كثيرة ضمن برنامج الدورات التدريبية تتضمن : * خصومات خاصة للمجموعات * خصومات خاصة للتسجيل المبكر * الدورات التدريبية تنفذ باللغتين : العربية أو الإنجليزية حسب تفضيلكم * القاعة التدريبية على مستوى فندقي 5 نجوم * خصومات في العديد من الفنادق و تسهيلات في السكن * وغيرها من المزايا ......... * الشهادات : يحصل المتدرب على شهادة معتمده دوليا من مركز الفرسان الدولي للتدريب لمزيد من المعلومات عن الدورات والمحتوى العلمى والتكلفة والمواعيد يرجى التواصل على الارقام الاتية للتواصل والإستفسار ومعرفة المحتوي العلمى يرجى الاتصال بـ الاستاذة : نادين عز Mob/what’s app : 002 01200571999 Email. info@alforssan.com Website: www.alforssan.com ولكم جزيل الشكر والإحترام