日期:2008-11-01  浏览次数:20848 次


Get the clients MAC(Media Access Control) address, a hardware address that uniquely identifies each
node of a network. Works great on LAN's. Firewalls and Proxy's will be an issue depending what side of
them you're coding for.


Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!

 

'**************************************
' for :MAC address
'**************************************
This code is AS IS! I had a need For it on a
project I was working On and found almost no info
anywhere On what I needed To accomplish. If it
helps you, great! If it does Not work For you:
1.Make sure you're Not trying To hit on the same
pc it's on.
2.Comment out where the file gets deleted
(fso.deletefile "c:\" & strIP & ".txt"), To view
some potential Error info.
3.Have fun debugging :) (I did)

code:
Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!

 

'**************************************
' Name: MAC address
' Description:Get the clients MAC(Media
' Access Control)
address, a hardware address that uniquely
identifies Each node of a network. Works great on
LAN's. Firewalls and Proxy's will be an issue
depending what side of them you're coding for.
' By: Jerry Aguilar
'
'
' Inputs:None
'
' Returns:Returns the client IP and MAC
' address.
'
'Assumes:You can't navigate to it runnin
' g PWS on the same
pc but If you are running PWS, you can navigate
To it from another pc on the same lan (it does
Not like 127.0.0.1)
'
'Side Effects:None
'
'Warranty:
'code provided by Planet Source Code(tm)
' (www.Planet-Source-Code.com) 'as is', wi
' thout warranties as to performance, fitn
' ess, merchantability,and any other warra
' nty (whether expressed or implied).
'Terms of Agreement:
'By using this source code, you agree to
' the following terms...
' 1) You may use this source code in per
' sonal projects and may compile it into a
' n .exe/.dll/.ocx and distribute it in bi
' nary format freely and with no charge.
' 2) You MAY NOT redistribute this sourc
' e code (for example to a web site) witho
' ut written permission from the original
' author.Failure to do so is a violation o
' f copyright laws.
' 3) You may link to this code from anot
' her website, provided it is not wrapped
' in a frame.
' 4) The author of this code may have re
' tained certain additional copyright righ
' ts.If so, this is indicated in the autho
' r's description.
'**************************************

<%@ LANGUAGE="VBSCRIPT"%>
<%
strIP = Request.ServerVariables("REMOTE_ADDR")
strMac = GetMACAddress(strIP)
strHost = Request.ServerVariables("REMOTE_HOST")
Function GetMACAddress(strIP)
Set net = Server.CreateObject("wscript.network")
Set sh = Server.CreateObject("wscript.shell")
sh.run "%comspec% /c nbtstat -A " & strIP & " > c:\" & strIP & ".txt",0,true
Set sh = nothin