• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

إياد بيك

اعضاء
  • عدد المشاركات

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

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

السمعه بالموقع

88 جيد

عن إياد بيك

  • الرتبة
    عضو
  • تاريخ الميلاد 12/27/1978

معلومات الملف الشخصي

  • الجنس ذكر
  • الدولة : مقيم هون بالرياض - السعودية
  • اهتمامات VB
    Ms Office

أحدث الزائرين لملفلك الشخصي

4,963 زياره للملف الشخصي
  1. وعليكم السلام ورحمة الله وبركاته   تفضل اخي الكريم  fffc.rar
  2. وعليكم السلام ورحمة الله وبركاته اخي الكريم انسخ كل التعليمات واخفظها في وحدة نمظية جديدة الان كل كاعليك هو تغيير اسم الملف والمسار في هذه التعليمة ثم تشغيلها بالضغط على F5 ثم الذهاب الى المسار المطلوب والتاكد من عمل الملف المطلوب Public Sub CopyFiles() 'FileCopy "d:\uniime.dlll", "C:\Windows\System32\uniime.dll" FileCopy "d:\test.txt", "C:\Windows\System32\test.txt" End Sub
  3. وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم احد الحلول التي وجدتها في احد المواقع   'API Declaration for WOW64 Restriction Private Declare Function Wow64DisableWow64FsRedirection Lib "kernel32" (ByRef OldValue As Long) As Long Private Declare Function Wow64RevertWow64FsRedirection Lib "kernel32" (ByRef OldValue As Long) As Long Private OldValue As Long 'Returns True when the restriction is On (Default) 'Returns False when the restriction is Off Public Property Get Wow64Restiction() As Boolean Wow64Restiction = IIf(OldValue > 0, False, True) End Property 'Pass False to turn the Restriction Off, 'Pass True to turn it On(On by default) Public Property Let Wow64Restiction(ByVal value As Boolean) 'On Error Resume Next 'Turn Restruction Off If value = False Then Wow64DisableWow64FsRedirection OldValue 'Turn Restriction On ElseIf value = True And OldValue > 0 Then Wow64RevertWow64FsRedirection OldValue OldValue = 0 End If End Property Public Sub Test() 'First call will copy the files to SysWOW64 CopyFiles 'Turn Restriction Off Wow64Restiction = False 'Second call will copy the files to System32 after the restriction was turned off. CopyFiles 'Restore the restriction back On Wow64Restiction = True End Sub Public Sub CopyFiles() 'FileCopy "d:\uniime.dlll", "C:\Windows\System32\uniime.dll" FileCopy "d:\test.txt", "C:\Windows\System32\test.txt" End Sub  
  4. مشكلة عند نقل القاعدة الى جهاز اخر

    السلام عليكم ورحمة الله وبركاته لعلاج المشكلة يجب الكشف عنها أي يجب الاطلاع على قاعدة بياناتك وطبعا ستقول لنا أنه لاتستطيع ذلك باعتبار انها من الاسرار الحربية ... لذلك حاول ارفاق الجزء الذي يتضمن المشكلة 
  5. وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم طلبك في المرفقات مع العلم ان اسم المستخدم سيتم اضافته عند ادراج سجل جديد في نموذج Patients login.rar
  6. السلام عليكم رورخمة الله وبركاته ارفق اخي الكريم المثال لتسهل علينا ايجاد المشكلة
  7. مشكور اخي ...
  8. وعليكم السلام ورحمة الله وبركاته اخي الكريم نصيحتي هي تغيير المسار ليصبح مثلا C:\Windows\addins  
  9. وعليكم السلام ورحمة الله وبركاته   تفضل اخي الكريم ولا تنسانا من التقييم طباعة تقارير لكل ادارة .rar
  10. لدي سؤالان واستفسار

    وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم طلبك   ولا تنسانا من التقييم Format Text.rar
  11. لدي سؤالان واستفسار

      وعليكم السلام ورحمة الله وبركاته اهلا بك اخي الكريم تضع في قاعدة التحقق من الصحة العبارة التالية:   Not Like "*[!((a-z) or (1-9))]*"   Format Text.rar
  12. وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم ظلبكم في المرفقات Smart Lab.lnk.rar
  13. كود لكل التقارير

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

    وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم Format Text.rar
  15. وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم طباعة تقارير لكل ادارة .rar