بحث مخصص من جوجل فى أوفيسنا
![]()
Custom Search
|
-
Posts
1228 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
3
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو محمد سلامة
-
الترقيم التلقائي في الشبكة المحلية كل سنة
محمد سلامة replied to علي محمد الكعبي's topic in قسم الأكسيس Access
اسمحوا لي بالمشاركة اذا كان الوارد العام ياتي للمؤسسة كلها في قسم واحد ثم يعاد توزيعه.. هنا لابد ان يكون لديك رقم للوارد العام متصل مستقل.. ثم عند احالت الوارد الي اي قسم داخلي هنا يتم ترقيم منفصل لكل قسم اما الصادر العام فيجب ان يكون متصل علي مستوي المؤسسة ككل والصادر الداخلي يجب ان يكون مستقل منفصل لكل قسم مع تمييز كل قسم برقم خاص به ومتسلسل تحياتي -
الترقيم التلقائي في الشبكة المحلية كل سنة
محمد سلامة replied to علي محمد الكعبي's topic in قسم الأكسيس Access
الله عليك يابوعبدالله مثال جميل تحياتى -
تقسيم قاعدة البيانات وتحويلها الى برنامج تنفيذي
محمد سلامة replied to سامي الضالعي's topic in قسم الأكسيس Access
السلام عليكم الطريقة المثالية ةخصوصا انك تقول ان اكثر من مستخدم سيعمل عليها 1- يتم تقسيم القاعدة الى قسمين (القسم الاول ــ النماذج والتقارير والماكرو والوحدات النمطية) .. (القسم ثانيا ــ الجداول) 2- يتم توزيع البرنامج ( القسم الاول النماذج والتقارير .. الخ) على اجهزة جميع المستخدمين الذين سيعملون عليه. 3- يتم عمل فولدر شير او السيرفر وتقوم بوضع (القسم الثانى الجداول) على السيرفر 4- تذهب لكل مستخدم وتقوم بربط النسخ التى لديه بنسخة الجداول 5- يمكنك تقسيم العمل بين المستخدمين عن طريق الصلاحيات تحياتى -
والله ياخ علي الامر بسيط انت بس دور عليه في اعلي الصفحة..
-
تضغط علي الرسائل في اعلي الصفحة وهى علي شكل ظرف صغير ثم تضغط عل مشاهدة كل الرسائل ثم سيظهر لك كل الرسائل المرسلة من الاعضاء اليك والعكس تقوم بتحديد الكل وتضغط على زر حذف او ابعتلي ايميلك
-
السلام عليكم معلمي وأستاذي ابو خليل يعني الباركود لو اتمرر علي بطاقة شخصية او بطاقة اقامة... بها رقم البطاقة او رقم الاقامة سوف يقرأ الرقم.. ام لابد من تحويل الرقم علي شكل خطوط الباركود يعني الخلاصة كده بيقرأ رقم عادي ولا بيقرأ خطوط الباركود ويحولها لرقم في مربع النص واعذرني لانني ليس لدي جهاز للتجربة
-
الاستاذ علي الكعبي ممكن تحذف بعض من رسائلك علي الموقع هنا اريد ان ارسل لك رسالة و يرفض بسبب امتلاء الذاكرة للرسائل رسائلك الخاصة
-
تغيير لون حدود النموذج او الاطار المنبثق
محمد سلامة replied to سامي الضالعي's topic in قسم الأكسيس Access
هذا يرجع الي اصدار الويندوز لديك فمثلا الصورة المرفقة هي لويندوز اكس بي وفي ويندوز 8 يمكنك تغيير لون الاطار كما تحب هذا والله اعلم -
المساعدة في تلوين سجلات النموذج الفرعي حسب التسلسل
محمد سلامة replied to حربي العنزي's topic in قسم الأكسيس Access
السلام عليكم في خصائص التفصيل للنموذج الفرعي ستجد لون سطر الخلفية ولون البديل حدد الالوان التي تريدها ثم احفظ واغلاق النموذج.. وقم بمعاينته -
اخي الكريم انت قسمت البرنامج.. ووضعت كود للتأكد من الربط عند اغلاق النموذج الافتتاحي هل يوجد شئ غير مفهوم هذا بسبب عدم اضافة مرجع غدا نستكمل باذن الله
-
عفوا اخي انقطع التيار الكهربائي واحدثك من الموبيل نعم يعمل علي شبكة محلية وبدون مشاكل
-
اخى الكريم مرفقك الاخير يعمل بدون مشاكل وانت بنفسك ضايف الاكواد شغال نموذج start وهو سيرتبط تلقائياً
-
طيب سيبك من المرفق افتح وحدة نمطية جديدة وقم بتسميتها modRelinker وادرج بها هذا الكود Option Compare Database Option Explicit Public Function CheckLinks(ByVal strDBPassword As String) As Boolean On Error GoTo CheckLinksErr Dim tdf As TableDef Dim strNewMDB As String Dim fd As FileDialog For Each tdf In CurrentDb.TableDefs If UCase(Left(tdf.Name, 6)) <> "COMPAS" Then If Len(tdf.Connect) > 0 And tdf.Fields.Count = 0 Then If Len(strNewMDB) = 0 Then Call MsgBox("ãä ÝÖáß ÇáÈÑäÇãÌ ÛíÑ ãÊÕá ÈÞÇÚÏÉ ÇáÈíÇäÇÊ ÇáÑÆíÓíÉÇáãÓãì (ÇßÊÈ ÇÓã ÇáÞÇÚÏÉ ÇáÎáÝíÉ åäÇ ÜÜ ÞÇÚÏÉ ÇáÌÏÇæá)", vbCritical, "SOFT SAMPLE -Pro.In.Out") Set fd = Application.FileDialog(msoFileDialogFilePicker) With fd .AllowMultiSelect = False .InitialFileName = CurrentDBFolder() .Filters.Add "Access Database File (*.accdb)", "*.accdb", 1 .Title = "Select Back-End Data File" .ButtonName = "Link Tables" If .Show = False Then Exit Function Else strNewMDB = .SelectedItems(1) End If End With End If If (IsNull(strDBPassword) = True) Or (strDBPassword = "") Then tdf.Connect = ";DATABASE=" & strNewMDB Else tdf.Connect = ";DATABASE=" & strNewMDB & ";PWD=" & strDBPassword End If tdf.RefreshLink End If End If Next tdf CheckLinks = True CheckLinksDone: Exit Function CheckLinksErr: MsgBox "Error #" & err.Number & ": " & err.Description, vbCritical Resume CheckLinksDone End Function Public Function CurrentDBFolder() As String Dim strPath As String strPath = CurrentDb.Name Do While Right$(strPath, 1) <> "\" strPath = Left$(strPath, Len(strPath) - 1) Loop CurrentDBFolder = strPath End Function وفى النموذج الافتتاحى فى بداية البرنامج ضع الكود التالى Private Sub Form_Close() On Error Resume Next If CheckLinks("admin") = False Then Call Quit End If Dim tdfs As DAO.TableDefs Dim tdf As TableDef Dim sSourceDB As String Dim sBackupDB As String Dim backDBName As String Set tdfs = CurrentDb.TableDefs Set tdf = tdfs(tdfs.Count - 1) sSourceDB = Right(tdf.Connect, Len(tdf.Connect) - 10) backDBName = Dir(mID(tdf.Connect, 11)) sBackupDB = mID(tdf.Connect, 11, Len(tdf.Connect) - (Len(backDBName) + 10)) ' DoCmd.OpenForm "LNK_TBL_DLG" DoCmd.Close acForm, Me.Name End Sub وقم بعمل كلمة سر لقاعدة البيانات الخلفية باسم admin
-
جرب كده .. وتحت امركlink - m.salama.rar
-
ما اصدار الاكسس لديك
-
عيونى .. ثوانى غريبة مع ان كل المرفقات اللى فى المشاركة هنا باصدار اعلى من 2003 كيف كنت تطلع عليها ؟؟؟ وانا حملت المثال الاخير وعدلت عليه فقط
-
السلام عليكم ورحمة الله وبركاته لو تسمحوا لى بالمشاركة معكم فى هذا الموضوع يوجد اكثر من طريقة لهذا الموضوع ولكنى اكثر طريقة عجبتنى واستخدمها فى جميع برامجى للعملاء هى طريقة خاصة باستاذنا ومعلمنا ابوخليل بارك الله فيه ميزة هذه الطريقة هى انك تستطيع عمل كلمة مرور لقاعدة البياناتالخلفية (قاعدة الجداول) وتمرير كلمة السر من قاعدة الوجهات واليك الطريقة فى المثال التالى كلمة السر لقاعدة البيانات الخلفية admin وبعد تحميل ال بروجرس بار سيتاكد من الاتصال بالقاعدة ويظهر لك الشاشة الرئيسية (يمكنك تغييرها باى نموذج تريده) اذا تغيير مكان القاعدة الخلفية وعند تشغيل البرنامج سيطلب منك اختيار مكان القاعدة الجديدة لانه تغيير مكانها link - m.salama.rar
-
تشفير قواعد البيانات مشكلة حماية قاعدة البيانات بكلمة سر التشفير
محمد سلامة replied to saimon.91's topic in قسم الأكسيس Access
يجب اعادة الارتباط بقاعدة الجداول مرة اخري بعد عمل كلمة المرور -
احضار محتويات فولدر خارجى الى البرنامج
محمد سلامة replied to محمد سلامة's topic in قسم الأكسيس Access
جزاك الله خيرا وبارك الله فيك مهما احاول ان اشكرك لن اوافيك حقك شكرا جزيلا فعلا ونعمة الاخ والمعلم -
احضار محتويات فولدر خارجى الى البرنامج
محمد سلامة replied to محمد سلامة's topic in قسم الأكسيس Access
وعليكم السلام وحضرتك بخير وسعادة وشكرا لك تفاعلك ومتابعة الموضوع.. بارك الله فيك استاذ جعفر شكرا استاذ محمد وكل سنه وحضرتك طيب شكرا جزيلا استاذ جعفر هذا كان طمع في بحر خيركم وعطائكم وعدم بخلك علينا في الرد علي استفسارتنا فبارك الله فيكم جميعا وجاري المتابعة والاطلاع -
مربع نص يتم تنسيقه بنوعين من الخطوط
محمد سلامة replied to سامي الضالعي's topic in قسم الأكسيس Access
.... -
مربع نص يتم تنسيقه بنوعين من الخطوط
محمد سلامة replied to سامي الضالعي's topic in قسم الأكسيس Access
قام بنشر الان · ما هذا المرفق الرائع السلام عليكم هل يمكن معاينة التقرير بهذا الشكل؟؟ كيف نفتح التقرير بالاكسس بهذا الشكل -
احضار محتويات فولدر خارجى الى البرنامج
محمد سلامة replied to محمد سلامة's topic in قسم الأكسيس Access
Up -
تعطيل ازرار التصغير والاستعادة والاغلاق الخاص باطار الاكسس
محمد سلامة replied to ابوأسد's topic in قسم الأكسيس Access
ارجع للوراء في المشاركات ستجد موضوع متشابه مع موضوعك وقام الاستاذ ابوخليل جزاه الله خيرا الادراج كود يخفي ماتريده فقط ابحث في المشاركات للوراء