Avatar billede Angelo Praktikant
24. september 2005 - 17:45 Der er 5 kommentarer og
1 løsning

Et script der viser ens macadresse, og kun macadressen.

Hej derude

jeg har prøvet at lave følgende inde fra microsoft side,
men det lukker ned med det samme. har i nogen forslag?:

Set objShell = CreateObject("WScript.Shell")
Set objWshScriptExec = objShell.Exec("ipconfig /all")
Set objStdOut = objWshScriptExec.StdOut

While Not objStdOut.AtEndOfStream
  strLine = objStdOut.ReadLine
  If InStr(strLine,"Physical Address") Then
      WScript.Echo strLine
  End If
Wend



http://www.microsoft.com/technet/images/community/columns/scripts/images/sg100204_BIG.gif

http://www.microsoft.com/technet/community/columns/scripts/sg1002.mspx
Avatar billede nielle Nybegynder
24. september 2005 - 17:47 #1
Har du prøvet at afvikle dit script fra en DOS-boks?
Avatar billede Angelo Praktikant
24. september 2005 - 17:55 #2
ja, dog i windows 2000
Avatar billede nielle Nybegynder
24. september 2005 - 18:01 #3
Hvis du åbner en Kommandoprompt og skriver navnet på dit script, så skulle linjen med din MAC-adresse stadigvæk stå der når scriptet er færdigt med at køre.
Avatar billede kjulius Novice
24. september 2005 - 18:13 #4
Jeg tror du vil finde alt det du skal bruge i denne artikel
http://www.microsoft.com/technet/scriptcenter/topics/networking/02_atnc_basic.mspx

Som jeg læser artiklen kan du få alle de ønskede oplysninger uden at bruge dos commandoen...
Avatar billede Angelo Praktikant
24. september 2005 - 18:54 #5
Tak Kjulius, det var en god aktikel, vil du have nogen point?. Og også en tak til dig nielle:-)

jeg fik lavet dette:

On Error Resume Next

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery _
("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")

WScript.Echo VbCrLf & "MAC Masks"

For Each objNicConfig In colNicConfigs

  Set colNics = objWMIService.ExecQuery _
  ("ASSOCIATORS OF " & "{Win32_NetworkAdapterConfiguration.Index='" & _
  objNicConfig.Index & "'}" & _
  " WHERE AssocClass=Win32_NetworkAdapterSetting")

  For Each objNic in colNics

    WScript.Echo VbCrLf & "  " & objNic.AdapterType & " " & _
    objNic.NetConnectionID
    If Err Then
      WScript.Echo VbCrLf & "  Network Adapter " & objNicConfig.Index
    End If

    WScript.Echo "    " & objNicConfig.Description & VbCrLf
    WScript.Echo "    MAC Address:" & VbCrLf & _
    "        " & objNic.MACAddress
  Next

Next
Avatar billede kjulius Novice
24. september 2005 - 19:37 #6
Ja, det er en rigtig god artikel, og du har været god til at bruge den!
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester