اذهب الي المحتوي
أوفيسنا

Daniello

02 الأعضاء
  • Posts

    82
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    1

مشاركات المكتوبه بواسطه Daniello

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

    لقد عدت إلى المنتدى بعد طول غياب

    بلى هناك طريقة أخي خضر وبدون الحاجة إلى ActiveX

    وهي أن يوضع الكود التالي في وحدة نمطية

    Option Compare Database
    
    Private Declare Function LoadImage Lib "user32" _
       Alias "LoadImageA" _
       (ByVal hInst As Long, _
       ByVal lpsz As String, _
       ByVal un1 As Long, _
       ByVal n1 As Long, _
       ByVal n2 As Long, _
       ByVal un2 As Long) _
       As Long
    
    Private Declare Function SendMessage Lib "user32" _
       Alias "SendMessageA" _
       (ByVal hWnd As Long, _
       ByVal wMsg As Long, _
       ByVal wParam As Long, _
       LParam As Any) _
       As Long
    
    Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
    
    Private Const WM_SETICON = &H80
    Private Const IMAGE_ICON = 1
    Private Const LR_LOADFROMFILE = &H10
    Private Const SM_CXSMICON    As Long = 49
    Private Const SM_CYSMICON    As Long = 50
    
    Public Function SetFormIcon(hWnd As Long, strIconPath As String) As Boolean
        Dim lIcon As Long
        Dim lResult As Long
        Dim X As Long, Y As Long
    
        X = GetSystemMetrics(SM_CXSMICON)
        Y = GetSystemMetrics(SM_CYSMICON)
        lIcon = LoadImage(0, strIconPath, 1, X, Y, LR_LOADFROMFILE)
        lResult = SendMessage(hWnd, WM_SETICON, 0, ByVal lIcon)
    End Function
    ويوضع الكود التالي بالنموذج عند حدث الفتح
    Private Sub Form_Open(Cancel As Integer)
       SetFormIcon Me.hWnd, "C:\MyIcon.ico"
    End Sub

    أتمنى أن تكون إجابتي واضحة

    ووفقنا الله وإياكم لما فيه خير لمنتدانا الغالي على قلوبنا

    والسلام

  2. هذا وصف للبرنامج

    أرجو أن تعذروني على هذه الترجمة الرديئة


    هيكل قائمة أسلوب مستكشف ويندوز . بنود قائمة العرض و قوائم التّفصيل باستخدام التريفيو و سيطرة ليستفيو . شكل القائمة قابل للصّياغة . تعريف القائمة هي مائدة معرّفة . إذا أردت الإضافة أو تغيير خبر عرض قائمة, فقط أضف, عدّل أو احذف دخولاً جدول قائمة . لا لوحات تحويل مدخل أكثر و أزرار ستدير صفوفك و تقاريرك . يمكن أن تدير القانون, الأشكال, التّقارير أو الأسئلة . قد بنت قائمتنا في الأمن و سمات رابطة المائدة . قد بنت قائمتنا في السّمات الأمنيّة باستخدام وحدة المدخل الأمنيّة أو يمكن أن تتجاهل هذه السّمات . البرنامج و بيانات قُسِّمَا . يتولّى برنامج القائمة تحديد ملفّ البيانات الباكيند . يمكن أن يكون هذا محلّيّ أو غطّى بشبكة المكان . تسمح الرّؤى بملفّ البيانات الرّئيسيّ و ملفّي بيانات موروثة لتُعَرَّف لكلّ قاعدة بيانات المفتوحة . يمكن أن يعرّف مخطّطات قاعدة بيانات الضّعف الغير محدودة . كل شيئ يُعْمَل بأشكال المدخل و شفرة في بي إيه . يتضمّن المنتج الكامل جميعًا كود برنامج .


    :$ :$ :$ :$ :$ :$ :$ :$ :$
  3. بسم الله الرحمن الرحيم


    لا أدري ماذا أصاب برامج مايكروسوفت بجهازي
    فكلما حاولت الدخول إلى الأكسس أو الوورد...
    تظهر لي رسالة تبلغني بأنني قمت بعملية غير شرعية
    وعندما حاولت إزالة Office XP من جهازي
    تظهر لي رسالة أخرى مفادها أن
    Msiexec قام بعملية غير شرعية وسيتم إيقافه

    وعندما حاولت تنصيب Microsoft Office 97 أو 2000
    تظهر لي نفس الرسالة


    فماذا علي أن أفعل ساعدوني أرجوكم



    :') :') :') :') :') :') :') :')
    • Thanks 1
  4. السلام عليكم ورحمة الله وبركاته،،

    شكراً جزيل الشكرأستاذي القدير محمد طاهر

    بارك الله فيك

    مثال أكثر من رائع

    أعرف كيف أعبر لك عن عميق امتناني لك

    شكراً جزيلاً مرة أخرى


    :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol:
  5. بسم الله الرحمن الرحيم


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

    :pp: :@
  6. بسم الله الرحمن الرحيم


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


    كما أشكرك جزيل الشكر على مساعدتك لي في المواضيع الأخرى
    :$ :$ :p :p :p
  7. السلام عليكم ورحمة الله وبركاته


    لدي جدول به: اسم المنتوج ، اسم الممون ، الكمية الموجودة بالمخزون
    وإليكم هذا المثال:


    اسم المنتوج اسم الممون الكمية بالمخزون
    مقص محمد 5
    سكين هشام 2
    لوحة عادل 3
    كرسي يوسف 15

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


    المقص 5 ملصقات
    سكين ملصقان
    لوحة 3 ملصقات
    كرسي 15 ملصقاً

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


    ساعدوني أرجوكم
  8. شكراً أخي أبو هادي على المساعدة


    لكن ما أريده بالضبط هو كالتالي:


    لدي نموذج بحث أقوم بواسطته البحث في نموذج آخر يضم ما يفوق 52000 سجل إذن ستأخذ عملية فتح النموذج وقتاً طويلا
    وقد قمت بنسخ الكود الذي أعطيتني إياه لكن لا يعمل الشريط إلا بعد فتح النموذح وبالتالي تكون كل البيانات قد ظهرت ولا فائدة من الشريط


    أما أنا فأريد أن يظهر الشريط قبل فتح النموذج بحيث ما إن يفتح النموذج حتى يكون الشريط قد وصل إلى 100


    :') :') استحملني أرجوك أخ أبوهادي :') :')
  9. لقد سبق وشكرت على هذا المثال الأكثر من رائع أخ أبو هادي
    لكن حبذا لو ساعدتني مساعدة صغيرة
    وهي كالتالي
    أريد عند فتح نموذج أن يظهر الشريط الأزرق
    ولكن لا أريد أن ينتهي الشريط الأزرق قبل فتح النموذجفهلا ساعدتني أرجوك


    :$ :$ :') :')
  10. شكراً أخ أبو هادي على مد يد العون

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

    علما أنني أتوفر على الإصدار الخامس لل VisualBasic بجهازي

    ساعدوني أرجوكم


    :') :') :') :@ :@ :@
  11. السلام عليكم

    تواجهني مشكلة في النموذج كلما قمت بإنشاء عنوان تتعطل كل أزرار الأوامر عن العمل وتظهر لي رسالة مفادها بأن هناك مشكلة في المحاورة بين OLE وتطبيقي - اعذروني إن أخطأت الترجمة لأنني أتوفر على Office xp باللغة الفرنسية لكوني في المغرب -

    ساعدوني أرجوكم

    :@ :@ :') :') :')

    • Thanks 1
  12. إليكم أيضاً هذه الهدية البسيطة

    مدخل إلى قواعد البيانات Access وهو كتاب لتعليم قواعد البيانات MS Access، يتكون الكتاب من 49 صفحة تحتوي على كيفية أنشاء وتصميم قواعد البيانات.

    ملاحظة: كلمة السر للملف هي shamel.net

    حملوه من هنا

    :pp: :pp:

  13. السلام عليكم يا إخواني

    الكثير منكم يرغبون في تعلم الأكسس

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

    إليكم هذا الموقع الذي يضم تقريباً معظم مصطلحات الأكسس ويعطيها تعريفاٌ دقيقاً حتى يسهل على الباحث كيفية التعامل مع الأكسس والتعرف على الأدوات وما إلى غير ذلك.

    مصطلحات الأكسس

    وهي من موقع الأستاذ أبو حمود

    • Thanks 1
×
×
  • اضف...

Important Information