位于ASP中用组件检测当前网卡地址的代码

   Option Explicit

   Private Const NCBASTAT = &H33

   Private Const NCBNAMSZ = 16

   Private Const HEAP_ZERO_MEMORY = &H8

   Private Const HEAP_GENERATE_EXCEPTIONS = &H4

   Private Const NCBRESET = &H32

   Private Type NCB

        ncb_command As Byte 'Integer

        ncb_retcode As Byte 'Integer

        ncb_lsn As Byte 'Integer

        ncb_num As Byte ' Integer

        ncb_buffer As Long 'String

        ncb_length As Integer

        ncb_callname As String * NCBNAMSZ

        ncb_name As String * NCBNAMSZ

        ncb_rto As Byte 'Integer

        ncb_sto As Byte ' Integer

        ncb_post As Long

        ncb_lana_num As Byte 'Integer

        ncb_cmd_cplt As Byte  'Integer

        ncb_reserve(9) As Byte ' Reserved, must be 0

        ncb_event As Long

   End Type

   Private Type ADAPTER_STATUS

        adapter_address(5) As Byte 'As String * 6

        rev_major As Byte 'Integer

        reserved0 As Byte 'Integer

        adapter_type As Byte 'Integer

        rev_minor As Byte 'Integer

        duration As Integer

        frmr_recv As Integer

        frmr_xmit As Integer

        iframe_recv_err As Integer

        xmit_aborts As Integer

        xmit_success As Long

        recv_success As Long

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!