Validar mediante la dirección MAC

27/03/2006 - 17:16 por Javi | Informe spam
Buenas tardes.

Sopesando distintos métodos en materia de seguridad, se me ha ocurrido
uno, que aun no siendo infalible, podría serme suficiente.

Mi intención es que cuando un usuario cualquiera abra una de mis hojas
de excel, el archivo contenga un form_load, en el cual se pida la dirección
MAC de la tarjeta de red del usuario (en vez de nombres, contraseñas, ...),
de modo que sólo se puedan abrir mis archivos de excel desde ordenadores que
están en la empresa (si alguien se lleva el excel a casa, no lo podrá abrir).

Así pues, no les voy a preguntar por todo el código que debería de poner,
ya que sería abusar de ustedes. Simplemente me gustaría saber cual es la
forma mediante código para saber la dirección MAC del usuario que abre el
excel (para compararlo a posteriori con una tabla de direcciones MAC validas).

Muchas gracias por su tiempo

P.D.: Ya puestos, para no marearles, qué debería de poner para saber el
nombre de usuario que inicio la sesión en el ordenador, el nombre del equipo,
y el grupo de trabajo/dominio al que pertenece.

Preguntas similare

Leer las respuestas

#1 Francisco GMAIL
27/03/2006 - 23:47 | Informe spam
Valida mejor el serial del disco duro, mas sencillo de obtener.
Funciona con el VBA excel
Saludos


Dim FileWsh As Object

Set FileWsh = CreateObject("Scripting.FileSystemObject")
MsgBox "Número de Serie del Volumen en Hexadecimal: " & Hex$( _
FileWsh.Drives("C").SerialNumber)
MsgBox "Número de Serie del Volumen en decimal: " & FileWsh.Drives( _
"C").SerialNumber
Set FileWsh = Nothing
Respuesta Responder a este mensaje
#2 KL
28/03/2006 - 00:26 | Informe spam
Hola Javi,

saber la dirección MAC del usuario


http://tinyurl.com/s3dpv

nombre de usuario


http://www.erlandsendata.no/english...osusername

el nombre del equipo


http://www.erlandsendata.no/english...mputername

el grupo de trabajo/dominio


http://support.microsoft.com/kb/q148835/

Saludos,
KL
Respuesta Responder a este mensaje
#3 Hernandez, Roberto
28/03/2006 - 01:34 | Informe spam
Saludos KL.
No tengo acceso a Internet.
Podrias postear un fragmento (lo nuclear) de:

saber la dirección MAC del usuario
http://tinyurl.com/s3dpv

Gracias!
Respuesta Responder a este mensaje
#4 Francisco Parrilla
06/08/2006 - 13:01 | Informe spam
Por script para saber la direccion MAC

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "oot\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_NetworkAdapter",,48)

For Each objItem in colItems
WScript.Echo "MACAddress: " & objItem.MACAddress
Exit for
Next


y por MSDOS partiendo de XP

c:btstat -a "LA-IP"

nos resulta al final la direccion MAC

Saludos
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida