Kennt jemand defcom.exe

Hallo Leute,

kennt jemand von euch das Tool "defcom.exe" (die genaue Schreibweise kenne ich nicht)?
Es soll ein Tool sein, mit dem man befehlszeilenorientiert Geräte im Gerätemanager deaktivieren kann.
Ich benötige da etwas, was ich in ein Script einbinden kann (unter NetInstall), womit ich über einen "execute" und entsprechende Parameter eine quiet- Deaktivierung der Geräte machen kann. Z.B. für WLan auf betimmten NBs, die das nicht haben dürfen.

Imperial Joined: 13 Jun 2004 Posts: 22 Location: Germany

Hallo Reiner,

ich vermute, du meinst das Microsoft-Tool "DEVCON" (DEVicemanager CONsole) - schau dir mal den KB-Artikel auf http://support.microsoft.com/default.aspx?scid=kb;EN-US;Q311272 an (inkl. Download Link)...

Gruß Frank

Hallo Frank,

ja, das ist es!

Danke Dir!!

Piccolo Joined: 07 Jul 2004 Posts: 1 Location: Duesseldorf

Hallo zusammen,

falls es jemand brauchen kann, so schalten wir alle WLAN-Karten per Script (Übergabeparameter enable bzw. disable):

Set WshShell = WScript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")

set args = WScript.Arguments
If args.Count = 0 Then
Switch = "disable"
Else
Switch = args.item(0)
End If

for each Connection in GetObject("winmgmts:{impersonationLevel=impersonate,(Debug)}").InstancesOf ("win32_NetworkAdapter")
If (Instr (UCase(Connection.Name),"WIRELESS") > 0) Or (Instr (UCase(Connection.Name),"WLAN") > 0) then
If Connection.PNPDeviceID <> "" then
PNPStrg = PNPStrg & " " & Left(Connection.PNPDeviceID, InstrRev(Connection.PNPDeviceID,"\") - 1)
end if
end if
next

'*********************** Die Sonderlocken ***********************
'++ T Sinus 130card ++
PNPStrg = PNPStrg & " PCMCIA\T-Sinus-0156-0002"

'****************************************************************

LocalSystemDir = WshShell.ExpandEnvironmentStrings("%SystemRoot%")

if objFSO.FileExists(LocalSystemDir & "\devcon.exe") then
WshShell.Run LocalSystemDir & "\devcon.exe " & Switch & PNPStrg, 0, false
End If