آموزش اکسس

آموزش مایکروسافت اکسس - Access Training

آموزش اکسس

آموزش مایکروسافت اکسس - Access Training

آموزش اکسس

ارائه آموزش‌ها و نکات کلیدی مربوط به نرم افزار اکسس.
جزییات و نکات ریز اکسس را با ما داشته باشید و پویایی دوباره‌ای به برنامه خودتان دهید.

آخرین نظرات

بسم الله الرحمن الرحیم

سلام

 

برای برخی از برنامه نویسان، بدست آوردن مشخصات سیستم کاربر شاید امری اجتناب ناپذیر باشد.

به گونه‌ای که زیربنای امنیت برنامه خود را وابسته به این شاخصه‌ها می‌کنند تا قدم‌های رعایت امنیت را محکم‌تر بردارند.

در همین راستا بدست آوردن مک‌آدرس رایانه کاربر شاید یکی از پله‌ها باشد که در این آموزش قصد دارم تا چگونگی بدست آوردن این شناسه را مرور کنیم.

بدست آوردن Mac Address به صورت عادی و با امکانات موجود امکان پذیر نیست، لذا شما باید با استفاده از یک ماژول این شناسه را بدست آورید.

پس یک ماژول جدید ایجاد کنید و کدهای زیرا درونش قرار دهید؛

Function GetMyMACAddress() As String
'Published by Access-Training.blog.ir'
'You are allowed to expand this module. Please do not delete the publisher name.'

'Declaring the necessary variables.
Dim strComputer     As String
Dim objWMIService   As Object
Dim colItems        As Object
Dim objItem         As Object
Dim myMACAddress    As String
    
'Set the computer.
strComputer = "."
    
'The root\cimv2 namespace is used to access the Win32_NetworkAdapterConfiguration class.
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
    
'A select query is used to get a collection of network adapters that have the property IPEnabled equal to true.
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
    
'Loop through all the collection of adapters and return the MAC address of the first adapter that has a non-empty IP.
For Each objItem In colItems
   If Not IsNull(objItem.IPAddress) Then myMACAddress = objItem.MACAddress
   Exit For
Next
   'Return the IP string.
   GetMyMACAddress = myMACAddress

End Function

اکنون به سادگی هرچه تمامتر مک آدرس یا مک آی پی خودتون را از طریق متغیر GetMyMACAddress استخراج کنید.

  • میـMiRـزا
  • http://access-training.blog.ir/post/60

Mac_Address

wmic

ماژول

نظرات  (۰)

هیچ نظری هنوز ثبت نشده است

ارسال نظر

ارسال نظر آزاد است، اما اگر قبلا در بیان ثبت نام کرده اید می توانید ابتدا وارد شوید.
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">