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

مسافر2

عضو جديد 01
  • Posts

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

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

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

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

    مسا الخير

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

    مثلا

    عندي فورم لشؤون الموظفين وفي قسم شؤون الموظفين جهازين اريد ان يفتح هذا البرنامج عندهم صفحات الخاصه لهم بدون باسرد او غيره لكن يفتح في جهاز المشتريات فورمات المشتريات وهكذا في كل الاقسم

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

    ' ÎÇÕ ÈÑÞã ÇáåÇÑÏÓß

    Dim obj_FSO As Object, obj_Drive As Object

    Set obj_FSO = CreateObject("Scripting.FileSystemObject")

    Set obj_Drive = obj_FSO.GetDrive("c:\")

    'MsgBox obj_Drive.SerialNumber

    ww = obj_Drive.SerialNumber

    Set obj_FSO = Nothing

    Set obj_Drive = Nothing

    ---------------

    اريد منك المساعده في طريقة الاستفاده منه في تحكم في فتح الفورامات وتعين ارقم الهاردسكات محدده لدخول عليه

    ولكم التحية

×
×
  • اضف...

Important Information